Home |
Search |
Today's Posts |
#4
![]() |
|||
|
|||
![]()
With "price chart template.xls" already open...
Option Explicit sub Auto_open dim tempWks as worksheet set tempwks = nothing on error resume next set tempwks = workbooks("price chart template.xls").worksheets(1) on error goto 0 if tempwks is nothing then msgbox "Please open the template workbook!" else thisworkbook.worksheets(1).range("a1:b2").copy _ destination:=tempwks.range("a1") end if thisworkbook.close savechanges:=false end sub ========= But this means you have to do something special when you want to open this file -- just for normal changes. You can open the workbook with macros disabled or hold down the shift key while you're opening this workbook. David P. wrote: I am hoping to create a macro that upon opening a file it will do the following: 1)Copy A1:B:2 (just as an example; also - there is only one worksheet in this file) 2)Activate Workbook "Price Chart Template" (only 1 sheet here too) 3)Paste on A:1 4)Go back to the original document and close it without saving (this is where I'm wondering if code can allow to close the document it is written in???) Thank you. -- David P. -- Dave Peterson |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Run macro when opening workbook | Excel Discussion (Misc queries) | |||
Opening a file in a macro (network) | Excel Discussion (Misc queries) | |||
macro to close excel | Excel Discussion (Misc queries) | |||
Macro warning (upon opening) | Excel Discussion (Misc queries) | |||
After deleting a macro, I still get the pop-up when opening file | Excel Worksheet Functions |