![]() |
Problem with hidden file
I an using Windows 98 and Excel 2000.
Following are the first few lines of code of a program that runs at night unattended. If "quotes.xls" happens to have been hidden when Excel was last closed then line 3 opens it as a hidden file and this program stalls when the code ( line 4) tries to activate one of the several sheets in the file .. Application.DisplayAlerts = False Application.AskToUpdateLinks = False Workbooks.Open "d:/allyears/quotes.xls" Worksheets("Current Quotes").Activate I have tried to follow the "open" instruction with every version of "visible" I can think of without success. Can someone help me with this problem? Thanks. Jim |
Problem with hidden file
Hi Jim
how about adding the line Windows("quotes.xls").Visible = True and then just to be sure that it is activated Workbooks("quotes.xls").activate in after the .Open line Cheers JulieD "jim simpson" wrote in message news:5zTDd.69916$Jk5.17274@lakeread01... I an using Windows 98 and Excel 2000. Following are the first few lines of code of a program that runs at night unattended. If "quotes.xls" happens to have been hidden when Excel was last closed then line 3 opens it as a hidden file and this program stalls when the code ( line 4) tries to activate one of the several sheets in the file . Application.DisplayAlerts = False Application.AskToUpdateLinks = False Workbooks.Open "d:/allyears/quotes.xls" Worksheets("Current Quotes").Activate I have tried to follow the "open" instruction with every version of "visible" I can think of without success. Can someone help me with this problem? Thanks. Jim |
Problem with hidden file
Have you tried
Windows("Quotes.xls").Visible = True -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "jim simpson" wrote in message news:5zTDd.69916$Jk5.17274@lakeread01... I an using Windows 98 and Excel 2000. Following are the first few lines of code of a program that runs at night unattended. If "quotes.xls" happens to have been hidden when Excel was last closed then line 3 opens it as a hidden file and this program stalls when the code ( line 4) tries to activate one of the several sheets in the file . Application.DisplayAlerts = False Application.AskToUpdateLinks = False Workbooks.Open "d:/allyears/quotes.xls" Worksheets("Current Quotes").Activate I have tried to follow the "open" instruction with every version of "visible" I can think of without success. Can someone help me with this problem? Thanks. Jim |
Problem with hidden file
Dim wkbk As Workbook
Application.DisplayAlerts = False Application.AskToUpdateLinks = False Set wkbk = Workbooks.Open("d:\allyears\quotes.xls") wkbk.Windows(1).Visible = True wkbk.Activate wkbk.Worksheets("Current Quotes").Activate may work ok. (I changed your slashes to backslashes--excel is forgiving, but I'm not <vbg.) jim simpson wrote: I an using Windows 98 and Excel 2000. Following are the first few lines of code of a program that runs at night unattended. If "quotes.xls" happens to have been hidden when Excel was last closed then line 3 opens it as a hidden file and this program stalls when the code ( line 4) tries to activate one of the several sheets in the file . Application.DisplayAlerts = False Application.AskToUpdateLinks = False Workbooks.Open "d:/allyears/quotes.xls" Worksheets("Current Quotes").Activate I have tried to follow the "open" instruction with every version of "visible" I can think of without success. Can someone help me with this problem? Thanks. Jim -- Dave Peterson |
Problem with hidden file
Thanks to all for the help. I've screwed-up on this before. I never think of
windows as having a file name, I always think of it as a sheet name. Got to get my thinking straight. Jim "jim simpson" wrote in message news:5zTDd.69916$Jk5.17274@lakeread01... I an using Windows 98 and Excel 2000. Following are the first few lines of code of a program that runs at night unattended. If "quotes.xls" happens to have been hidden when Excel was last closed then line 3 opens it as a hidden file and this program stalls when the code ( line 4) tries to activate one of the several sheets in the file . Application.DisplayAlerts = False Application.AskToUpdateLinks = False Workbooks.Open "d:/allyears/quotes.xls" Worksheets("Current Quotes").Activate I have tried to follow the "open" instruction with every version of "visible" I can think of without success. Can someone help me with this problem? Thanks. Jim |
All times are GMT +1. The time now is 07:37 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com