Hey There
Sub COPYpaste()
Dim w1 As Workbook, w2 As Workbook, w3 As Workbook
Set w1 = Workbooks.Open("C:\Users\Desktop\sample1.xls")
Set w2 = Workbooks.Open("C:\Users\Desktop\sample2.csv")
Set w3 = Workbooks.Open("C:\Users\Desktop\sample3.xlsx")
Dim Ws1 As Worksheet, Ws2 As Worksheet, Ws3 As...