Hücreye girilen değer kadar "X" makrosunu çalıştırmak.

[hakansali]

Herkese selamlar,
Arkadaşlar işimi gören bir "X"makrosunu oluşturdum. Yeni bir makro yazmak istiyorum, komut tam olarak ;

" X makrosunu LİSTE sayfasındaki A1 hücresine girilen değer kadar tekrar çalıştır "

Şimdiden hepinize teşekkür ediyorum

 

[YUSUF44]

Deneyiniz:

Sub makro()
If Sheets("LİSTE").[A1] > 0 then
    For i = 1 to Sheets("LİSTE").[A1]
        X
    Next
End If
End Sub

 

[hakansali]

Çok teşekkürler, ellerinize sağlık..

 

[hakansali]

Deneyiniz:

Sub makro()
If Sheets("LİSTE").[A1] > 0 then
    For i = 1 to Sheets("LİSTE").[A1]
        X
    Next
End If
End Sub

Çok teşekkürler ellerinize sağlık..