ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   determine if column is frozen with vba (https://www.excelbanter.com/excel-programming/374402-determine-if-column-frozen-vba.html)

dk

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

tia,
dk

Bob Phillips

determine if column is frozen with vba
 
frozen? what does that mean?

--
HTH

Bob Phillips

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

"dk" wrote in message
...
is it there a way to determine if a column is frozen using vba?

tia,
dk




dk

determine if column is frozen with vba
 


"Bob Phillips" wrote:

frozen? what does that mean?

--
HTH

Bob Phillips

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

"dk" wrote in message
...
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






Bob Phillips

determine if column is frozen with vba
 
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" wrote in message
...


"Bob Phillips" wrote:

frozen? what does that mean?

--
HTH

Bob Phillips

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

"dk" wrote in message
...
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








NickHK

determine if column is frozen with vba
 
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" wrote in message
...


"Bob Phillips" wrote:

frozen? what does that mean?

--
HTH

Bob Phillips

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

"dk" wrote in message
...
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









All times are GMT +1. The time now is 09:05 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com