ComboBox'a veri alma

[Hacı Bayram ÖZKAN]

userform üzerinde bulunan TextBox4'E Topla bütonu kullanılmadan Çalışma sayfasının BB6'da bulunan rakamın format 12.123,45 şeklinde gelmesini iistiyorum. Teşekkürler

 

[Ömer]

Merhaba,

Bu şekilde deneyiniz.

Private Sub UserForm_Initialize()
For x = 2 To [c65536].End(3).Row
    ComboBox1.AddItem Cells(x, "c")
Next
[COLOR=red]TextBox4.Text = Format(Range("BB6").Value, "#,##0.00")[/COLOR]
End Sub

Private Sub TextBox4_Change()
TextBox4.Value = Range("BB6").Value
End Sub

Bu bölümü silersiniz..

.

 

[Hacı Bayram ÖZKAN]

Ömer teşekkürler bu oldu, ancak sonucu Userformu her açıp kamada sonucu görüyorum, bu ben buraya kayıt yaparken toplamı burada göremez miyim, böyle bir imkan yok mu? Çünkü değerleri girerken sonucuda bu TextBox4 bütonunda görmek istiyorum. Teşekkürler

 

[Ömer]

TextBox4.Text = Format(Range("BB6").Value, "#,##0.00")

Bu bölümü kayıt yaptığınız butonun Click olayını yazmanız yeterli olur.

Kodlarda;

Private Sub CommandButton3_Click()

var, MsgBox satırından önce yukardaki ( kırmızı işaretli ) kodu yazabilirsiniz..

.

 

[Hacı Bayram ÖZKAN]

Deneyeceğim teşekkürler

 

[erkinx]

örnek dosyada verileri kendi içinden alıyor, fakat ben farklı bi excel (veriler.xls) dosyasından almasını istiyorum, bunu nasıl yaparım? konuyla ilgili başlık açtım fakat 1 haftadır cvp yok lütfen yardımcı olun

 

[Excelmy]

örnek dosyada verileri kendi içinden alıyor, fakat ben farklı bi excel (veriler.xls) dosyasından almasını istiyorum, bunu nasıl yaparım? konuyla ilgili başlık açtım fakat 1 haftadır cvp yok lütfen yardımcı olun

Sayın erkinx

Açmış olduğunuz konu başlığını takip ediniz bu sorunuz 31.08.2010 tarihinde yanıtlandı.

Bakın işte burada : http://www.excel.web.tr/showthread.php?t=88332&page=3

 

[erkinx]

sayın erkinx

açmış olduğunuz konu başlığını takip ediniz bu sorunuz 31.08.2010 tarihinde yanıtlandı.

Bakın işte burada : http://www.excel.web.tr/showthread.php?t=88332&page=3

gönderdiği örnek hata veriyo