if syntax error

[indswamy]

could tell me what is the syntax error in the below.
thanks in advance.

if MyScreen.SendKeys("F"CurrentMonthName "<ENTER>")

 

[indswamy]

then missing. sorry i realized. thanks

 

[indswamy]

i am trying to check if this month do something or lastmonth do somehting
this is the code i provide here. but when i have messagbox here it is not displaying anything
x = MyScreen.SendKeys("F CurrentMonthName <ENTER>")
MsgBox x
if x then
Call Found
elseif MyScreen.SendKeys("F LastMonthEnd <ENTER>") then
if strEOFerrormsg = "End of data reached" or strEOFerrormsg = "Scroll at maximum " then

Call Endpgm
Else
Call Found
end if
End if
End if

End Sub

 

[SkipVought]

Hi

x = MyScreen.SendKeys("F CurrentMonthName <ENTER>")

is sending LITERALLY... F CurrentMonthName

I believe that you want to send F Jan

Yes?

Skip,
[sup]Don't let the Diatribe...
talk you to death![/sup][sub]
Just traded in my old subtlety...
for a NUANCE![/sub]

 

[indswamy]

thansk Skip
i am trying to have last month
this functionhas given 1
i need to have month MMM ie jan

Month(DateSerial(1, Month(Now), 1)) - 1
how do it do it.
thanks