If i select a Cell, how can i run a macro, rather than having a button?

Regards

Corey

Right click on your sheet tab and paste this into the code window

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "Hello"
End If
End Sub

modify to suit your needs.

"Corey" wrote:

> If i select a Cell, how can i run a macro, rather than having a button?
>
> Regards
>
> Corey
>
>
>

Through a SheetSelectionChange event:
1) Create a Workbook_SheetSelectionChange macro in the code section of
ThisWorkbook
2) Specify the cells that should trigger a macro

Example (macro is triggered when you select A3):

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)
If Target.Address(0, 0) = "A3" Then
MsgBox "Hi, I'm cell " & Target.Address
End If
End Sub

Cheers,

Joerg






"Corey" <(E-Mail Removed)> wrote in message
news:OSkuoLI$(E-Mail Removed)...
> If i select a Cell, how can i run a macro, rather than having a button?
>
> Regards
>
> Corey
>
>