Hjælp til auto opdatering

Jeg har fået lavet en makro som skjuler kolonner for mig og den virker som den skal.

Jeg ønsker dog en ekstra funktion til den, som jeg har brug for hjælp til.

pt. ser min makro sådan her ud:

Sub HideColumn()
Range("A1:T1").EntireColumn.Hidden = False
For x = 1 To 20
If Cells(4, x) = False Then
Columns(x).EntireColumn.Hidden = True
End If
Next
End Sub

Det jeg gerne vil have den til at gøre inden den skjuler kolonner, det er at den opdatere alle celler, da den henter data ind fra et andet Excel ark og jeg vil gerne være sikker på at den arbejder med den nyeste data.

Håber i kan hjælpe :)