How do I get execl to print out every compatation from 0000 to 9999 thanks
P pikus Apr 28, 2004 #2 Huh? Do you want it to print a different sheet for each of those numbers? If so: Private Sub CommandButton1_Click() Cells(1, 1).NumberFormat = "0000" For x = 0 To 9999 Cells(1, 1).Value = x Next x End Sub - Piku
Huh? Do you want it to print a different sheet for each of those numbers? If so: Private Sub CommandButton1_Click() Cells(1, 1).NumberFormat = "0000" For x = 0 To 9999 Cells(1, 1).Value = x Next x End Sub - Piku
