---

Hallo zusammen,

ich poste das jetz einfach mal, weil ich nimmer recht weiter weiss
(hatte erstmal überlegt ob Excel oder VB Forum, dann aber eben für hier entschieden)     

Folgendes, wir/ich schreiben eine *.xls als *.txt via:

Sub SaveAsTxt()
   Dim xlsname As String, txtName As String
  
   xlsname = ActiveWorkbook.FullName
   txtName = Left(xlsname, Len(xlsname) - 4) & ".txt"

   On Error Resume Next
   Kill txtName
   On Error GoTo 0

   If Not ActiveWorkbook.Saved Then ActiveWorkbook.Save

   ActiveWorkbook.SaveAs Filename:=txtName, FileFormat:=xlTextPrinter, CreateBackup:=False
   ActiveWorkbook.Close saveChanges:=False
End Sub

nun erscheint aber in der *.txt am Ende so ein dämlicher Zeilenumbruch, also 0d0a

    

momentan keine wirkliche Idee, wie zu unterbinden ???

Is ja auch schon spät     
Nachti Nancy
--
Not too long ago, a program was something i watched on TV...

[Diese Nachricht wurde von startrek am 20. Nov. 2003 editiert.]

[Diese Nachricht wurde von startrek am 29. Nov. 2004 editiert.]

[Diese Nachricht wurde von startrek am 29. Nov. 2004 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

... die Frage hat sich erübrigt, sorry sorry

[Thread delete vbyesno?] 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

obwohl ... 
schlussendlich habe ich mir gedacht, vielleicht hat ja mal einer Probleme mit Leerzeilen & Co in txt's ...
und irgendjemand hilfst mal irgendwie weiter, naja Forum eben

hier der Text einer PM, bitte nur als
*** Info ***
zu verstehen, damit dieser thread nicht allzu 'wundersam' anmutet 

lg Nancy
--
So jetzt, abschließend & klärend folgendes:
vermutlich haben wir aneinander vorbeigeredet ...,
das was dein cursor im wordpad macht, sagt noch lange nicht aus,
ob die letzte Zeile eine Leerzeile ist.

Deswegen eben die Sache mit dem Cursor-Hüpf-Test in der xls via Strg + Ende,
wenn der Cursor in die letzte Zelle mit Eintrag hüpft > alles okay,
wenn nicht > ein UsedRange Problem in deiner xls ...

Noch zu den Internas, die mir komplett auch neu waren,
also alles was jetzt kommt, ist der Extract einiger Mails 

um wirklich festzustellen, was denn in einer *.txt so abgeht, benötigt
es einen 'externen' Hex-Editor, da habe ich zB. mir mit der xxd.exe des vim
eine hex.txt erzeugt:

c:\vim\vim61\xxd c:\dein_Pfad\wasbinich.txt> c:\temp\hex.txt

dieser hex.txt kannst Du nun Glauben schenken 

1. wenn also da ein!! 0d0a  (Zeilenwechsel) am Ende steht, ist das okay,
jede *.txt wird mit einem 0d0a abgeschlossen

2. Ein Leerzeile hättest Du erst, wenn am Ende 2 * 0D0A direkt
hintereinander kommen würden bzw. mit ein paar Blanks 0x20 oder
Tabs 0x09 dazwischen.

Das ist nun die Preisfrage ..., also wenn Du nun tatsächlich den
letzten (normalen) einen 0d0a weghaben möchtest,
müssten wir meine Frage im hiesigen VBasic-Forum wieder aufgreifen

CU Nancy

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP