Merhaba,
Sheet1 de bulunan commandbutton1'e her tıklandığında,
sheet2 deki range("af2")' yi sheet1.range("J3")' e yazmasını ve hiç boşluk bırakmadan her tıklayışta 0001 den 9999 a kadar sayı eklemesini istiyorum.(Not: eklenecek sayı sıralı gitmeli.Command buttona ilk tıkladığımda 0001 eklemeli 2.tıklayışta 0002 eklemeli). Aşağıdaki kodlara for i den sonra bir koşul eklemem gerekiyor galiba ama ne? yardımcı olursanız sevinirim.
Private Sub CommandButton1_Click()
For i = 1 To 9999
Sheets("sheet1").Range("J3") = Sheets("sheet2").Range("AF2") & i
Next i
Sheet1 de bulunan commandbutton1'e her tıklandığında,
sheet2 deki range("af2")' yi sheet1.range("J3")' e yazmasını ve hiç boşluk bırakmadan her tıklayışta 0001 den 9999 a kadar sayı eklemesini istiyorum.(Not: eklenecek sayı sıralı gitmeli.Command buttona ilk tıkladığımda 0001 eklemeli 2.tıklayışta 0002 eklemeli). Aşağıdaki kodlara for i den sonra bir koşul eklemem gerekiyor galiba ama ne? yardımcı olursanız sevinirim.
Private Sub CommandButton1_Click()
For i = 1 To 9999
Sheets("sheet1").Range("J3") = Sheets("sheet2").Range("AF2") & i
Next i