Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Challenge
Hi all
I am seriously hoping someone can help. I have created a Userform, which accesses a hidden sheet and dependin on the selection runs a formula from the sheet and opens a relevan spreadsheet... But........... I have now adapted this to open another set of files, but these ar .doc and therefore won't open. I have used the below to open Excel files and works fine. I am hopin someone can help adapt it to a word document. Thanks guys David Private Sub CmdOPEN_Click() Worksheets("SHEET1").Range("a2").Value = cm1 megafile = Worksheets("SHEET1").Range("A1").Value Windows("OPEN INFO.xls").Visible = False Application.ScreenUpdating = True Workbooks.Open megafile, False, True Unload Me End Su -- Message posted from http://www.ExcelForum.com |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Challenge
Hi David:
Are you wanting to drive word from Excel, just open word files or convert it to Word? To open word you can just use Shell, Shell ("winword.exe") Depending on what you want to do, I'll answer more in depth. "DB100 " wrote in message ... Hi all I am seriously hoping someone can help. I have created a Userform, which accesses a hidden sheet and depending on the selection runs a formula from the sheet and opens a relevant spreadsheet... But........... I have now adapted this to open another set of files, but these are doc and therefore won't open. I have used the below to open Excel files and works fine. I am hoping someone can help adapt it to a word document. Thanks guys David Private Sub CmdOPEN_Click() Worksheets("SHEET1").Range("a2").Value = cm1 megafile = Worksheets("SHEET1").Range("A1").Value Windows("OPEN INFO.xls").Visible = False Application.ScreenUpdating = True Workbooks.Open megafile, False, True Unload Me End Sub --- Message posted from http://www.ExcelForum.com/ |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Challenge for Anyone to take it on. | Excel Worksheet Functions | |||
A challenge | New Users to Excel | |||
Here's a challenge... | Excel Worksheet Functions | |||
Challenge | Excel Worksheet Functions | |||
A Challenge | Excel Discussion (Misc queries) |