☰

So entfernen Sie alle führenden Leerzeichen beim Kopieren einer Tabelle von Excel nach Word

tag-icon • tag-icon microsoft-excel-2013 microsoft-word-2013
So entfernen Sie alle führenden Leerzeichen beim Kopieren einer Tabelle von Excel nach Word

Ich habe mehrere Tabellen in Microsoft Excel 2013 erstellt. Jetzt möchte ich diese Tabellen in MS Word 2013 einfügen, aber beim Einfügen dieser Tabellen tritt das Problem auf. Die Tabellen werden ordnungsgemäß eingefügt, aber mit einem Leerzeichen vor jeder Zelle in der Tabelle in MS Word, wie unten dargestellt. Ich habe es mit der Trimmfunktion in Excel versucht, aber vergeblich. Ich muss diese Leerzeichen löschen. Diese Tabellen in Excel werden häufig durch manuelle Berechnung aktualisiert. Ich brauche also eine problemlose Möglichkeit, Leerzeichen zu entfernen.

Demo-Fehler

Antwort1

Wählen Sie die Tabelle aus und führen Sie den folgenden Makrocode aus

Sub NoSpaces()
    Dim c As Range

    For Each c In Selection.Cells
        c = Replace(c, " ", "")
    Next
End Sub

Schreiben Sie diesen Code in das Modul und führen Sie ihn im Direktfenster aus. Hat bei mir funktioniert.

Antwort2

Sie sollten die Funktion "Trimmen" verwendenVerknüpfung, denn "ersetzen" ersetzt jedes Leerzeichen auch in der Mitte eines Strings: zB ".L.NP" ergibt "LNP" und nicht wie gewünscht "L.NP".

verwandte Informationen