list sorgu

[TOKERX222]

açılır list le degilde arama yaparak verileri getirebilirmiyiz

 

[Levent Menteşoğlu]

Bunun için Activex denetimlerinden Combobox kullanmanız gerekir.

 

[TOKERX222]

Bunun için Activex denetimlerinden Combobox kullanmanız gerekir.

teşekürler levent bey Combobox için formul verebilirseniz yapa bilirim sanırım newdata b sutunundan veri alıyor

Private Sub TextBox1_Change()
  On Error Resume Next
    METİN1 = TextBox1.Value
    Set FC2 = newdata("B:B").Find(What:=METİN1)
    Application.GoTo Reference:=newdata(FC2.Address), Scroll:=False
    Selection.AutoFilter Field:=2, Criteria1:="*" & TextBox1.Value & "*"
    If METİN1 = "" Then
    Selection.AutoFilter Field:=2
    End If
End Sub

bu kodu denedim başarılı olamadım

 

[Levent Menteşoğlu]

Dosyanızın ilk satırını bir combobox ekledim.