No vidím tam nejaké problémy hneď. Pridáme makro, ktoré to pri udalosti BeforeClose vykoná (urobí dočasnú kópiu súboru a pošle ho). Lenže keď ho adresát otvorí, tak mu to urobí pri zatváraní to isté. Lebo je tam stále to makro. Adresát musí dostať plne funkčný súbor s makrom?
Alebo adresátovi ide len o niektoré dátové listy napr.?
Veď si urobte Kontingenčnú Tabuľku.
Alebo v E2024 či E365 napr. vzorec (nie je mi známe, či CZ Excel niečo z tých nových fnc prekladá):
=LAMBDA(N;HSTACK(N;SUMIF(D3:D23;N;E3:E23)))(SORT(UNIQUE(D3:D23);1;1))
Popis oblastí nesedí s tým makrom v TXT. Nevadí chytím sa tých G13:G64 a G76:G128. Pred hokejom to už nestihnem, možno po ňom. Tak čekujte neskôr, iba editnem tento post...
EDIT:
No ak som teda bez prílohy z makra správne pochopil, čo robí, tak tu je úprava, tentoraz robená hromadne cez polia.
Ak som niečo netrafil, priložte aj anonymizovanú Excel prílohu.
Jedná sa skutočne o text, alebo o chybu? Pretože chyba sa vo VBA zadáva v EN, teda #N/A. Priložte anonymizovanú prílohu s pár takými bunkami. Do tých buniek vôbec nechoďte.
Skúste radšej INDEX
=VLOOKUP(AD7;FIN_prij!AD$7:INDEX(FIN_prij!AL:AL;$B$1);8;FALSE)
=SVYHLEDAT(AD7;FIN_prij!AD$7:INDEX(FIN_prij!AL:AL;$B$1);8;NEPRAVDA)
ale môžete aj INDIRECT/NEPŘÍMÝ.ODKAZ
=VLOOKUP(AD7;INDIRECT("FIN_prij!AD7:AL"&$B$1);8;FALSE)
=SVYHLEDAT(AD7;NEPŘÍMÝ.ODKAZ("FIN_prij!AD7:AL"&$B$1);8;NEPRAVDA)
rozdiel zbadáte, ak premenujete list FIN_prij.
Pridal som nastavovacie parametre a nejaké popisy. Skúste.
To bude treba trochu laborovať, kedy importovať objekty Table a kedy Page a kedy oboje. Tu je príklad, keď importuje oboje, a pri objektoch Table použije 1. riadok ako hlavičku.
Určite spĺňajú podmienku
R = WorksheetFunction.CountIfs(.Columns(1), "<>", .Columns(5), HledanaHodnota, .Columns(9), "<>odebráno")
-neprázdny A
-dátum E
-<>"odebráno" I
Pr.
Hókus-pókus...
-Čo ide do položky "Lot:"?
-"Datum Odběru:" je iba na pravej strane? Nemá byť všade?
-Medzi štítkami nie sú rovnaké medzery (ani počet, ani výška, ani striedanie oddeľujúcich riadkov)?
-Čo tie čísla po riadok 2332 v stĺpci C na liste Tisk_stitku_vzorky?
-Ak bude menej riadkov ako štítkov, majú sa zmazať?
-Ak bude viac riadkov ako štítkov, majú sa prirobiť? Potom sú problém nerovnaké medzery.
Od v. 2021/365 (tuším aj 2019) to samozrejme ide, ale treba vedieť, či budete importovať objekt/objekty "Page" alebo "Table", z ktorých sa PDF skladá.
-Verzia Office?
-Zdroj je tabuľka/objekt Tabuľka?
-Cieľ je tabuľka/objekt Tabuľka?
-Po každom nájdení sa má vykonať doplnenie jedného riadku a nejaká ďalšia činnosť (iba s tým jedným riadkom)? A až potom pokračovať?
-Alebo všetky nájdené riadky spracovať naraz?
-Alebo len zápis všetkých nájdených naraz?
-Potrebujete vypísať hodnoty z akých stĺpcov? A kam?
-Potrebujete iba hodnoty? Alebo aj podfarbenie a pod? Nebodaj vzorce?
-Nestačí Vám Kontingenčná Tabuľka s filtrom?
-Reálna príloha ...
Skúste.
Ale na toto ste mi neodpovedal:
"elninoslov" napsal/a:
Pozícia hlavičiek v Data, alebo hlavičky v Formular sa menia, a je teda potrebné hľadať ich umiestnenie?
Namiesto Copy/PasteSpecial by som použil Value2=Value2.
Pozícia hlavičiek v Data, alebo hlavičky v Formular sa menia, a je teda potrebné hľadať ich umiestnenie?
V Data sa jedná o 2 "zhluky" susedných stĺpcov (Text1:Text8 a Text15:Text20)?
Predpokladám, že v Data medzi týmito stĺpcami/zhlukmi sa nachádzajú aj nejaké vzorcované stĺpce. Je tak?
Hrozí použitie filtra vo Formular? A v Data?
Použil by som CodeName listov.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.