[AccessD] Freeze Panes

James:

THAT DONE IT!!! 

Thank you.  

Rocky

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of James Barash
Sent: Friday, March 02, 2007 3:09 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Freeze Panes

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




 	
	


--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com

--
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.446 / Virus Database: 268.18.5/707 - Release Date: 3/1/2007
2:43 PM