View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
infested_tr infested_tr is offline
external usenet poster
 
Posts: 1
Default trouble with advancedfilter of date column


Mustafa Kocaman;

I have a problem such that; i have crated a userform which is t
fill an order sheet namely "normal" . User enters the date in the dat
fields in the form and other datas like "11.08.2005" then we have
complete list of orders in "normal". İ wrote a macro to advanc
filter the dates in a separete workshee but no results returned. On th
other hand if i manually double-click a date cell and press enter th
date becomes to be available for the filtering. i think i have to d
something about the format of the date. what is your suggestions.

thanks.

filter macro code is
________________________________________________
Sub ApplyFilter()
Dim wsDL As Worksheet
Dim wsO As Worksheet
Dim rngAD As Range
Set wsDL = Sheets("normal")
Set wsO = Sheets("Normal Tarih Sor")
Set rngAD = wsDL.Range("B4:B100")

wsDL.Range("A4:AC50000").AdvancedFilter _
Action:=xlFilterCopy, _
CriteriaRange:=wsO.Range("A1:B2"), _
CopyToRange:=wsO.Range("A6:AC500"), Unique:=True
End Sub
_________________________________________________

--
infested_t
-----------------------------------------------------------------------
infested_tr's Profile: http://www.excelforum.com/member.php...fo&userid=2583
View this thread: http://www.excelforum.com/showthread.php?threadid=39225