freeze panes from vba
I've always selected the sheet first
removed the freeze panes
selected A1 to make sure it's visible
select the cell that I really want to use
and reapply the freeze panes.
Dim wks As Worksheet
Set wks = Worksheets("Sheet1")
With wks
.Parent.Activate 'correct workbook
.Select 'correct sheet
ActiveWindow.FreezePanes = False
.Range("A1").Select
.Range("G2").Select
ActiveWindow.FreezePanes = True
End With
(this is from within excel.)
Keith G Hicks wrote:
This works in a macro inside Excel
Range("G2").Select
ActiveWindow.FreezePanes = True
It does exactly what I'd expect. It puts a horizontal freeze line between
row 1 and row 2 and a vertical freeze line between column F and column G.
But I need to use from MS Access vba code so I'm doing this:
objExcelSht.Range("G2").Select
objExcelApp.ActiveWindow.FreezePanes = True
It does freeze but not the same way. It only puts in a vertical freeze line
between columns F and G. There is no horizontal freeze line.
What do I hvae to do from vba in Access to get the same results?
Thanks,
Keith
--
Dave Peterson
|