Simple calculatation

[1000]

How do I get execl to print out every compatation from
0000 to 9999

thanks

 

[Anne Troy]

What's a compatation?

 

[pikus]

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