- Katılım
- 7 Temmuz 2009
- Mesajlar
- 21
- Excel Vers. ve Dili
- excel 2007
SELAM ARKADAŞLAR..KODLARI AŞAĞIDAKİ GİBİ YAZDIM AMA ŞÖYLE BİR HATA VERİYOR....
RUN TİME ERROR 380
COULD NOT SET THE ROW SOURCE PROPERTY.İNVALİD PROPERTY VALUE
SEBEBİ NE OLABİLİR
Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 13
ListBox1.ColumnWidths = "40;150;100;100;20;30;35;20;20;100;100;100;100;50"
ListBox1.RowSource = "B2:O" & [A60000].End(3).Row
CommandButton2.Enabled = False
CommandButton3.Enabled = False
Me.Height = 350
Me.Top = 40
Me.Left = 200
ScrollBar1.Max = [A60000].End(3).Row - 1
Slider1.Max = [A60000].End(3).Row - 1
ComboBox1.RowSource = "KOD LİSTESİ!A2:A" & Worksheets("KOD LİSTESİ").[A65536].End(3).Row
ComboBox2.RowSource = "KOD LİSTESİ!B2:B" & Worksheets("KOD LİSTESİ").[b65536].End(3).Row
ComboBox3.RowSource = "FİYAT LİSTE!B2:B" & Worksheets("FİYAT LİSTE").[b65536].End(3).Row
End Sub
RUN TİME ERROR 380
COULD NOT SET THE ROW SOURCE PROPERTY.İNVALİD PROPERTY VALUE
SEBEBİ NE OLABİLİR
Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 13
ListBox1.ColumnWidths = "40;150;100;100;20;30;35;20;20;100;100;100;100;50"
ListBox1.RowSource = "B2:O" & [A60000].End(3).Row
CommandButton2.Enabled = False
CommandButton3.Enabled = False
Me.Height = 350
Me.Top = 40
Me.Left = 200
ScrollBar1.Max = [A60000].End(3).Row - 1
Slider1.Max = [A60000].End(3).Row - 1
ComboBox1.RowSource = "KOD LİSTESİ!A2:A" & Worksheets("KOD LİSTESİ").[A65536].End(3).Row
ComboBox2.RowSource = "KOD LİSTESİ!B2:B" & Worksheets("KOD LİSTESİ").[b65536].End(3).Row
ComboBox3.RowSource = "FİYAT LİSTE!B2:B" & Worksheets("FİYAT LİSTE").[b65536].End(3).Row
End Sub
