vba - Store MonthName() function in a string variable -
first question here go easy on me!
i new visual basic (but not programming) , having trouble on project working on local organization.
i have button runs query contains single "select ... ... "
statement. statement looks every record field recievedboxtoday
equal "yes"
. here code working fine:
select * rename_this_table [database zero] (([database zero].recievedboxtoday)=yes);
now here problem (besides fact received
spelled wrong): code ran every month, table (rename_this_table
) over-written every time button clicked. have permanent data every month solution rename rename_this_table
table monthname_year
monthname
name of month (january or december) , year
current year (2015). thought go doing monthname()
function, works fine, want able store month name string concatenated year (also string). afterwords string replace rename_this_table
.
my code doesn't seem work is:
dim month string dim year string monthname(month(date()), false) month year(date()) year dim newname string = month + "_" + year
after i'm not sure go far taking new string variable , inserting sql code, replace rename_this table
.
how can make work? can make work? if matters, using vba microsoft access 2013. appreciated!
don't use month
, year
variable names. reserved (function) names in vba. also, shortcut, can use format()
function format date string:
dim strnewname string strnewname = format(date, "mmmm_yyyy") ' => "august_2015"
if sql statement stored in separate string, can concatenate new table name string:
dim strsql string strsql = "select * " & strnewname & " [database zero] (([database zero].recievedboxtoday)=yes);"
Comments
Post a Comment