VBA Makro - procházení řádků a sloupců tabulky a vrácení hodnoty buňky
Dim wsS As Worksheet, table As Range, c As Integer, l As Integer
Set wsS = Sheets("t")
Set table = wsS.Range("A1", Range("D11"))
For l = 1 To table.Rows.Count
c = 0
For c = 1 To table.Rows(l).Columns.Count
MsgBox table.Rows(l).Columns.Cells(c).Value
Next
Next
Komentáře
Okomentovat