Přes selection by to mělo fungovat i v tomto případě:
For Each cell In Selection
If cell.Value <> "" Then MsgBox cell.Value
Next
v msgbox ti to zobrazí postupně hodnoty všech neprázdných buněk ve vybrané oblasti ať je jakákoliv.
M@citovat
For Each cell In Selection
If cell.Value <> "" Then MsgBox cell.Value
Next
v msgbox ti to zobrazí postupně hodnoty všech neprázdných buněk ve vybrané oblasti ať je jakákoliv.
M@citovat