Hello, I have a set of data that I want to copy from ("2nd") to ("Sheet2") and it is transpose with copying the link. The code is not working.
Sub Macro3()
' Macro1 Macro
Sheets("2nd").Select
ActiveWindow.SmallScroll Down:=-12
Range("H19:O19").Select
Selection.Copy
Sheets("Sheet1").Select
' Range("J16").Select
' Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
' :=False, Transpose:=False
' Application.CutCopyMode = False
' Selection.Style = "Percent"
' Selection.Copy
Range("J17").Select
Selection.Paste Link:=True, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub
Sub Macro3()
' Macro1 Macro
Sheets("2nd").Select
ActiveWindow.SmallScroll Down:=-12
Range("H19:O19").Select
Selection.Copy
Sheets("Sheet1").Select
' Range("J16").Select
' Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
' :=False, Transpose:=False
' Application.CutCopyMode = False
' Selection.Style = "Percent"
' Selection.Copy
Range("J17").Select
Selection.Paste Link:=True, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub