I had to update the screen before I used FreezePanes.
My code snippet is:
' !!NOTE: Screen has to be updated to place
' the freeze in the correct location!
' restore screen updates and postion screen to top left of data
Application.ScreenUpdating = True
Range("A8").Activate
ActiveWindow.FreezePanes = True