selecteren met macro

[Willem Blaas]

geacht forum

ben bezig met macro , en daarbinnen wil ik een een selctie doen middels een opgegeven kreet welke via een frm gegeven wordt

en hij ziet deze ook.

in die selectie zit "bevat".

wanneer ik dit handmatig doe gaat t prima maar wanneer ik dit met de macro wil doen "ziet" ie m niet

'' ActiveSheet.Range("$A$1:$G$2462").AutoFilter Field:=2, Criteria1:="=*velp*" deze met de hand gemaakt doet t

maar wanneer ik bv velp vervang door Txtzkalg (zo heet het gedimde item) doet t niet

strzkalg = Txtzkalg
    Unload frmzk_alg
    Sheets("kengetal_02").Select
    Range("A1").Select

    Selection.AutoFilter
    Columns("A:B").Select
    
    
     Selection.AutoFilter Field:=2, Criteria1:=(Txtzkalg), Operator:=xlAnd

ik hoop dat ik een beetje overkom

weet u de oplossing ?

met vr gr willem blaas

 

[Warme bakkertje]

Ik veronderstel dat Txtzkalg een tekstveld is in je formulier ?

Sub tst()
strzkalg = Txtzkalg
Unload frmzk_alg
With Sheets("kengetal_02")
    Columns("A:B").AutoFilter 2, strzkalg, xlAnd
End With
End Sub

 

[Wigi]

Of

Sub tst()
Unload frmzk_alg
Columns("A:B").AutoFilter 2, Txtzkalg.Text
End Sub

 

[Willem Blaas]

Ik veronderstel dat Txtzkalg een tekstveld is in je formulier ?

Sub tst()
strzkalg = Txtzkalg
Unload frmzk_alg
With Sheets("kengetal_02")
    Columns("A:B").AutoFilter 2, strzkalg, xlAnd
End With
End Sub

bedankt voot meedenken

 

[huijb]

@ Willem Blaas: zou je willen stoppen met het onnodig quoten van jezelf geplaatste vraag.