Hello,
updated, this seems to be working
now my other question will be
how can i only select the columns i really want to import
instead all the columns?
like only B C H
to my sheet B C F
Dim wbMaster As Workbook
Dim wbTemperature As Workbook
Dim sTemperature As String
Dim wsImport As Worksheet
Dim destCell As Range
Set wbMaster = ThisWorkbook
Set wsImport = wbMaster.Worksheets("sheetlist2")
Set destCell = Worksheets("sheetlist2").Cells(Rows.Count, "A").End(xlUp).Offset(1)
'Ask for temperature workbook name.
sTemperature = Application.GetOpenFilename("Log Files (*.txt), *.txt")
If sTemperature = "False" Then Exit Function
Application.ScreenUpdating = False
Workbooks.Open sTemperature, , , 4, , , , , ";"
Set wbTemperature = ActiveWorkbook
ActiveSheet.Cells(1, 1).CurrentRegion.Copy destCell.Cells(1, 1)
wbTemperature.Close False
wbMaster.Activate
wsImport.Select
Application.GoTo destCell.Range("A9")
Application.ScreenUpdating = True
Thanks