Søge funktion i VBA

Hej

Jeg er ved at bygge en søgefunktion ind i min macro og vil gerne kunne opsamle hvor mange celler i området der indeholder det der søges efter og derefter skal man kunne klikke sig frem og tilbage mellem de fundne celler (via en userform).

Jeg har styr på det meste af det men har nogle enkente spørgsmål og vil gerne høde hvis andre har gode ideer til Sogefunktioner fra en userform i et underliggende ark indeholdende data som vises i en formular.

Jeg har følgende macro som jeg gerne vil kunne opsamle alle de fundne celler og derefter via en userform kunne klikke mig frem og tilbage mellem de fundne celler.

Sub Makro1()

Sog = "abc"

Columns("A:A").Find(What:=Sog, After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
End Sub

Er der nogle der ved hvordan dette gøres?