| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Help with VBA date
Hi
I'm having issues with the following - pls help. Dim myDt as variant myDt = dateserial(myYr, myMonth,1) myVariable = application.worksheetfunction.vlookup(myDt,Range(" FUEL"), 3,false) gives me an error 2042. I've no clue what's going on here. Can anyone pls help?? thanks chet |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Help with VBA date
I'd try this next:
Dim myDt as Date dim myVariable as variant 'could be an error myDt = dateserial(myYr, myMonth, 1) myVariable = application.vlookup(clng(mydt),range("fuel",3, false) if iserror(myVariable) then msgbox "not found" else msgbox myVariable end if " wrote: Hi I'm having issues with the following - pls help. Dim myDt as variant myDt = dateserial(myYr, myMonth,1) myVariable = application.worksheetfunction.vlookup(myDt,Range(" FUEL"), 3,false) gives me an error 2042. I've no clue what's going on here. Can anyone pls help?? thanks chet -- Dave Peterson |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Help with VBA date
On Sep 17, 11:09 am, Dave Peterson wrote:
I'd try this next: Dim myDt as Date dim myVariable as variant 'could be an error myDt = dateserial(myYr, myMonth, 1) myVariable = application.vlookup(clng(mydt),range("fuel",3, false) if iserror(myVariable) then msgbox "not found" else msgbox myVariable end if " wrote: Hi I'm having issues with the following - pls help. Dim myDt as variant myDt = dateserial(myYr, myMonth,1) myVariable = application.worksheetfunction.vlookup(myDt,Range(" FUEL"), 3,false) gives me an error 2042. I've no clue what's going on here. Can anyone pls help?? thanks chet -- Dave Peterson Hi Dave Thanks so much for your help. This works perfectly! Clng did the trick. truly chet |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Help with VBA date
And by using application.vlookup() instead of
application.worksheetfunction.vlookup(), I could check to see what was returned. I didn't have to program around a possible runtime error. " wrote: On Sep 17, 11:09 am, Dave Peterson wrote: I'd try this next: Dim myDt as Date dim myVariable as variant 'could be an error myDt = dateserial(myYr, myMonth, 1) myVariable = application.vlookup(clng(mydt),range("fuel",3, false) if iserror(myVariable) then msgbox "not found" else msgbox myVariable end if " wrote: Hi I'm having issues with the following - pls help. Dim myDt as variant myDt = dateserial(myYr, myMonth,1) myVariable = application.worksheetfunction.vlookup(myDt,Range(" FUEL"), 3,false) gives me an error 2042. I've no clue what's going on here. Can anyone pls help?? thanks chet -- Dave Peterson Hi Dave Thanks so much for your help. This works perfectly! Clng did the trick. truly chet -- Dave Peterson |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Concatenate including a date so that the date appears as a date | Excel Worksheet Functions | |||
| date in Cell to change colors if the date is beyond today's date | Excel Discussion (Misc queries) | |||
| Report Date - Date Recv = Days Late, but how to rid completed date | Excel Worksheet Functions | |||
| copy date based on date -refer to date range | Excel Programming | |||
| Date updates from worksheet to chart & changes date to a date series! Help!! | Charts and Charting in Excel | |||
Linear Mode
