Hi All...........
Is there a way to have a SelectionChange macro set up so it will run the
first time it's called upon, and as a last item, disable itself to never run
again unless "reset"?

TIA
Vaya con Dios,
Chuck, CABGx3

You could have the macro, as the first step, check what ever unique
condition it imposes and if it appears it has run, then exit.

It will still run, but will exit without doing anything.

--
Tom Ogilvy


"CLR" wrote:

Hi All...........
Is there a way to have a SelectionChange macro set up so it will run the
first time it's called upon, and as a last item, disable itself to never run
again unless "reset"?

TIA
Vaya con Dios,
Chuck, CABGx3

There are probably a number of ways, but I would get it to create a Name
(hidden) with a particular reference when it runs. Then, at the start of the
SelectionChange event you could look at the name to see the value and run it
or not based on that.

Jeff

"CLR" wrote in message
...
Hi All...........
Is there a way to have a SelectionChange macro set up so it will run the
first time it's called upon, and as a last item, disable itself to never
run
again unless "reset"?

TIA
Vaya con Dios,
Chuck, CABGx3

Chuck,

Try something like


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Res As Variant
On Error Resume Next
Res = ThisWorkbook.Names("RunOnce").Value
If IsEmpty(Res) Then
MsgBox "Run Once Code"
End If
ThisWorkbook.Names.Add "RunOnce", "TRUE"

End Sub

You can reset it by deleting the name "RunOnce"

--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"CLR" wrote in message
...
Hi All...........
Is there a way to have a SelectionChange macro set up so it
will run the
first time it's called upon, and as a last item, disable itself
to never run
again unless "reset"?

TIA
Vaya con Dios,
Chuck, CABGx3

Cool........that should work for my immediate requirement.........

Thanks, Tom

Vaya con Dios,
Chuck, CABGx3




"Tom Ogilvy" wrote:

You could have the macro, as the first step, check what ever unique
condition it imposes and if it appears it has run, then exit.

It will still run, but will exit without doing anything.

--
Tom Ogilvy


"CLR" wrote:

Hi All...........
Is there a way to have a SelectionChange macro set up so it will run the
first time it's called upon, and as a last item, disable itself to never run
again unless "reset"?

TIA
Vaya con Dios,
Chuck, CABGx3

Ah-ha..........increased security......

Thanks, Jeff

Vaya con Dios,
Chuck, CABGx3



"Jeff Standen" wrote:

There are probably a number of ways, but I would get it to create a Name
(hidden) with a particular reference when it runs. Then, at the start of the
SelectionChange event you could look at the name to see the value and run it
or not based on that.

Jeff

"CLR" wrote in message
...
Hi All...........
Is there a way to have a SelectionChange macro set up so it will run the
first time it's called upon, and as a last item, disable itself to never
run
again unless "reset"?

TIA
Vaya con Dios,
Chuck, CABGx3

Hey now....THAT is some cool.........Thanks Chip.

Vaya con Dios,
Chuck, CABGx3



"Chip Pearson" wrote:

Chuck,

Try something like


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Res As Variant
On Error Resume Next
Res = ThisWorkbook.Names("RunOnce").Value
If IsEmpty(Res) Then
MsgBox "Run Once Code"
End If
ThisWorkbook.Names.Add "RunOnce", "TRUE"

End Sub

You can reset it by deleting the name "RunOnce"

--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"CLR" wrote in message
...
Hi All...........
Is there a way to have a SelectionChange macro set up so it
will run the
first time it's called upon, and as a last item, disable itself
to never run
again unless "reset"?

TIA
Vaya con Dios,
Chuck, CABGx3