Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

URGENT HELP NEEDED!!! Close Excel w/Macros 1

Status
Not open for further replies.

woodlandstx

Technical User
Apr 26, 2004
47
US

Because today is Friday and technically my last day here, of course my macro needs to be re-written for an update from excel to access.

I have it done, except I lost my close excel at the end, and I cannot figure out again how to make the application close after running the macro.

Any help is greatly appreciated!!

Very short deadline!
 
Hi,

Please post the code that you already have.

Skip,

Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884
 
Sorry...here it is...

Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("Actual Sheet").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("Complete-Statistics").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("Cumulative Chart").Select
Range("C2").Select
ActiveSheet.ChartObjects("Chart 4").Activate
ActiveChart.ChartArea.Select
ActiveWindow.Visible = False
Windows("Statistics Complete Pages.xls").Activate
Sheets("Actual Chart").Select
Range("D4").Select
ActiveSheet.ChartObjects("Chart 4").Activate
ActiveChart.ChartArea.Select
ActiveWindow.Visible = False
Windows("Statistics Complete Pages.xls").Activate
Sheets("Complete Statistics Chart").Select
Range("H27").Select
ActiveSheet.ChartObjects("Chart 6").Activate
ActiveChart.Axes(xlValue, xlSecondary).Select
ActiveChart.ChartArea.Select
ActiveWindow.Visible = False
Windows("Statistics Complete Pages.xls").Activate
Sheets("Cumulative Sheet").Select
ActiveWorkbook.Save

Thanks!~
 

lol...I SWEAR I tried that earlier and it wouldn't do it!

Thanks so much!~
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top