VBA - vymazat buňku při změně jiné buňky ve stejném řádku

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)
Zamčeno
Transmit
nováček
Příspěvky: 29
Registrován: 28 led 2010 13:33

VBA - vymazat buňku při změně jiné buňky ve stejném řádku

Příspěvek od Transmit »

Dobrý den,

věděl by někdo, jak vytvořit makro, které budu mazat obsahy buněk při změně obsahu jiné buňky na stejném řádku?
Např. pokud se změní buňka ve sloupci "A", vymaže se buňka ve sloupci "B" na stejném řádku.
Konkrétní buňka nesmí být podmínkou. Týká se jakékoliv změny - z prázdné na vyplněnou, změna již vyplněné a nebo vymazání obsahu.
Už nějaký den se snažím hledat přes klíčová slova na internetu a zatím neúspěšně.

Díky moc za jakoukoliv radu.
Štěpán
Uživatelský avatar
atari
Level 6
Level 6
Příspěvky: 3376
Registrován: 24 říj 2008 19:50

Re: VBA - vymazat buňku při změně jiné buňky ve stejném řádk

Příspěvek od atari »

Změna buňky je česky řečeno událost. Pokud dáš do vyhledávače "událost excel" tak ti vyjede mnoho odkazů, jak to udělat.
Kód při změně buňky ve sloupci A, smaže buňku se sloupci B. Kód si vlož do příslušného listu.


Kód: Vybrat vše

Private Sub Worksheet_Change(ByVal Target As Range)
zdroj = 1 'číslo sloupce který iniciuje změnu, A je sloupec č. 1 atd.
cil = 2 ' číslo sloupce kde se budou mazat buňky
    If Target.Column = zdroj Then Cells(Target.Row, cil).ClearContents
End Sub
Transmit
nováček
Příspěvky: 29
Registrován: 28 led 2010 13:33

Re: VBA - vymazat buňku při změně jiné buňky ve stejném řádk

Příspěvek od Transmit »

Díky, funguje to.
Zamčeno
  • Podobná témata
    Odpovědi
    Zobrazení
    Poslední příspěvek

Zpět na „Kancelářské balíky“