Identifying the freeze panes position in a sheet using VBA

[jt006]

I am trying to design a macro which transfers the freeze panes setting from one worksheet to another.

To do this I would like to identify the position at which panes are frozen in the original sheet, then go to the destination sheet, activate the same cell and set freezepanes to true.

Unfortunately, as the freezepanes property in VBA is a boolean, I can't seem to find a way of identifying the position at which panes have been frozen in the original sheet. My friend swears he's done this before but can't remember how.

Can anybody out there help me?

Thanks

JT

 

[VoG]

Welcome to the board

See if this helps:

Sub test()
Dim i As Integer
For i = 1 To ActiveWindow.Panes.Count
    MsgBox "Pane " & i & " " & ActiveWindow.Panes(i).VisibleRange.Address
Next i
End Sub

 

[jt006]

Thanks!

Thanks for that, I'd thought about doing it in a similar way, but as I'm quite new to VBA I was stuggling to get the language right.

I haven't incorporated this into my model yet but i'll let you know how it goes when I do.