Fügen Sie jeder Zelle in einer Spalte in Excel denselben Text hinzu


81

Wie kann ich Text an jede Zelle in einer Spalte in Excel anhängen? Ich muss am Ende ein Komma (",") einfügen.

Beispiel:

email@address.com verwandelt sich in email@address.com,

Datenbeispiel:

m2engineers@yahoo.co.in
satishmm_2sptc@yahoo.co.in
threed_precisions@rediffmail.com
workplace_solution@yahoo.co.in
threebworkplace@dataone.in
dtechbng@yahoo.co.in
innovations@yahoo.co.in
sagar@mmm.com
bpsiva@mmm.com
nsrinivasrao@mmm.com
pdilip@mmm.com
vvijaykrishnan@mmm.com
mrdevaraj@mmm.com
b3minvestorhelpdesk@mmm.com
sbshridhar@mmm.com
balaji@mmm.com
schakravarthi@mmm.com
srahul1@mmm.com
khramesh2@mmm.com
avinayak@mmm.com
rockindia@hotmail.com

Antworten:


215

Sehen Sie, ob dies für Sie funktioniert.

  • Alle Ihre Daten befinden sich in Spalte A (beginnend in Zeile 1).
  • Geben Sie in Spalte B, Zeile 1 = A1 & "," ein
  • Dadurch wird Zelle B1 gleich A1 mit einem angehängten Komma.
  • Wählen Sie nun Zelle B1 aus und ziehen Sie von rechts unten in alle Zellen nach unten (dies kopiert die Formel und verwendet den entsprechenden Wert für Spalte A.)
  • Wählen Sie die neu angehängten Daten aus, kopieren Sie sie und fügen Sie sie an der gewünschten Stelle ein Paste -> By Value

Das ist es!


Die Beschreibung des letzten Schritts scheint unvollständig zu sein. Ich musste tatsächlich Zelle B1 kopieren, dann den Rest der Zellen darunter auswählen und dann einfügen.
Tim Holt

8
Dann wird für jeden, der nicht weiß, können Sie kopieren und Paste Special...> Valuesdie resultierenden Werte zurück zu Ihrem ursprünglichen Spalte ohne die Formel sie zu zerstören bewegen.
A__

Was ist, wenn Sie etwas entfernen möchten?
Ridan

24

Es ist eine einfache "&" Funktion.

=cell&"yourtexthere"

Beispiel - Ihre Zelle sagt Mickey und Sie möchten Mickey Mouse. Mickey ist in A2. Geben Sie in B2 Folgendes ein

=A2&" Mouse"

Kopieren Sie dann die Werte und fügen Sie "Spezial einfügen" ein.

B2 now reads "Mickey Mouse"

22

Es ist einfach...

=CONCATENATE(A1, ",")

Beispiel : Wenn sich email@address.com in der A1-Zelle befindet, schreiben Sie in eine andere Zelle: = CONCATENATE (A1, ",")

email@address.com Nach dieser Formel erhalten Sie email@address.com,

Zum Entfernen der Formel : Kopieren Sie diese Zelle und verwenden Sie Alt+ E+ S+ Voder fügen Sie einen speziellen Wert ein.


6

Es ist nicht erforderlich, zusätzliche Spalten oder VBA zu verwenden, wenn Sie das Zeichen nur zu Anzeigezwecken hinzufügen möchten .

Wie in diesem Beitrag vorgeschlagen , müssen Sie lediglich Folgendes tun:

  1. Wählen Sie die Zelle (n) aus, auf die Sie die Formatierung anwenden möchten
  2. Klicken Sie auf die HomeRegisterkarte
  3. Klicke auf Number
  4. Wählen Custom
  5. Geben Sie im TypeTextfeld die gewünschte Formatierung ein, indem Sie die Zahl Null in die gewünschten Zeichen einfügen.

Beispiel für einen solchen Text zur Formatierung:

  • Wenn der Zellenhaltewert 120.00gelesen werden soll $120K, geben Sie ein$0K

4

Ziemlich einfach ... Sie können alle mit der Verkettungsfunktion in eine Zelle einfügen:

=CONCATENATE(A1, ", ", A2, ", ", and so on)

2

Markieren Sie die Spalte und dann Ctrl+ F.

Suchen und Ersetzen

Finden Sie ".com"

Ersetzen Sie ".com"

Und dann eine für .in

Suchen und Ersetzen

Zu finden in"

Ersetzen Sie ".in"


1

Ich habe dies nur für eine andere Antwort geschrieben:

Sie würden es mit dem Formular anhand Ihres Beispiels aufrufen : appendTextToRange "[theRange]", ",".

Sub testit()
    appendTextToRange "A1:D4000", "hey there"
End Sub


Sub appendTextToRange(rngAddress As String, append As String)

    Dim arr() As Variant, c As Variant
    arr = Range(rngAddress).Formula

    For x = LBound(arr, 1) To UBound(arr, 1)
        For y = LBound(arr, 2) To UBound(arr, 2)
            Debug.Print arr(x, y)
            If arr(x, y) = "" Then
                arr(x, y) = append
            ElseIf Left(arr(x, y), 1) = "=" Then
                arr(x, y) = arr(x, y) & " & "" " & append & """"
            Else
                arr(x, y) = arr(x, y) & " " & append
            End If
        Next
    Next
    Range(rngAddress).Formula = arr

End Sub

1

Wählen Sie den Zellenbereich aus, geben Sie den Wert ein und drücken Sie Ctrl+ Enter.

Dies gilt natürlich, wenn Sie dies manuell tun möchten.


1

Am einfachsten ist es, die Option "Flash Fill" auf der Registerkarte "Data" zu verwenden.

  1. Behalten Sie die ursprüngliche Eingabespalte links bei (z. B. Spalte A) und fügen Sie rechts eine leere Spalte hinzu (z. B. Spalte B, diese neue Spalte wird als Ausgabe behandelt).

  2. Füllen Sie einfach ein paar Zellen der Spalte B mit der tatsächlich erwarteten Ausgabe aus. In diesem Fall:

          m2engineers@yahoo.co.in,
          satishmm_2sptc@yahoo.co.in,
    
  3. Wählen Sie dann den Spaltenbereich aus, in dem die Ausgabe erfolgen soll, zusammen mit den ersten Zellen, die Sie manuell ausgefüllt haben. Führen Sie dann die Magie aus. Klicken Sie auf "Flash Fill".

Es versteht im Grunde das Ausgabemuster, das der Eingabe entspricht, und füllt die leeren Zellen.


0

Fügen Sie den Text / Wert in die erste Zelle ein, kopieren Sie die Zelle, markieren Sie die gesamte Spalte und fügen Sie den kopierten Text / Wert ein.

Dies funktioniert in Excel 97 - leider ist keine andere Version auf meiner Seite verfügbar ...


-2

Geben Sie es in eine Zelle ein, kopieren Sie diese Zelle, wählen Sie alle Zellen aus, die Sie füllen möchten, und fügen Sie sie ein.

Alternativ können Sie es in eine Zelle eingeben, das schwarze Quadrat unten rechts in dieser Zelle auswählen und nach unten ziehen.

Durch die Nutzung unserer Website bestätigen Sie, dass Sie unsere Cookie-Richtlinie und Datenschutzrichtlinie gelesen und verstanden haben.
Licensed under cc by-sa 3.0 with attribution required.