No Cell Selected

  • Thread starter Thread starter Brent E
  • Start date Start date
B

Brent E

Currently, if I open a spreadsheet, the file defaults to the last cell or
range selected prior to the last save. Is there a VBA command that deselects
any cell so when a file is opened, no cell is selected until the user clicks
on something?

Thanks,
 
Hi Brent

I don't think you can have a situation with no cell selected, but the
following code would put the cursor in cell A1 of Sheet1
Private Sub Workbook_Open()
ThisWorkbook.Sheets("Sheet1").Select
Range("A1").Activate
End Sub

Copy above code
Alt+F11 to invoke VB Editor
Control+F1 to open Project Explorer
Double click on ThisWorkbook
Paste code into white pane
Alt+F11 to return to Excel.

Save the workbook.
When it is opened next time cursor will be on sheet1 cell A1.
Change to suit
 
Excel will always have a cell selected somewhere.

Which one is up to you and could be coded to open with a particular sheet
and cell selected.


Private Sub Workbook_Open()
Sheets("Sheet1").Select
Range("A1").Select
End Sub


Gord Dibben MS Excel MVP
 
Currently, if I open a spreadsheet, the file defaults to the last cell or
range selected prior to the last save. Is there a VBA command that deselects
any cell so when a file is opened, no cell is selected until the user clicks
on something?

Thanks,
Click to expand...

If you save while a shape is selected then it reopens with the shape
still selected.
However ActiveCell.Address returns the address of the active cell
prior to selecting the shape.

Ken Johnson
 
Hi,

I have to say this is not a standard request, so here is a non standard
solution.
1. Place an auto shape on a sheet
2. Reduce its size as much as possible.
3. Add code such as the following to the Workbook_Open event

Sheet(1).Activate
ActiveSheet.Shapes("Oval 9").Select

And don't anyone respond with how hokey this is, I know it is. But the
basic idea is you can select anything other than a cell and you aren't
selecting a cell!
 
Back
Top