Assign a Date Variable within VBA Q

[John]

I have a few questions the answers of which might explain why my code is not
working. First an outline of what I'm trying to do

Extract information from an MS Access database and pull in to Excel. I've
recorded the Macro and everything works great, except that the 'from' date
with regards to Sales information is hard coded and thus inflexible, in that
I wouldn't allow other users, who have to get this information, dabble with
the code itself

I've been told through this group that I should set a variable and then call
this through the relevant code line. When the information is extracted the
hard code for the relevant Sales date is in the following format "YYYY-MM-DD
hh:mm:ss". Now the cell which I want to reference my cell against visually
is formated DD/MM/YY

The error message I'm getting is a SQL debug on the line below, but from
reading other usergroups it could be a formatting problem

..Refresh BackgroundQuery:=False



My relevant code is then set as follows


Dim FromDate As String
FromDate = Workbooks("Pull Gross Sales for 2005 Financial
Year.xls").Worksheets("Sheet2").Range("A1").Value


"WHERE (tblStoreTotals.SalesDate>={ts '" & FromDate & "'})"


Now my questions

1. Does it matter that the source cell (Sheet2 A1) is typed in as DD/MM/YY
with no hh:mm:ss. I'm in Europe so thats how we type in dates

2. Do I have to format a linked cell to A1 say B1 as YYYY-MM-DD hh:mm:ss

3. Someone must have got a Data Import module working with a variable
reference, any examples would be appreciated

 

[Bob Phillips]

John,

Try formatting the date

FromDate = Format(Workbooks("Pull Gross Sales for 2005 Financial Year.xls")
_

..Worksheets("Sheet2").Range("A1").Value),"yyyy-mm-dd")

--

HTH

RP
(remove nothere from the email address if mailing direct)

 

[Guest]

Hi John,
Did you get this to work?

 

[John]

Afraid not David, still stuck at the Refresh BackgroundQuery:=False line

Though I haven't tried Bob's suggestion, can't do until I'm back in the
office on Tuesday

 

[Guest]

Hi John,
Just thought you might like to know there is a very similar post to yours.
Maybe he was able to solve the dilema. To find it, Date: 12/18/2004, Title:
"Data Import Cell Reference", Time: 2:51 AM, Name: John. This also seems to
be a format problem, but posibly John found a work around or something.

 

[Tom Ogilvy]

Did you notice that that John and this John are using the same email
address?

"John" <[email protected]>

Weird, heh?

 

[Guest]

This must be why they pay you all that big money Tom.

 

[John]

Bob tried your format code but its getting a compile error "Expected end of
statement" error at the ","

 

[Chip Pearson]

Get rid of the closing parenthesis after Value.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

 

[John]

Bingo , that worked

Thanks to all the Guy's who helped with this problem, it will allow me to
apply a variable to a whole series of ideas I have and safe time

Thanks again