Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 151
Default Once-only Macro

Hi

I have a template .xlt with code in (or a macro called from) the workbook
open event to format various cells.
The template is then saved as a .xls
How can I removed the workbook open event code when the .xlt is saved as .xls

Thanks
Libby
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,272
Default Once-only Macro

Hi Libby,

Add this code to the template.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim vbMod As Object

Set vbMod = ThisWorkbook.VBProject.VBComponents("THisWorkbook" )
With vbMod.CodeModule
.DeleteLines 1, .CountOfLines
End With

End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code


But I have to ask. why not format the cells in the template, and do away
with the event code?

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Libby" wrote in message
...
Hi

I have a template .xlt with code in (or a macro called from) the workbook
open event to format various cells.
The template is then saved as a .xls
How can I removed the workbook open event code when the .xlt is saved as

..xls

Thanks
Libby



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,071
Default Once-only Macro

Why not format the cells before saving the template file? That way
there is no need for any code!

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions

In article ,
says...
Hi

I have a template .xlt with code in (or a macro called from) the workbook
open event to format various cells.
The template is then saved as a .xls
How can I removed the workbook open event code when the .xlt is saved as .xls

Thanks
Libby

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Macro recorded... tabs & file names changed, macro hangs Steve Excel Worksheet Functions 3 October 30th 09 11:41 AM
Macro Help Needed - Excel 2007 - Print Macro with Auto Sort Gavin Excel Worksheet Functions 0 May 17th 07 01:20 PM
how to count/sum by function/macro to get the number of record to do copy/paste in macro tango Excel Programming 1 October 15th 04 01:16 PM
macro to delete entire rows when column A is blank ...a quick macro vikram Excel Programming 4 May 3rd 04 08:45 PM
Start Macro / Stop Macro / Restart Macro Pete[_13_] Excel Programming 2 November 21st 03 05:04 PM


All times are GMT +1. The time now is 11:11 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"