Userform for döngüsü labele etkisi

[mekuka]

Saygıdeğer üstadlar

Benim sorunum şöyle,

Ekteki dosyada USerform1.açılıp commandbutton1 tıklanınca,
i döngüsündeki değeri işlem yaparken label1 de görüntülemek.
Yani B1 hücresindeki gibi işlem yapması. Şu an program işlem bittikten sonra 5000 değerini görüntülemekte.

YApacağınız yardımlarınız için şimdiden teşekkürler.

 

[veyselemre]

Merhaba,

Private Sub CommandButton1_Click()
    For i = 1 To 5000
        Cells(i, 1) = i
        Cells(1, 2) = i
        DoEvents
        Label1.Caption = i
    Next
End Sub

 

[mekuka]

Çok Teşekkür ederim sayın veysel emre