instanceofti
07-21-2016, 05:03 PM
My ultimate goal: from my form - Take today's date and put it in the next available cell in column A and the value of the variable "Howmany" next to it in column B
OMG this should be so simple but I can't get it to write on the proper worksheet. Here is my code for writing the variable. (figured I could do "offset" and "DATE" somehow for the date part.)
This gets runtime error 1004 no cells found:
Dim r As Range
Sheets("Numbers").Activate
Set r = Intersect(ActiveSheet.UsedRange, Range("A:A")).Cells.SpecialCells(xlCellTypeBlanks)
r(1) = Howmany
(yada yada ... put date in column A somehow)
OMG this should be so simple but I can't get it to write on the proper worksheet. Here is my code for writing the variable. (figured I could do "offset" and "DATE" somehow for the date part.)
This gets runtime error 1004 no cells found:
Dim r As Range
Sheets("Numbers").Activate
Set r = Intersect(ActiveSheet.UsedRange, Range("A:A")).Cells.SpecialCells(xlCellTypeBlanks)
r(1) = Howmany
(yada yada ... put date in column A somehow)