ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Programmatically open XLT for edit and stop macros (https://www.excelbanter.com/excel-programming/394632-programmatically-open-xlt-edit-stop-macros.html)

XP

Programmatically open XLT for edit and stop macros
 
Using Office 2003 and Windows XP;

I have a template file that I need to open for editing using automation
(late binding) and in doing so, I want to programmatically prevent macros
from firing. My code so far:

Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
Set oWB = oXL.Workbooks.Open(sFullName)

Can someone please post example code and/or modify my code to achieve this?

Thanks much in advance.

Tom Ogilvy

Programmatically open XLT for edit and stop macros
 
Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
oxl.EnableEvents = False
Set oWB = oXL.Workbooks.Open(FileName:=sFullName, _
Editable:=True)

--
Regards,
Tom Ogilvy

"XP" wrote:

Using Office 2003 and Windows XP;

I have a template file that I need to open for editing using automation
(late binding) and in doing so, I want to programmatically prevent macros
from firing. My code so far:

Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
Set oWB = oXL.Workbooks.Open(sFullName)

Can someone please post example code and/or modify my code to achieve this?

Thanks much in advance.


Peter T

Programmatically open XLT for edit and stop macros
 
Hi Tom,

It's odd but that doesn't work for me with automation. Events are disabled
OK but then are re-enabled when opening the wb allowing the wb's Open event
to run.

Regards,
Peter T



"Tom Ogilvy" wrote in message
...
Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
oxl.EnableEvents = False
Set oWB = oXL.Workbooks.Open(FileName:=sFullName, _
Editable:=True)

--
Regards,
Tom Ogilvy

"XP" wrote:

Using Office 2003 and Windows XP;

I have a template file that I need to open for editing using automation
(late binding) and in doing so, I want to programmatically prevent

macros
from firing. My code so far:

Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
Set oWB = oXL.Workbooks.Open(sFullName)

Can someone please post example code and/or modify my code to achieve

this?

Thanks much in advance.




Tom Ogilvy

Programmatically open XLT for edit and stop macros
 
That would be the case in xl2000 and earlier as I recall. In xl2002 and
later I believe it was fixed.

Are you using one of these earlier versions?

--
Regards,
Tom Ogilvy


"Peter T" wrote:

Hi Tom,

It's odd but that doesn't work for me with automation. Events are disabled
OK but then are re-enabled when opening the wb allowing the wb's Open event
to run.

Regards,
Peter T



"Tom Ogilvy" wrote in message
...
Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
oxl.EnableEvents = False
Set oWB = oXL.Workbooks.Open(FileName:=sFullName, _
Editable:=True)

--
Regards,
Tom Ogilvy

"XP" wrote:

Using Office 2003 and Windows XP;

I have a template file that I need to open for editing using automation
(late binding) and in doing so, I want to programmatically prevent

macros
from firing. My code so far:

Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
Set oWB = oXL.Workbooks.Open(sFullName)

Can someone please post example code and/or modify my code to achieve

this?

Thanks much in advance.





Peter T

Programmatically open XLT for edit and stop macros
 
That explains it, I was using XL2000.

FWIW, even in XL2000 disabling events within own instance does persist and
prevents a wb's open event firing, but not with automation.

Regards,
Peter T

"Tom Ogilvy" wrote in message
...
That would be the case in xl2000 and earlier as I recall. In xl2002 and
later I believe it was fixed.

Are you using one of these earlier versions?

--
Regards,
Tom Ogilvy


"Peter T" wrote:

Hi Tom,

It's odd but that doesn't work for me with automation. Events are

disabled
OK but then are re-enabled when opening the wb allowing the wb's Open

event
to run.

Regards,
Peter T



"Tom Ogilvy" wrote in message
...
Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
oxl.EnableEvents = False
Set oWB = oXL.Workbooks.Open(FileName:=sFullName, _
Editable:=True)

--
Regards,
Tom Ogilvy

"XP" wrote:

Using Office 2003 and Windows XP;

I have a template file that I need to open for editing using

automation
(late binding) and in doing so, I want to programmatically prevent

macros
from firing. My code so far:

Dim oXL as Object
Dim oWB as Object
Dim sFullName = "fully qualified path to my file.xlt"
Set oXL = CreateObject("Excel.Application")
Set oWB = oXL.Workbooks.Open(sFullName)

Can someone please post example code and/or modify my code to

achieve
this?

Thanks much in advance.








All times are GMT +1. The time now is 02:31 PM.

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