Hello,

I would appreciate very much some help on setting up a VBA code that will simultaneously do the following:
- activate sheet 1
- select cell A1 in each of the sheets when they are activated (i.e. when I click on them)
when I open my excel file that contains several sheets.

Since I am not so familiar with programming, I googled a bit and found the following solutions for EACH of my requests:
1. How to activate sheet 1:
Private Sub Workbook_Open()
Sheet1.Range("A1").Select
End Sub
2. How to select A1 in each of the sheets when they are activated:
For Each WSheet In Worksheets
WSheet.Activate
Range("A1").Select
Next
End Sub

My concern is now how to combine these two codes into one.

Looking forward to receiving an efficient solution.


Brgs
Amy