Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Workbook Open Macro
This below macro used to work in the older version of excel. It does not work now. Any help is appreciated!! Thanks Sub OpenPrintMacro() Dim Fname For i = 1 to 5 Fname = Worksheets("FileNames").Range("a"+i).value Workbooks.open.filename:= "C:\My Documents\Files\" & Fname ActiveWindow.selectedsheets.Printout copies:=1 ActiveWorkbook.close Next i End Sub WorkSheet FileNames Range a1 = Test1.xls Range a2 = Test2.xls Range a3 = Test3.xls so on and so forth............. -- natarajr ------------------------------------------------------------------------ natarajr's Profile: http://www.excelforum.com/member.php...o&userid=27807 View this thread: http://www.excelforum.com/showthread...hreadid=473174 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro in 2nd Open workbook | Excel Discussion (Misc queries) | |||
Run a macro when I open a workbook | Excel Discussion (Misc queries) | |||
How to Run Macro in open workbook/s | Excel Discussion (Misc queries) | |||
Run macro in one open workbook only | Excel Programming | |||
run macro on only one open workbook | Excel Programming |