AccessTr.neT
Comboboxa Sayfadan Hücrelerden Değer Almak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Comboboxa Sayfadan Hücrelerden Değer Almak (/konu-comboboxa-sayfadan-hucrelerden-deger-almak.html)



Comboboxa Sayfadan Hücrelerden Değer Almak - accessman - 10/01/2020

Dim rng As Range
    Dim i As Long
    Dim LastRow As Long

    Me.BSComboBox1.Clear

    With Sheets("Colors")
        LastRow = .Cells(Rows.Count, "B").End(xlUp).Row

        For i = 2 To LastRow
            If .Cells(i, 2) <> vbNullString Then
                    Me.BSComboBox1.AddItem Cells(i, 1)
            End If
        Next
    End With


bu neden çalışmıyor
"Colors" sayfasının "B" sutununu alması gerekiyor değil mi


Cvp: Comboboxa Sayfadan Hücrelerden Değer Almak - accessman - 10/01/2020

Cells(i, 1) 
eksik varmış
.Cells(i, 1)
olacakmış şu noktanın yaptığına bak sen