Textbox'u Sayı Olarak Gösterme

[lavetera]

Merhabalar. Şimdi Makromda Başlangıç Artış Bitiş textboxları varı. Ben bunlara girdiğim değerlerle aritmetik dizi oluşturmak istiyorum
For döngüsü kullanırken



Sonra
For i = textbox1.value to textbox2.value step textbox3.value

şeklinde oluşturmak istiyorum ancak texboxtaki sayı değerleri gerçekleşmiyor.
Ve bu döngü textbox3(bitiş) değerine kadar devam ettmirmek istiyorum. Bu durumda ne yapmam gerekmekte?

 

[Necdet]

Merhaba,

Ne demek istediğiniz anlaşılmıyor, neden sayı değerleri gerçekleşmiyor?
aşağıdaki gibi bir döngü bende gayet güzel çalışıyor.

Private Sub CommandButton1_Click()

    Dim i As Long
    
    For i = TextBox1.Value To TextBox2.Value Step TextBox3.Value
        MsgBox i
    Next i
    
End Sub

 

[lavetera]

Merhaba,

Ne demek istediğiniz anlaşılmıyor, neden sayı değerleri gerçekleşmiyor?
aşağıdaki gibi bir döngü bende gayet güzel çalışıyor.

Private Sub CommandButton1_Click()

    Dim i As Long
    
    For i = TextBox1.Value To TextBox2.Value Step TextBox3.Value
        MsgBox i
    Next i
    
End Sub

Benim demek istedigim sey userformda 3 yeri dolduruypruz ornek: 2den 150 ye kadar 2 ser artsin. A daki hucrelere sirayla 2 4 6 8 diye yazicak. Tabi bu degerleri textboxa ne yaziyorsak ordan alicak. Dongude sayi yerine textboxtaki degerleri kullanmak istiyorum demek istedim

 

[alicimri]

Galiba aşağıdaki gibi

Private Sub CommandButton1_Click()
    Dim i As Long
    e = 1
    For i = TextBox1.Value*1 To TextBox2.Value*1 Step TextBox3.Value*1
  Range("a" & e).Value = i
  e = e + 1
    Next i  
End Sub

 

[Orion1]

İlgili satırı aşağıdaki gibi yapınız.

For i = clng(TextBox1.Value) To clng(TextBox2.Value) Step clng(TextBox3.Value)

 

[Necdet]

Benim demek istedigim sey userformda 3 yeri dolduruypruz ornek: 2den 150 ye kadar 2 ser artsin. A daki hucrelere sirayla 2 4 6 8 diye yazicak. Tabi bu degerleri textboxa ne yaziyorsak ordan alicak. Dongude sayi yerine textboxtaki degerleri kullanmak istiyorum demek istedim

bu sorunuzda yoktu.
Ben ve biz sadece genel döngüyü verdik, siz kendi çalışmanıza uyarlamalısınız.

döngü sonucunu A sütununa yazdıracaksanız benim verdiğim koddda msgbox olan satırı silip A sütununa yazdıracak kodu eklemek.

Baştan söyleseydiniz ona göre düzenlerdik. Eksik soru sonra gelsin üstüne bir sürü mesaj daha.