SG Fórum - Excel kérdés - #1672

SG Fórum - Excel kérdés - #1672

Fórum / Felhasználói programok

mozsoka 2012. nov. 12. 11:02 | válasz | #1672
A smyle-t betudom annak, hogy mindjárt ebédidõ van :)

Viszont, ha lehet lenne még 1 gondom, amiben kérném a segítséged.

Ugyan így szeretnék dátumra is szûrni.

Private Sub DTPicker1_Change()

Sheets("Munka2").Range("de1") = DTPicker1

Sheets("Munka2").Cells(1, 109).NumberFormat = "yyyy/m/d"

End Sub

Private Sub DTPicker2_Change()

Sheets("Munka2").Range("df1") = DTPicker2

Sheets("Munka2").Cells(1, 110).NumberFormat = "yyyy/m/d"

End Sub

Dim a

Dim b

lekerdezes.Hide

a = Sheets("Munka2").Range("de1")

b = Sheets("Munka2").Range("df1")

ActiveSheet.Range("$A$1:$AM$20496").AutoFilter Field:=16, Criteria1:=">=" & a, Operator:=xlAnd, Criteria2:="<=" & b

de a nap után valamiért betesz egy pontot ami a szûrendõ dátumok végén nincs.

Válasz 'Delila1' üzenetére (#1671)