Lesen von VBA-TextStream-Objekt-Ergebnissen in zusätzlicher Zeile

Question

Lesen von VBA-TextStream-Objekt-Ergebnissen in zusätzlicher Zeile

8

Unter Verwendung der Funktion RangeToHTML von Ron de Bruin passe ich einen Bereich in einen an Outlook-E-Mail. Es scheint jedoch, dass eine zusätzliche leere Zeile in die E-Mail eingefügt wird:

Ich habe bereits bestätigt, dass die Zeile Source:=TempWB.Sheets(1).UsedRange.Address nur die Daten selbst und nicht eine zusätzliche Zeile korrekt erfasst. Ich habe auch bestätigt, dass der Eingabebereich für RangetoHTML() ebenfalls korrekt ist. Meine einzige Vermutung ist, dass die .ReadAll -Methode irgendwie eine zusätzliche Zeile in die Datei schreibt, aber ich bin mir nicht sicher, wie ich das debuggen soll. Hier ist die Funktion RangetoHTML , die ich zur einfachen Bezugnahme verwende:

%Vor%

EDIT: Hier ist der Teil des Codes, wo die E-Mail generiert wird. Die RangeToHTML(rng_Summary) fügt den Bereich in die E-Mail ein:

%Vor%

vba outlook excel excel-vba object

kschindl 29.08.2017, 15:36

quelle

3 Antworten

0

Ich habe genau das gleiche passiert mit mir, und ich habe es mit ein paar einfachen CSS behoben.

%Vor%

Wenn Sie mit CSS nicht vertraut sind, müssen Sie es wie folgt zwischen Stil-Tags setzen:

%Vor%

Platziert hier in Ihrem Code:

%Vor%

braX 29.08.2017 17:53

quelle

0

Scheint, dass Sie vor 'Close TempWB innerhalb der RangeToHTML-Prozedur die folgende Codezeile einfügen müssen, um eine zusätzliche Zeile über HTML Body zu vermeiden:

%Vor%

T.M. 03.11.2017 18:28

quelle

Tags und Links vba outlook excel excel-vba object

Django: Verwenden von Annotate, Count und Distinct in einem Queryset Bildvorverarbeitung für die Erkennung von Eiern mit Tesseract

score 2 · Accepted Answer

Workbook.PublishObjects enthält eine zusätzliche Zeile zum Erzwingen der Spaltenbreiten.

%Vor%

Verwenden Sie die Antwort von @ EngineerToast auf Ersetzen nur das letzte Auftreten einer Übereinstimmung in einer Zeichenfolge in VBA können wir die letzte Zeile verbergen, während Spaltenbreiten beibehalten werden.

%Vor%

Zusatz

Nachdem ich die Ausgabe von RangetoHTML überprüft hatte, bemerkte ich, dass die erste Zeile auch die Spaltenbreiten erzwingt. Nichtsdestoweniger wird getTrimRangetoHTML das gewünschte Ergebnis liefern, die letzte Zeile zu verstecken.