I have recorded the below macro. However, I want to know how to write it as code. I have read on how to write a macro, but I can't grasp it. So, I thought that since I know how this macro works, that if someone can help me write it, it would make more since to me.
I want to write it because when recording it records Range("B5:B100").Select and it want always be that range.
Sub SETUP()
'
' SETUP Macro
'
'
sheets("DATA DUMP").Select
Range("B2").Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("DOT 9A_DUMP").Select
Range("A5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("B4:L4").Select
Application.CutCopyMode = False
Selection.Copy
Range("A5").Select
Selection.End(xlDown).Select
Range("B5:B100").Select
Range("B100").Activate
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Range("A5:F5").Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.Copy
ActiveWindow.SmallScroll Down:=-114
Range("A5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A5").Select
End Sub
Bookmarks