is it there a way to determine if a column is frozen using vba?

tia,
dk

frozen? what does that mean?

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"dk" <(E-Mail Removed)> wrote in message
news:9C5ECC56-1F59-4689-A5A3-(E-Mail Removed)...
> is it there a way to determine if a column is frozen using vba?
>
> tia,
> dk

"Bob Phillips" wrote:

> frozen? what does that mean?
>
> --
> HTH
>
> Bob Phillips
>
> (replace somewhere in email address with gmail if mailing direct)
>
> "dk" <(E-Mail Removed)> wrote in message
> news:9C5ECC56-1F59-4689-A5A3-(E-Mail Removed)...
> > is it there a way to determine if a column is frozen using vba?
> >
> > tia,
> > dk

frozen panes


If ActiveWindow.Panes.Count = 1 then panes are not frozen


>
>
>

And how does that relate to columns? You want if the columns are inside the
frozen area? What if part of them are?

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"dk" <(E-Mail Removed)> wrote in message
news95964C8-4CAD-447B-B9B3-(E-Mail Removed)...
>
>
> "Bob Phillips" wrote:
>
> > frozen? what does that mean?
> >
> > --
> > HTH
> >
> > Bob Phillips
> >
> > (replace somewhere in email address with gmail if mailing direct)
> >
> > "dk" <(E-Mail Removed)> wrote in message
> > news:9C5ECC56-1F59-4689-A5A3-(E-Mail Removed)...
> > > is it there a way to determine if a column is frozen using vba?
> > >
> > > tia,
> > > dk
>
> frozen panes
>
>
> If ActiveWindow.Panes.Count = 1 then panes are not frozen
>
>
> >
> >
> >

This should get you started :

Private Function ColumnInFrozenPane(TestColumn As Long, argWnd As Window) As
Boolean
Dim i As Long

ColumnInFrozenPane = False

With argWnd
If .FreezePanes = True And .Panes.Count > 1 Then
For i = 1 To .Panes.Count
If .Panes(i).ScrollColumn > 1 Then
ColumnInFrozenPane = (TestColumn < .Panes(i).ScrollColumn)
Exit Function
End If
Next
End If
End With

End Function

You can expand it to include row instead and allow for more than single
column/row.

NickHK

"dk" <(E-Mail Removed)> wrote in message
news95964C8-4CAD-447B-B9B3-(E-Mail Removed)...
>
>
> "Bob Phillips" wrote:
>
> > frozen? what does that mean?
> >
> > --
> > HTH
> >
> > Bob Phillips
> >
> > (replace somewhere in email address with gmail if mailing direct)
> >
> > "dk" <(E-Mail Removed)> wrote in message
> > news:9C5ECC56-1F59-4689-A5A3-(E-Mail Removed)...
> > > is it there a way to determine if a column is frozen using vba?
> > >
> > > tia,
> > > dk
>
> frozen panes
>
>
> If ActiveWindow.Panes.Count = 1 then panes are not frozen
>
>
> >
> >
> >