VBA Code:
Sub PullFinalBidData()
Dim wb As Workbook, fullpath As String
Dim wt As Worksheet
Set wt = Sheets("BID")
With Application.FileDialog(msoFileDialogFilePicker)
.AllowMultiSelect = False
.Filters.Add "Excel Files", "*.xlsm", 1
If .Show <> -1 Then Exit Sub
fullpath = .SelectedItems.Item(1)
Set wb = Workbooks.Open(fullpath)
wb.Sheets("RA Print").Range("E5:S303").Copy ThisWorkbook.Sheets("TOOL DATA").Range("B3")
wb.Sheets("RA Print").Range("E304:S604").Copy ThisWorkbook.Sheets("TOOL DATA").Range("B303")
wb.Close False
End With
End Sub
Using the above code it copies the data but uses just paste. How would I be able to make this paste Value.