Dipwad
03-02-2008, 06:59 AM
I know that this is a really simple issue with most of you, but I know very little about VB.
All I am trying to do is copy cells from one worksheet to another and run a couple sub routines. I used the "record new macro" function to get this far.
Here is the code:
Private Sub CommandButton1_Click()
'
' Don Macro
' Macro recorded 3/1/2008 by Don Roberts
'
'
Sheets("Don").Select
Application.Run "'Old Fart calculator.xls'!post"
Sheets("overview ").Select
Range("M10:Q10").Select
Selection.Copy
Sheets("Don").Select
Range("A2").Select
ActiveSheet.Paste
Range("H19").Select
Application.Run "'Old Fart calculator.xls'!figure"
Sheets("overview ").Select
Range("S10").Select
End Sub
When it gets to Range("A2").Select it stops at that point.
Hopefully someone can enlighten me as to why it stops and how to fix it.
Thanks
All I am trying to do is copy cells from one worksheet to another and run a couple sub routines. I used the "record new macro" function to get this far.
Here is the code:
Private Sub CommandButton1_Click()
'
' Don Macro
' Macro recorded 3/1/2008 by Don Roberts
'
'
Sheets("Don").Select
Application.Run "'Old Fart calculator.xls'!post"
Sheets("overview ").Select
Range("M10:Q10").Select
Selection.Copy
Sheets("Don").Select
Range("A2").Select
ActiveSheet.Paste
Range("H19").Select
Application.Run "'Old Fart calculator.xls'!figure"
Sheets("overview ").Select
Range("S10").Select
End Sub
When it gets to Range("A2").Select it stops at that point.
Hopefully someone can enlighten me as to why it stops and how to fix it.
Thanks