Is it possible to have the text in a cell launch a macro when clicked, or
must I use an object?

"LDanix" wrote in message
...
Is it possible to have the text in a cell launch a macro when clicked, or
must I use an object?

I think so. Isn't there an event that gets called when something has been
entered into a cell?

/Fredrik

Hi, you could use procedures like this. It will pass the cell address,
which you could then test and run macros accordingly.

Worksheet_SelectionChange(ByVal Target As Excel.Range, Cancel As
Boolean)
Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As
Boolean)

HTH--Lonnie M.

I think this is it:
Worksheet_Change(ByVal target As Range)

Where do I enter all this?

"Lonnie M." wrote:

Hi, you could use procedures like this. It will pass the cell address,
which you could then test and run macros accordingly.

Worksheet_SelectionChange(ByVal Target As Excel.Range, Cancel As
Boolean)
Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As
Boolean)

HTH--Lonnie M.

"Lonnie M." wrote in message
oups.com...
Hi, you could use procedures like this. It will pass the cell address,
which you could then test and run macros accordingly.


It passes the cell object, not its address. You can extract the value from
the object, its row, it's parent, its column, or even its address.

An example

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error GoTo ws_exit:
Application.EnableEvents = False
If Target.Address = "$F$5" Then
Call myMacro
End If

ws_exit:
Application.EnableEvents = True
End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.


--

HTH

RP
(remove nothere from the email address if mailing direct)


"LDanix" wrote in message
...
Where do I enter all this?

"Lonnie M." wrote:

Hi, you could use procedures like this. It will pass the cell address,
which you could then test and run macros accordingly.

Worksheet_SelectionChange(ByVal Target As Excel.Range, Cancel As
Boolean)
Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As
Boolean)

HTH--Lonnie M.

Which parts of the code do I need to enter the data from my sheet rather than
what is currently there?

"Bob Phillips" wrote:

An example

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error GoTo ws_exit:
Application.EnableEvents = False
If Target.Address = "$F$5" Then
Call myMacro
End If

ws_exit:
Application.EnableEvents = True
End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.


--

HTH

RP
(remove nothere from the email address if mailing direct)


"LDanix" wrote in message
...
Where do I enter all this?

"Lonnie M." wrote:

Hi, you could use procedures like this. It will pass the cell address,
which you could then test and run macros accordingly.

Worksheet_SelectionChange(ByVal Target As Excel.Range, Cancel As
Boolean)
Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As
Boolean)

HTH--Lonnie M.

the code was provided as a sample - you would have to alter it to meet your
needs. But the code provided goes in the sheet module as explained by Bob.

Also see Chip Pearson's page on events
http://www.cpearson.com/excel/events.htm

--
Regards,
Tom Ogilvy

"Bob Phillips" wrote in message
...
An example

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error GoTo ws_exit:
Application.EnableEvents = False
If Target.Address = "$F$5" Then
Call myMacro
End If

ws_exit:
Application.EnableEvents = True
End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.


--

HTH

RP
(remove nothere from the email address if mailing direct)


"LDanix" wrote in message
...
Where do I enter all this?

"Lonnie M." wrote:

Hi, you could use procedures like this. It will pass the cell address,
which you could then test and run macros accordingly.

Worksheet_SelectionChange(ByVal Target As Excel.Range, Cancel As
Boolean)
Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As
Boolean)

HTH--Lonnie M.

It was provided as an example as Tom said, but it was meant as a fairly
close example, as you said you wanted to launch a macro by clicking a cell.
All you need to do is insert it in the worksheet, as described, and change
the statement
Call myMacro
to a call to the macro that you have written, and change $F$5 to the cell
you want as you click cell (with the $ signs - very important).

--

HTH

RP
(remove nothere from the email address if mailing direct)


"LDanix" wrote in message
...
Which parts of the code do I need to enter the data from my sheet rather
than
what is currently there?

"Bob Phillips" wrote:

An example

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error GoTo ws_exit:
Application.EnableEvents = False
If Target.Address = "$F$5" Then
Call myMacro
End If

ws_exit:
Application.EnableEvents = True
End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.


--

HTH

RP
(remove nothere from the email address if mailing direct)


"LDanix" wrote in message
...
Where do I enter all this?

"Lonnie M." wrote:

Hi, you could use procedures like this. It will pass the cell
address,
which you could then test and run macros accordingly.

Worksheet_SelectionChange(ByVal Target As Excel.Range, Cancel As
Boolean)
Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As
Boolean)

HTH--Lonnie M.