Palo235
22.10.08,11:57
Mam taky problem s jednym makrom na zistovanie listov
skusal som to riesit s:
----------------------
For i = 1 To 50
If ActiveSheet.Next.Select Then
Else
GoTo 1
End If
Next
1:
ActiveCell.FormulaR1C1 = i
End Sub
-----------------------
ale vzdy ked prekroci dany limit listov tak to nechce skocit do else a vypise BUG, keby niekdo vedel poradit ako jednoducho zistim pocet listov s makrom budem rad
skusal som to riesit s:
----------------------
For i = 1 To 50
If ActiveSheet.Next.Select Then
Else
GoTo 1
End If
Next
1:
ActiveCell.FormulaR1C1 = i
End Sub
-----------------------
ale vzdy ked prekroci dany limit listov tak to nechce skocit do else a vypise BUG, keby niekdo vedel poradit ako jednoducho zistim pocet listov s makrom budem rad
dafy
22.10.08,11:45
Sub pocetListov()
ActiveCell.Value = ActiveWorkbook.Sheets.Count
End Sub
do aktívnej bunky ti vloží počet listov v zošite.
ActiveCell.Value = ActiveWorkbook.Sheets.Count
End Sub
do aktívnej bunky ti vloží počet listov v zošite.
Palo235
23.10.08,04:19
dva dni to hladam a to je len prikaz count :) dik za pomoc