• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Döngü ile Textbox No atama ve içine yazdırma

  • Konbuyu başlatan Konbuyu başlatan chngrcn
  • Başlangıç tarihi Başlangıç tarihi
Katılım
5 Mart 2010
Mesajlar
295
Excel Vers. ve Dili
Microsoft Office 2010
Forumun değerli üyeleri,

Userform içinde 20 adet textbox mevcut.

Döngü ile bu 20 adet textbox içine

textbox1.value = "[ALAN01]"
.
.
.
textbox20.value = "[ALAN20]"

olacak şekilde "DÖNGÜ" ile yapmak mümkünmüdür ?

Not: ( texbox numaralarını döngü atayacak şekilde olacak..)
Şimdiden teşekkürler..
 
Merhaba;

Private Sub CommandButton1_Click()
For i = 1 To 20
say = Right("00" & i, 2)
Controls("TextBox" & i) = "[ALAN" & say & "]"
Next i
End Sub

Şeklinde deneyin.
İyi çalışmalar.
 
Sayın muygun Çok teşekkür ederim..
 
Geri
Üst