Napr. ak bude ten komment na kazdom liste v bunke A1, tak si myslim ze staci pridat za
Cells(i + 1, 1) = Sheets(i).Name
novy riadok:
Cells(i + 1, 2) = Sheets(i).Cells(1,1)
pisem o to mmakre ktore si pastol vyssie, netahal som xls.
poradna.net
Neregistrovaný Přihlásit Registrovat