Worksheets(TABLENAME_TO).Cells(get_next_empty_row, 1).Value = Replace(Left(regEx.Replace(.Cells(l, 1),
""
), InStr(1, regEx.Replace(Trim(.Cells(l, 1)),
),
" "
, vbTextCompare) - 1), Chr(160), vbNullString)
Laufzeitfehler '5' ungültiger prozeduraufruf oder ungültiges argument :/
Gruß und auf jeden Fall sehr großen Dank das du mir wirklich unter die arme greifst! :)
Bitte geben Sie ein aussagekräftiges Thema an. Bitte geben Sie eine gültige Email Adresse ein!