makro der deaktiverer en anden makro

Jeg har en kode som kører i et ark så hver gang jeg skriver et tal i en celle i kolonne A så springer excel til den første celle som netop har denne værdi.

Dette virker super godt, men jeg importerer nogle data til dette ark fra en anden fil ved at overskrive et navngivet område.
Dette gøres via en makro som åbner en gammel fil og indlæser dataene i et nyt ark.

Men de 2 koder ramler sammen op jeg får en fejl iden nedenstående kode (fordi jeg ændrer tal i kolonne A ved importen.)

DERFOR VIL JEG HØRE OM DER ER EN SLAGS KODE DER KAN SÆTTE EN ANDEN MAKRO UD AF DRIFT (se linket nedenfor) MIDLERTIDIGT, SÅ LÆNGE SELVE MIN IMPORT MAKRO KØRER. EFTERFØLGENDE SKAL MAKROEN VIRKE IGEN.

http://www.eksperten.dk/spm/770772



Dim Data As Variant
Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("A:A")) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    For i = 1 To UBound(Data)
        If Data(i, 1) = Target Then
            Cells(i, 1).Select
            Exit For
        End If
    Next
    If i >= UBound(Data) Then Target.Select
    Target.Value = Data(Target.Row, 1)
    Application.EnableEvents = True
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Data = Range(Cells(1, 1), Cells(65500, 1).End(xlUp))
End Sub