• DİKKAT

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

USEFORMDAN veri aktarma

üstad senin yardımınla combobox sütünuna verilari yazdık ama ben bu verilerin excel veriler sayfasındaki listeden almasını istiyorum nasıl yapabilirm.

Private Sub UserForm_Initialize() Bölümüne

UserForm1.ComboBox1.RowSource = "Sayfa1!B2:B" & [Sayfa1!B65536].End(3).Row

Mavi ile yazılı kısımdaki UserForm1 yerine
Formunuza başka bir isim verdi iseniz o ismi yazın

Kırmızı ile yazılı kısım verilerin alınacağı Sütun içindir
Sütunu değiştirebilirsiniz

Örneğin : AA sütunu 7. ci satırdan başlasın 15.inci satırda bitsin istiyorum

UserForm1.ComboBox1.RowSource = "Sayfa1!AA7:AA15"
 
böyle yazdığımda bana hata uyarısı geliyor..
Private Sub UserForm_Initialize()
UserForm1.ComboBox3.RowSource = "Sayfa1!D4:D9"
txtAD1 = [gelir!B13]
txtTESP1 = [gelir!a25]
txtTESP2 = [gelir!a26]
txtTESP3 = [gelir!a27]
txtTESP4 = [gelir!a28]
txthayvan1 = [gelir!B35]
txthayvan2 = [gelir!B36]
txthayvan3 = [gelir!B37]
txthayvan4 = [gelir!B38]
txthayvan5 = [gelir!B39]
txthayvan6 = [gelir!C40]
txthayvan7 = [gelir!C41]
txthayvan8 = [gelir!C42]
ComboBox3 = [gelir!A46]
ComboBox2 = [gelir!d46]
ComboBox1 = [gelir!F19]
bitki1 = [gelir!F25]
bitki2 = [gelir!F26]
bitki3 = [gelir!F27]
bitki4 = [gelir!F28]
bitki5 = [gelir!F29]
bitki6 = [gelir!F30]
bitki7 = [gelir!F31]
bitki8 = [gelir!F32]
bitki9 = [gelir!F33]
bitki10 = [gelir!F34]
bitki11 = [gelir!F35]
bitki12 = [gelir!F36]
bitki13 = [gelir!F37]
bitki14 = [gelir!F38]
bitki15 = [gelir!G39]
bitki16 = [gelir!G40]
bitki17 = [gelir!G41]
bitki18 = [gelir!G42]

End Sub
 
böyle yazdığımda bana hata uyarısı geliyor..
Debug diyerek hata veren satıra bakınız.
sanırım
UserForm1.ComboBox3.RowSource = "Sayfa1!D4: D9"
Bu satırdır nedeni ise Form isminiz (UserForm1) aynı değildir.
Yada Sayfa ismini (Sayfa1) bulamamıştır.
(siz gelir sayfası D4: D9 ise "gelir!D4: D9" olarak değiştiriniz.

O da olmazsa
ComboBox3.RowSource = "gelir!D4: D9"
Form ismi yazmadan deneyin.
 
başka bir exel sayfasında
macro güvenliğini değiştir.
Dosyanı macroları devere dişi bırakarak aç
userform a bir düğme ekle o düğmeyede

application.visible = true ' exeli gösterir.
Unload me ' formu kapatır.

Bu kodu yaz.
Formu kapatır exel sayfanı görünür hale getirir.

s.a
kolay gelsin
mustafa hocam bir çok farklı bankayla çalışıyorum ve devamlı eft yapıyorum.benim istedğim şu:
A bankasından b bankasına eft
b bankasından c bankasına eft
c bankasından a bankasına eft gibi bankalar arası eft yapıyorum.
Bunu excellde her seferinde yazma yerine useform oluşturup hazır banka sistemleri gibi yapma şansım varmı?
Mesela her iki tarafta da bankalar olsa alt menü şeklinde
bir tarafa a bankası diğer tarafa da b bankasını işaretlediğim zaman excellden veriyi çekip normal sayfaya dökme şansımız varmı?
Useform hakkında hiçbir bilgim yok.
 
Üstadım şöyle bir sorunla karşılaştım. Useform'dan bilgi gönderip exceldeki satıra kaydettiriyorum. Exceli açtırmadan useform'u açtırıp bilgileri yazdıktan sonra gönder butonuna tıklanıyor. Çıkış diyip formu kapatınca kaydetmeden çıkıyor ve tekrar exceli açmak istediğimde zaten kullanıcı tarafından açık, saltokunur açılsın mı diye soruyor ? Yardımlarınızı bekliyorum.
 
Geri
Üst