Sub LOGING()
Dim f, f2, MyFile, dtDateTime, sMonth, sDay, sYear, sHour, sMinute, sSecond
Dim sFileName, sHeader, sPath, sFolder1
Dim sBatch, sTempB02, sTempB05, spressB01, spressB04, sOperator, helpB02, helpB05, lengthB02, lengthB05
Dim sTempB02string, sTempB05string, kommapositionB02...