Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Wert in einer Zelle hinzufügen

Forumthread: Wert in einer Zelle hinzufügen

Wert in einer Zelle hinzufügen
13.11.2003 08:42:03
Herbert
Hallo Leute!

Habe ich eine Möglichkeit, bei bereits eingetragenen Werten in einer Spalte einen zusätzlichen Buchstaben hinzuzufügen? Bsp.

Inhalte von A1:A10 sind Zahlen. Nun möchte ich vor jede Zahl den Buchstaben A hinzufügen. Mit einem benutzerdefinierten Format klappt es zwar, bräuchte den Buchstaben aber als zusätzlichen Inhalt in einer Zelle.

Danke im Voraus..
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert in einer Zelle hinzufügen
13.11.2003 08:49:15
Werner
Hallo Herbert,

Wenn ich es richtig verstanden hab:
zB. In A1 steht 123 und du willst daraus zB. in B1 A123 schreiben?

Dann ="A"&A1

Ansonsten vergiss meinen Beitrag.

Gruss Werner
AW: Wert in einer Zelle hinzufügen
13.11.2003 08:52:17
Herbert
Ja Werner, hast du schon richtig verstanden, nur möchte ich dies nicht einzeln für jede Zelle machen, denn die Datei besteht aus über 700 Zeilen. Kann man das nicht mit einem Befehl für alle Zeilen gleichzeitig machen?
Anzeige
AW: Wert in einer Zelle hinzufügen
13.11.2003 08:53:12
Mac4
Hallo Herbert,

dann per Makro (Spalte A):


Sub test()
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
Cells(i, 1).Value = "A" & Cells(i, 1).Value
Next
End Sub


Marc
AW: Wert in einer Zelle hinzufügen
13.11.2003 08:53:34
WernerB.
Hallo Herbert,

was hältst Du hiervon:

Sub Herbert()
Dim c As Range
Application.ScreenUpdating = False
For Each c In Range("A1:A10")
If IsNumeric(c.Value) Then
c.Value = "A" & c.Value
End If
Next c
Application.ScreenUpdating = True
End Sub

Viel Erfolg wünscht
WernerB.

P.S.: Das Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter (siehe Forums-FAQ).
Anzeige
AW: Wert in einer Zelle hinzufügen
13.11.2003 08:59:48
Herbert
Danke Werner, das ist genau das was ich brauchte...

Gute Arbeit
Herbert
Warum immer mit VBA
13.11.2003 09:00:45
Werner
Hallo Herbert,

schreib 1mal ="A"&A1 dann Doppelklick auf das +
(vorausgesetzt sie sind in der nächsten Zell)
oder Runterziehen am +

Gruss Werner
AW: Warum immer mit VBA
13.11.2003 09:09:18
Herbert
Mir wäre schon auch lieber ohne VBA, nur bräuchte ich die Werte in derselben Spalte und nicht in der Spalte daneben...
Anzeige
AW: Wert in einer Zelle hinzufügen
13.11.2003 08:59:27
Jörg Gradert
Hallo Herbert,
im Ernst? Excel Profi, VBA gut?
ich bin Excel gut, VBA blutiger Anfänger.
Hier der Code


Sub test()
Dim i As Integer
For i = 1 To 10
Cells(i, 1) = "A" & Cells(i, 1)
Next i
End Sub


Ansonsten kannst Du es bei 10 Werten ja fast schneller von Hand eingeben. Zelle anklicken, vorne in die Bearbeitungsleiste klicken, A eingeben, Enter, vone in die Bearbeitungsleiste klicken...

Gruss Jörg
Anzeige
Inhalte Einfügen/ Werte
13.11.2003 09:44:14
IngoG
Hallo Herbert,

wenn Du einfach die oben genannte Formel in Spalte B einträgst und nach unten kopierst, erhälst Du in spalte B das richtige ergebnis.
anschhließend kopierst Du die Zellen in Spalte b, markierst die Originalzellen in spalte A und wählst Bearbeiten/Inhalte kopieren, Werte.
Anschließend kannst Du spalte B wieder löschen

Gruß Ingo
Anzeige
;
Anzeige

Infobox / Tutorial

Wert in einer Zelle hinzufügen


Schritt-für-Schritt-Anleitung

Um einen Buchstaben (z.B. "A") vor bereits vorhandenen Werten in einer Excel-Zelle hinzuzufügen, kannst Du die folgenden Schritte ausführen:

  1. Formel verwenden:

    • Gehe zu der Zelle, in der Du den neuen Wert haben möchtest (z.B. B1).
    • Gib die folgende Formel ein:
      ="A"&A1
    • Drücke Enter, um das Ergebnis zu sehen.
    • Ziehe das Ausfüllkästchen (kleines Quadrat in der unteren rechten Ecke der Zelle) nach unten, um die Formel auf die anderen Zellen anzuwenden.
  2. Makro verwenden (für größere Datenmengen):

    • Öffne den VBA-Editor mit ALT + F11.
    • Füge ein neues Modul hinzu und kopiere den folgenden Code:
      Sub Hinzufügen()
       Dim i As Integer
       For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
           Cells(i, 1).Value = "A" & Cells(i, 1).Value
       Next i
      End Sub
    • Schließe den VBA-Editor und führe das Makro aus.

Häufige Fehler und Lösungen

  • Fehler: Die Formel zeigt einen Fehler an.

    • Lösung: Stelle sicher, dass Du die Formel korrekt eingegeben hast und dass sich die Zellen mit den Werten in der richtigen Spalte befinden.
  • Fehler: Das Makro funktioniert nicht.

    • Lösung: Überprüfe, ob Du das Makro korrekt eingefügt hast und dass die richtigen Berechtigungen gesetzt sind, um Makros auszuführen.

Alternative Methoden

Wenn Du die Werte in der gleichen Spalte bearbeiten möchtest, ohne ein Makro zu verwenden, kannst Du die Methode mit der Formel verwenden und anschließend die Ergebnisse in die Originalzellen zurückkopieren:

  1. Verwende die Formel in einer benachbarten Spalte.
  2. Markiere die Zellen mit den Ergebnissen.
  3. Rechtsklicke und wähle "Kopieren".
  4. Gehe zu den Originalzellen, rechtsklicke und wähle "Inhalte einfügen" -> "Werte".

Praktische Beispiele

  • Beispiel 1:

    • Ursprüngliche Werte in A1:A10: 1, 2, 3, ..., 10.
    • Nach Anwendung: A1:A10: A1, A2, A3, ..., A10.
  • Beispiel 2:

    • Verwende die VBA-Methode für eine größere Tabelle mit über 700 Zeilen.
    • Alle Werte in der Spalte A werden automatisch mit "A" davor versehen.

Tipps für Profis

  • Wenn Du häufig mit solchen Anpassungen arbeitest, erstelle eine Excel-Vorlage mit dem Makro, um Zeit zu sparen.
  • Experimentiere mit anderen Buchstaben oder Wörtern, um verschiedene Anpassungen vorzunehmen.
  • Nutze die Filterfunktion, um nur spezifische Werte zu bearbeiten, bevor Du die Änderungen vornimmst.

FAQ: Häufige Fragen

1. Wie viele Zeilen kann ich mit einem Makro bearbeiten? Du kannst mit einem Makro alle Zeilen in einer Spalte bearbeiten, solange sie nicht die maximale Zeilenanzahl in Excel überschreiten (1.048.576 Zeilen).

2. Geht das auch ohne VBA? Ja, Du kannst die Formel verwenden und die Ergebnisse in die Originalzellen zurückkopieren, um den Buchstaben hinzuzufügen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige