F
Frank Situmorang
Hi experts:
How can we combine 2 Sub procedures in VBA, this is my macro which can not
connect one to the other. My purpose is to assign this 2 subs into one
Autoshape click. If I erase one sub MacCopyRange(), it stuck in the
Selection.statement
Moreover, I want to now the logic of how to make a program using MBA, I want
to know these components of VBA, the difference between OBJECT,METHOD,
PROPERTY, EVENTS. If anyone can inform me the website explaining them.
Many Thanks
Frank Situmorang
Indonesia
Here is my macro:
Sub AutoShape7_Click()
'
' AutoShape7_Click Macro
' Macro recorded 5/10/2007 by Frank
'
'
ActiveWindow.SmallScroll ToRight:=-5
Range("A9:Y1714").Select
Selection.ClearContents
Dim x As Object
For Each x In ActiveWorkbook.Names
Range(x).Copy
Sheets("SUMMMARYWBLA").Select
Range("a65000").End(xlUp).Offset(1, 0).PasteSpecial xlPasteAll
Next x
End Sub
How can we combine 2 Sub procedures in VBA, this is my macro which can not
connect one to the other. My purpose is to assign this 2 subs into one
Autoshape click. If I erase one sub MacCopyRange(), it stuck in the
Selection.statement
Moreover, I want to now the logic of how to make a program using MBA, I want
to know these components of VBA, the difference between OBJECT,METHOD,
PROPERTY, EVENTS. If anyone can inform me the website explaining them.
Many Thanks
Frank Situmorang
Indonesia
Here is my macro:
Sub AutoShape7_Click()
'
' AutoShape7_Click Macro
' Macro recorded 5/10/2007 by Frank
'
'
ActiveWindow.SmallScroll ToRight:=-5
Range("A9:Y1714").Select
Selection.ClearContents
Dim x As Object
For Each x In ActiveWorkbook.Names
Range(x).Copy
Sheets("SUMMMARYWBLA").Select
Range("a65000").End(xlUp).Offset(1, 0).PasteSpecial xlPasteAll
Next x
End Sub