set focus to a particular cell

[y481184]

I think this is a pretty amateur question, but I am writing some VBA, and this is what is going on:

I display a form which asks the user to insert the desired number of invoices. After inserting the number, I would like a the cursor to appear in a textbox labeled "Invoice Date" (ref A28). Additionally, I would like the user to only have to key in the day and month. Therefore, I would like to have the cell be defaulted to / /2004. Can you help?

 

[Blue Dragon]

I'm slightly confused. Do you want the user to enter the date into a text box or into a cell? You state both on your post.

If it's a text box on the form - then instead of using a text box to enter the date, then I'd use the calendar on the form instead - much easier to use (and looks nice too).

 

[y481184]

Sorry about that, I use a textbox to ask the user how many invoices they would like to enter. I would then like to transfer the control to a cell on the worksheet which contains the date of the invoice. So, I would like the cursor to be active in the cell receiving the date

 

[Cbrine]

Activebook.range("A1").activate
Will activate the cell A1. You might need to use the full reference
ActiveWorkbook.worksheets("Sheet1").range("A1").activate depending on focus.

 

[Blue Dragon]

In which case use

Range("B3").Select

Or whatever cell it is.
Possibly with a Sheets statement if needed.

 

[y481184]

Is there a way to make the cursor actually blink automatically within the cell rather than just select the cell? When I do range.select, this will erase the default value in the cell which is set to " / /2004." I would like to be able to begin inserting the month automatically without having to use the mouse to insert my cursor at the beginning of the cell.

 

[Blue Dragon]

How about using the calendar option on your form like I suggested earlier, but have that enter the date into that specific cell.
You could also ensure that the form can't be submitted until a date has been selected.

 

[y481184]

I think that might get kind of cumbersome if the user has many invoices to enter. They would like to see the dates appear as they enter them line-by-line on the report.

 

[Blue Dragon]

Unfortunately I am therefore out of ideas (for now). Sorry.

 

[y481184]

Could you please just tell me how I could make a cell default to " / /2004"? I really need the user to be able to type the date quickly without having to use the mouse. Is there any way to do this, with or without VBA?