Resetting Find
Point the code to a dummy worksheet that contains no event code.
With Sheets("Dummy").Range("A1")
The Find settings are saved with the workbook.
Gord Dibben MS Excel MVP
On Sat, 07 Feb 2009 14:25:47 +1300, kirkm wrote:
I've found macros in my worksheet are setting Excels Find
to non default parameters.
I fixed this by the following as the workbook closes
Dim Rng As Range
With Range("A1")
Set Rng = .Find(What:="", after:=.Range("A1"), LookIn:=xlFormulas,
LookAt:=xlPart, searchorder:=xlByColumns, searchdirection:=xlNext,
MatchCase:=False, matchbyte:=False)
End With
It works but has a bad side effect. Column A uses
Private Sub Worksheet_SelectionChange to do stuff and this
is being activated each time it's run.
I suspect setting Range to something other than A1 (that does
nothing), it might fix it. But is that a good solution, or is a
completely different approach called for?
Thanks - Kirk
|