• Foruma hoş geldin 👋 Ziyaretçi

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.

Çözüldü Son Satıra Kadar okuma

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

bulentkars

Bronz Üye
Kullanıcı Bilgileri
Katılım
30 May 2022
Mesajlar
406
Çözümler
3
Aldığı beğeni
66
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
Arkadaşlar Merhaba,

Aşağıdaki kod ile Listbox'a "Form!A2:B10000" aralığını gösteriyor. ben "A2 ile en son dolu olan B" Aralığını göstermesini istiyorum. yardımcı olabilirseniz sevinirim. Şimdiden Teşekkürler


Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 4
ListBox1.ColumnWidths = "100;155;85"

With ListBox1
.RowSource = "Form!A2:B10000"
.Font.Name = "Verdana"
.Font.Size = 10
End With

End Sub
 
.RowSource = "Form!A2:B10000" bu kısmı aşağıdaki ile değiştiriniz.

.RowSource = "Form!A2:B" & sheets("Form").cells(rows.count,2).end(3).row
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Geri
Üst