James Barash
James at fcidms.com
Fri Mar 2 17:08:49 CST 2007
Rocky:
I just noticed this thread so it you're still looking for a solution try
this:
objXLApp.ActiveWindow.FreezePanes = True
FreezePanes is a property of an Excel window which is part of the
Application, not the Worksheet.
Hope this helps
James Barash
-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at
Beach Access Software
Sent: Friday, March 02, 2007 5:47 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Freeze Panes
Jim:
If I do it:
objXLS.Rows("2:2").Select
objXLS.ActiveSheet.FreezePanes = True
Or
objXLS.Rows("2:2").Select
objXLS.ActiveWindow.FreezePanes = True
It won't compile.
The objects are set:
Dim objXLApp As Excel.Application
Dim objXLS As Excel.Worksheet
Set objXLApp = New Excel.Application
Set objXLS = objXLApp.ActiveSheet
And some other formatting works OK.
Any idea what I'm doing wrong?
Thanks
Rocky