Return Freeze panes location

trevorc · #1 09-17-2018, 03:53 PM

Hi All, another quandary. Is it possible to return the location of were the freeze panes was set. E.G. If I select say "D4" and freeze the panes, can I use VB to get that location so I can do something different than if the freeze panes was at say "G5".
What I'm trying to do is set the turn on/off the freeze panes via a button click, but want to always keep the top 2 rows frozen. the 2 states would be freeze panes at "3:3" or freeze panes "H4"

Here's my code so far...

Code:

Sub Freeze_Panes()
       curcel = ActiveCell.Address(0, 0)
    If ActiveWindow.FreezePanes = True Then
       ActiveWindow.FreezePanes = False
       ActiveSheet.Shapes("FP").TextFrame.Characters.Text = "Freeze" & vbCrLf & "Pane"
    Else
       Range("H4").Select
       ActiveWindow.FreezePanes = True
       ActiveSheet.Shapes("FP").TextFrame.Characters.Text = "Un-Freze" & vbCrLf & "Pane"
   End If
       Range(curcel).Select                 'select original cell
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Default location for the Office Document Cache Server drafts location.	dianahbr	Office	0	03-02-2018 12:37 PM
Return to previous location in Word 2016	stevelsd	Word	2	09-30-2017 06:18 AM
How to Customize Outlook Panes	Steve_B	Outlook	0	07-08-2014 09:05 AM
Freeze more than just the top row, or first column	Gary Drumm	Excel	4	07-23-2013 11:34 AM
Outlook 2007 win7x32 Archive location/backup location question	michael.monaco	Outlook	0	11-19-2012 02:07 PM