Sheet1.Range("A2:B9").Select
Application.CutCopyMode = False
Selection.Copy
Sheet2.Select
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks :=False, Transpose:=False
Application.CutCopyMode = False
