Új hozzászólás Aktív témák

• #1709 martonx veterán EkSYS #1707

  Új Válasz 2012-03-14 13:40:21 #1709

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  martonx

  veterán

  válasz EkSYS #1707 üzenetére

  Ez esetben erre van szükséged:

  Dim lDate As Long
  Dim dDate As Date
  dDate = DateSerial(2011, 3, 12)
  lDate = dDate
  ActiveSheet.Range("$A$1:$A$4").AutoFilter Field:=1, Criteria1:= ">" & lDate

  A dátumot átalakítjuk long-gá, és ezzel megbízhatóan működik mindenféle dátumszűrés.

Új hozzászólás Aktív témák