Třeba ...Public Sub pokus()
For i = 1 To Sheets.Count
Sheets(i).Cells(1, 1) = i
Next
End Sub...
M@citovat
For i = 1 To Sheets.Count
Sheets(i).Cells(1, 1) = i
Next
End Sub...
M@citovat
Zaslal/a
24.8.2010 15:57Zdravím,
potřeboval bych pomoci s vyplněním buněk na více listech. Dejme tomu, že mám třeba 900 listů a v buňce A1 na listu 1 potřebuju mít hodnotu 1, na listu 2 hodnotu 2 atd. až do 900.
Předem díky za rady
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.