Makro, které prochází všechny buňky v oblasti – cyklus For each
S tímto tématem se setkáte na našich kurzech ExcelTown.
Aktuálně: kurzy můžete absolvovat jak online, tak prezenčně.
Na této stránce je ukázka makra, které prochází všechny buňky v definované oblasti, a v každé provede nějakou akci. V našem případě vloží hodnotu 1234.
Více komentáře přímo v kódu.
'začátek a název makra
Sub vsechny_bunky()
'definice proměnných
Dim oblast As Range, bunka As Range
'proměnné "oblast" přiřadíme buňky, kterými je tvořená
Set oblast = Range("a1:d4")
'cyklus, který projde všechny buňky
For Each bunka In oblast
bunka.Value = 1234
Next bunka
End Sub
S tímto tématem se setkáte na našich kurzech ExcelTown.
Aktuálně: kurzy můžete absolvovat jak online, tak prezenčně.
Jak by to mělo vypadat, kdybych do buňky A1 zadával hodnotu (např. 3) procházel buňky A2:A20, které mají hodnotu 1-5 a makro by schovalo všechny sloupce, které hodnotu 3 nemají? Analogicky při změně hodnoty…
Děkuji