ich stehe vor einem Problem und hoffe hier Hilfe zu finden:
Ich speicher ein Tabellenblatt als Textdatei und diese Textdatei enthält IMMER eine ungewollte Leerzeile am Ende.
Wie schaffe ich es, dass die Textdatei ohne diese Leerzeile gespeichert wird.
Zur Veranschaulichung hier mein Code:
speichern_unter = ordner & "\" & wks.Name & "_" & dat_name
Application.ScreenUpdating = False
Application.DisplayAlerts = False
ActiveWorkbook.Worksheets(wks.Name).Copy
ActiveWorkbook.SaveAs Filename:=speichern_unter, FileFormat:=xlText
wks.UsedRange.Rows.Count liefert mir IMMER das gewünschte Ergebnis:z.B. ich habe eine Überschrift + 3 Zeilen mit Inhalt --> Ergebnis = 4 --> OK
Die Textdatei enthält dann aber trotzdem 5 Zeilen (1x Überschrift + 3x Inhalt + 1x Leerzeile).
Bin echt schon am verzweifeln :-(
Vielen Dank im Voraus für eure Antworten!