Question: I want to paste link from one sheet to another

```
Range("A1:D1").Select
Range("D1").Activate
Selection.Copy
Sheets("Sheet2").Select
ActiveSheet.Paste Link:=True

```

However, the code would make the sheet to switch to Sheet2 from Sheet1. Is there anyway that I could paste the link without switching the sheet?

Thanks.

Answer: 
This will work:

```
ThisWorkbook.Worksheets("Sheet2").Range("D1").Formula = "=Sheet1!D1"

```
Your LINK desire cannot be done without selecting the sheet. But you can make the fact that it does that invisible to the eye.

```
Option Explicit

Sub test()
    Application.ScreenUpdating = False

    Sheets("Sheet1").Range("A1:D1").Copy
    With Sheets("Sheet2")
        .Activate
        .Range("A1").Select
        ActiveSheet.Paste Link:=True
    End With
    Sheets("Sheet1").Activate

    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub

```