To isté nastane i v riadku .Columns(28).Replace What:=Pole(i), Replacement:=Pole(i)...
Takže je potrebné cyklus nastaviť od 0 do 3citovat
Zaslal/a kabaka 29.3.2022 12:41
Makro sa mi zastaví tu a nechce pokračovať ďalej.
.Color = Farba(i) (opravila som, VYRIEŠENÉ)
MAKRO funguje ako má, len neviem ošetriť, aby to platilo všeobecne, nie len pre tento súbor. Dátumy sú vždy iné.
Makro opravené, už funguje ako má, bez ohľadu na dátum.
Ďakujem r13
r13 napsal/a:
Proste namiesto Sheets("Statistika_COS_2022") použi ActiveSheet. (Máš to tam dvakrát).
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.