Příspěvky uživatele

vyzkouším, děkuju

Pardon, spletl jsem to, byla vybraná ".activate".
Selectovat jinou buňku nepomůže, Ta původní Activovaná je furt označená čárkovaně.

Dobré ráno
Šlo by to co se mi ve VBA ukazuje pod Debug.print v okně ladění zobrazit ve formuláři nad otevřeným sešitem, když makro pracuje,abych mohl sledovat chod programu.
Představuju si to tak, že tedy zobrazím třeba vpravo nahoře form, kde bude textbox a v něm se bude psát to Debug.print, a rolovat, když to bude nad viditelnou oblast.
A pokud by to šlo i ukládat do log.txt, nemělo by to chybu.
Děkuji za náměty řešení.

Ano, kopírovalo, Děkuji
a ještě maličkost.
měl jsem označeno více bunek selectem, jak je všechny ODznačit ?

Zdravím.
Po použití :
Cells(1, 2).Activate
Cells(1, 2).Select
a pak další příkazy, a ukončení makra, mám v listu stále čárkovaně označenou tu activate bunku a selectovanou mám plným obdélníkem označenou.
Jak lze uvolnit tu aktivovanou bunku, co je čárkovaně označená?
Díky

díky

Můžu ještě dotaz?
Set rngID = ws.Range("H5").Resize(MaxRadek - 4)
to vytvoříme oblast od ř.5 po maxřádek ? proč tam je -4?

poslední řádek sl.H je 8.
takže to vytvoří oblast H5 plus 4 dolů? tzn H5-H8 ?

Prosím , mohl by jste vysvětlit u řádků povely a vůbec princip toho makra:
Není mi jasné ani : Dim rng As Range, rngID As Range, rngDZ As Range, rngFind As Range
Dim ID As String
Zkouším to "napasovat" na jiný sešit, stejná struktura a nic mi nenalézá.

Děkuji

..tady asi ta podmínka, že již "Zapsano" přeskočíme asi není, že?

If IsEmpty(rng.Offset(, 3).Value) = False Or IsEmpty(rng.Offset(, 14).Value) = True Then

...ještě detail : Kam a jak prosím nejlépe zařadit tu podmínku, že zpracováváme jen položky ze zdroje co mají sl."O" prázdný, tudíž dosud nebyly zpracovány?
Pokud je sl."O" prázdný, budeme tento záznam zpracovávat.
Pokud už je tam "Zapsáno"/"Nenalezeno", přeskočíme ho.

Ježiš, vy jste úžasný,já už to skoro "pohřbil".
Bude to velká drzost poprosit o komentář příkazů pro detailní pochopení? .Čerpám z Vašich rad a zkouším aplikovat a modifikovat.
Hezký den
P

Takže sa musí z "Datum zaúčtování" zistiť rok a mesiac, a v riadku daného roku a mesiaca pripočítať k už doteraz naspočívavanej sume? ...NE, nebude se nic připočítávat, jen se to přidá na další řádek, že to bude jako v dalším měsíci Nevadí, k tomu téměř nedojde, ty dvě platby jsou vyjímka , kterou budeme ignorovat.

Název listu jsem opravil, bude NE 2 atd

V ňom pre záznam z 3.11.2022 platí, že prepíšeme bunku C19 na 3.11.2022 a bunku D19 na 1375,00. ANO takto

To pole "platba č." neznamená mesiac? ..NE tak docela,Skoro všechny případy mají zkrátka jen jednu platbu v měsíci, záleží kdy to pošlou,může nastat situace že očekávám platbu 30.11. a ona přijde až 1.12.. a pak další 30.12. , tak proto bych to ignoroval, nějaké hlídání měsíců, prostě jen přidat další platbu na další řádek sl.C a D. Že to nebude korespondovat se sl.A a B ignorujeme, to si případně upravíme ručně při inventuře. Takže vkládat se bude datum a částka vždy na další prázdný řádek za posledním minulým vyplněným.

.. V tom prípade je strašne nevhodné v prílohe použiť pre každý rok čísla 1-12. ...Zdroj.soubor může mít jakýkoliv název Třeba BANKA, je to jedno.Průběžně do něj budu přidávat další řádky které přijdou z banky.Proto ta podmínka na začátku, že zpracováváme jen položky co mají sl."O" prázdný, tudíž dosud nezpracovaný.

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje