Tabulatorbegrenzten Text aus einer bestimmten Spalte in Excel abrufen

Tabulatorbegrenzten Text aus einer bestimmten Spalte in Excel abrufen

Ich habe gebeten, eine tabulatorgetrennte Liste der Teilnehmer für eine Broschüre zu erstellen. Gibt es eine Möglichkeit, dies zu tun, ohne dass ich dazu gezwungen werden muss, jede einzelne Datenzeile der Daten erneut einzugeben / kopieren und einzufügen? Ich brauche nur die Namensspalte.

Führen Sie die folgenden Schritte aus, um dies manuell und schnell mit Notepad ++ durchzuführen, falls Sie nach einer manuellen Methode suchen, um dies ganz einfach ohne Code zu erledigen . Außerdem haben Sie Ihre Frage ebenfalls markiert text.

1. Öffnen Sie Ihre Excel-Tabelle mit der Spalte, aus der Sie die Datenwerte abrufen möchten, z. B. der Namensspalte.

2. Klicken Sie auf diese Spalte, um alle Werte hervorzuheben, und drücken Sie dann Ctrl+ C(oder klicken Sie mit der rechten Maustaste und wählen Sie Copy).

3. Öffnen Sie Notepad ++ und ein neues leeres Dokument. Drücken Sie dann Ctrl+ V(oder klicken Sie Pastemit der rechten Maustaste und wählen Sie aus ), um die Werte der gerade kopierten Spalte einzufügen.

4. Drücken Sie in Notepad ++ mit den eingefügten Datenwerten Ctrl+ A, um alles, was Sie eingefügt haben, auszuwählen, gehen Sie nach oben, wählen Sie EditAuswählen Line Operationsund anschließendRemove Empty Lines (Containing Blank characters)

5. Gehen Sie in Notepad ++ mit den noch hervorgehobenen Datenwerten nach oben, wählen Sie Editselect Blank Operationsund dannTrim Leading and Trailing Space

6. Drücken Sie in Notepad ++ mit den noch hervorgehobenen Datenwerten Ctrl+ und Hgehen Sie auf die ReplaceRegisterkarte, geben Sie die Werte ein und stellen Sie sicher, dass die Optionen wie unten gezeigt ausgewählt sind. Replace AllDrücken Sie die Option und die Registerkarte sollte alle Ihre Datenwerte einschränken.

7. Von dort aus können Sie die neu formatierten Werte als neues Textdokument speichern oder in diesem Format (durch Tabulatoren getrennt) in Ihre anderen Anwendungen kopieren und einfügen, falls erforderlich.

Bitte beachten Sie, dass ich dies getestet und bestätigt habe, dass es wie erwartet funktioniert hat. Dann wurde es wieder rechts herum gedreht und als Tabulatorzeichen in Excel importiert, und alles scheint als Tabulatorzeichen und Importe richtig zu sein.

Bildschirmfoto

Quelle: Notepad ++ - Reguläre Ausdrücke

\ n

• Das LF-Steuerzeichen 0x0A (Zeilenvorschub). Dies ist das reguläre Zeilenende unter Unix-Systemen.

\ r

• Das CR-Steuerzeichen 0x0D (Wagenrücklauf). Dies ist Teil der DOS / Windows-Zeilenende-Sequenz CR-LF und war das EOL-Zeichen auf Mac 9 und früheren Versionen. OSX und spätere Versionen verwenden \ n.

\ t

• Das TAB-Steuerzeichen 0x09 (Registerkarte oder harte Registerkarte, horizontale Registerkarte).

Zusätzliche Anmerkung

Es gibt auch die Ctrl+ Aund Ctrl+ J-Funktion von Notepad ++, aber es wird nicht die Registerkarte hinzugefügt, sondern Leerzeichen. Ich bin mir nicht sicher, ob Ihre "Name" -Spalte sowohl der erste als auch der letzte Name ist, oder nur ein Name, den Sie möglicherweise als "Leerzeichen" kennzeichnen können, wenn Sie dies benötigen, und das in Ihrem Fall funktioniert.

Ich gehe davon aus, dass Sie mit der Programmierung einige Kenntnisse haben. Auf diese Weise sollten die Vornamen alles erklären. (Also werde ich nicht erklären, wie der Code funktioniert.)

So zeigen Sie eine geeignete Methode für die Verwendung von VBA auf (und machen sie für andere Anwendungen verfügbar) Sie können dieses Skript verwenden:

Öffnen Sie zuerst Ihr VBA-Fenster über Alt+ F11. Dann "Einfügen" und "Modul". Sie können den Code einfach dort kopieren / einfügen

Option Explicit Sub Put_All_Names_to_Clipboard() Dim Name_In_Cell As Variant, Name_List As String For Each Name_In_Cell In Selection.Value If Len(Name_In_Cell) = 0 Then Exit For ElseIf Len(Name_List) Then Name_List = Name_List & vbTab & Name_In_Cell Else Name_List = Name_In_Cell End If Next Dim Object_For_Clipboard As Object Set Object_For_Clipboard = CreateObject("new:") Object_For_Clipboard.SetText Name_List Object_For_Clipboard.PutInClipboard Set Object_For_Clipboard = Nothing End Sub 

Es wird nun eine durch Tabulatoren getrennte Liste (Textzeichenfolge) aller ausgewählten Anrufwerte abgelegt (sie stoppt bei der ersten leeren Zelle, auf diese Weise können Sie eine ganze Spalte auswählen). Nachdem das Makro ausgeführt wurde, können Sie die Zeichenfolge einfach "einfügen", wo immer Sie möchten. Ich schlage jedoch vor, es direkt an der richtigen Stelle in Ihrer Publisher-Datei einzufügen, wodurch 1 Schritt eingespart und die Zwischenablage für andere Aufgaben sauber gehalten wird.

Sie können das Makro direkt starten, indem Sie den Textcursor an einer beliebigen Stelle im Sub-Bereich befinden und drücken F5. Sie können das Makro auch einer Schaltfläche zuweisen oder zur Symbolleiste hinzufügen

Als letzten Hinweis: Sie können ein Makro auch direkt in MS-Publisher erstellen und diese Zeichenfolge aus der Excel-Datei "holen". Aber das können Sie später tun, wenn Sie sich mit VBA besser fühlen. :)