HI
I need to run a macro which will find appriopriate entries of text in a document,as given below. I've got it working fine with wildcards. The only problems is the "Find All" option. I want to select all instances of this text in the document - this can be done straight from the Edit/find menu - but I cannot find any way to do this in the macro. I need to do this so that I can then copy the data into Exel.

Private Sub CmdOK_Click()
UserForm1.Hide

Selection.Find.ClearFormatting
With Selection.Find
.Text = "??/01/2007 ???????? terryja1"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
.Execute
End With
Selection.Copy
Selection.Copy
finalspread.Sheets("Bhad").Select
finalspread.ActiveSheet.Paste

HELP!