LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 247
Default Macros: Step Thru Works, Run Works, Keyboard Shortcut Locks up

Problem as stated Above
Discovered when I recreated, from scratch,
all macros and source files, on another computer.
It locked up as before on my main computer.
By chance I tried Macro RUN, and lo an behold, it worked.
I have previously submitted a macro for the same process, but
operating differently. It also locked up after file 1.xls was
opened and would just sit there with active cell A1.

SO, how and/or why, can/does a keyboard shortcut
stop a macro from running

Sub Create_MASTER_File()
' KeyBoard ShortCut: Ctrl+Shift+ M
' ToolBar Icon: NONE
' Menu Item: NONE

Dim DestBook As Workbook
Dim mySource As Workbook
Application.ScreenUpdating = False
Application.EnableEvents = False

' Open Workbook and Save As: M2M-MASTER.XLS
Workbooks.Add
ChDir "C:\DATA"
ActiveWorkbook.SaveAs Filename:="C:\DATA\M2M-MASTER.XLS",
FileFormat:=xlNormal _
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False

' The M2M-MASTER must be (will be) the active WB when initiating macro
Set DestBook = ActiveWorkbook
Sheets(1).Activate
Set mySource = Workbooks.Open("C:\DATA\1.xls")

' 1.xls is now open and available
' Go to 1.xls, Sheet #1, Row 1, Copy
' Go to DestBook, Sheet 1, Row 1 and Insert Cut Cells

DestBook.Worksheets(1).Range("A1:IV1").Value =
mySource.Worksheets(1).Range("A1:IV1").Value

' Save only DestBook
With DestBook
.Save
End With

'Save and Close Source Book.xls
With mySource
.Save
.Close Savechanges:=True
End With

Application.EnableEvents = True
Application.ScreenUpdating = True

End Sub

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Combine Worksheets: Works Well in Test Mode, Locks when running no BEEJAY Excel Programming 4 September 27th 06 08:46 PM
It works when I step through it but it won't run chillihawk Excel Programming 5 June 5th 06 11:13 PM
Excel macro works with keyboard shortcut, but not command button. Please Help. [email protected] Excel Programming 3 May 5th 06 11:30 PM
Works if I single step -\) Excel Programming 3 December 7th 04 04:24 PM
A good macro that works wrong with keyboard shortcut Allen[_4_] Excel Programming 1 September 12th 03 04:37 PM


All times are GMT +1. The time now is 03:30 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"