MS Excel

Téma: detekce změněné buňky

Zaslal/a marcinko.jan 7.8.2013 10:07

Zdravím,
chci si v práci udělat něco jako změnový list pro jednu tabulku. Vypisuje mi to datum, čas a jméno uživatele, který změní obsah buňky:

Private Sub Worksheet_Change(ByVal Target As Range)

aa = Sheets(3).Cells(1, 1)

Sheets(3).Cells(aa + 1, 1) = Now() & " - " & Application.UserName

aa = aa + 1
Sheets(3).Cells(1, 1) = aa

End Sub

chtěl požádat o pomoc jak lokalizovat právě tu změněnou buňku. Když použiju "ActiveCell.Address" tak mi to ale ukáže buňku až po provedené změně, tedy pokud uživatel zmáčkne po zadání textu do buňky Enter, tak to vypíše buňku pod. Což by ani tak nevadilo, ale problém nastane, když uživatel potvrdí změnu v buňce kliknutím myší někam. Vypíše to totiž právě aktivní buňku po potvrzení změny.
Takže otázka zní jak lokalizovat právě tu měněnou buňku.
Díky, s pozdravem

Zaslat odpověď >

marcinko.jan(7.8.2013 10:09)#014621

hmm tak se omlouvám.. už jsem na to přišel, nepoužiju totiž ActiveCell.Address, ale Targe.Address.

No možná se to bude někdy někomu hodit, ale klidně to smažte ten můj spamcitovat

ondrapisklak(13.8.2013 9:59)#014667

Mě se to hodí, děkuji :-)citovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

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.