VBA sæt aktiv celle anden end formlens celle?

Hej,

Hvordan sætter man den aktive celle i Excel, til at være noget andet end formlens celle?

Det er nedenstående funktion der skulle returnere den første synlige celle over celle "a368" (som når det fungerer, naturligvis skal erstattes med inputCelle). Men den returnerer istedet den første synlige celle over formlens position.


Public Function SynligeCelleOver(inputCelle As String)

    ActiveSheet.Range("a368").Select
    ActiveSheet.Range("a368").Activate
   
    ActiveCell.Offset(1, 0).Select

    Do
      ActiveCell.Offset(1, 0).Select
    Loop While ActiveCell.EntireRow.Hidden = True

    SynligeCelleOver = ActiveCell.Address
   
End Function

Funktionen returnerer $M$334, hvor den vel burde have returneret $A$334.

M.v.h.
Frederik