G
Guest
Hi All
When I run the following macro everything works OK with no problems
Sub Macro7()
'Copies and Saves Result At the End Of Workbook
Application.ScreenUpdating = False
Sheets("Result").Select
Sheets("Result").Copy After:=Sheets(29)
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("Result").Select
Range("A2:J2").Select
Selection.ClearContents
Range("A3:J3").Select
Selection.ClearContents
Range("B5:J24").Select
Selection.ClearContents
Range("A2:J2").Select
Application.ScreenUpdating = True
End Sub
Is it possible to enter Text in Cell "L4" for example London and when the
Result Sheet is copied and moved using the Macro above - the Sheet Tab
changes to the text in "L4"
When I run the following macro everything works OK with no problems
Sub Macro7()
'Copies and Saves Result At the End Of Workbook
Application.ScreenUpdating = False
Sheets("Result").Select
Sheets("Result").Copy After:=Sheets(29)
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("Result").Select
Range("A2:J2").Select
Selection.ClearContents
Range("A3:J3").Select
Selection.ClearContents
Range("B5:J24").Select
Selection.ClearContents
Range("A2:J2").Select
Application.ScreenUpdating = True
End Sub
Is it possible to enter Text in Cell "L4" for example London and when the
Result Sheet is copied and moved using the Macro above - the Sheet Tab
changes to the text in "L4"