Herbers Excel-Forum - das Archiv

Texte aus zwei Zellen in einer Angeigen

Bild

Betrifft: Texte aus zwei Zellen in einer Angeigen
von: macora.inc@t-online.de

Geschrieben am: 03.01.2007 13:01:42
Hallo,
gibt es die Möglichkeit zwei Texte aus unterschiedlichen Zellen auf getrennten Tabellen in einer dritten Zelle gemeinsam anzuzeigen?
Wenn ja wie geht das, wenn ich in den variablen Text aus Tabelle 1 Zelle A1 und den ebenfalls variablen Text aus Tabelle 2 Zelle A1 in der Tabelle 3 Zelle C4 gemeinsam anzeigen möchte?
Für eine kleine Anleitung wäre ich sehr dankbar.
MfG
macora
Bild

Betrifft: AW: Texte aus zwei Zellen in einer Angeigen
von: Hoffi

Geschrieben am: 03.01.2007 13:20:13
Hallo,
per VBA:
Sub Test()
Dim Text1$, Text2$, Ausgabe$, Ziel As Range
Text1 = Sheets(1).Range("A1").Value
Text2 = Sheets(2).Range("A1").Value
Ausgabe = Text1 & " - " & Text2
Set Ziel = Sheets(3).Range("C4")
Ziel = Ausgabe
End Sub

Grüße
Hoffi
Bild

Betrifft: Wie du Texte aus zwei Zellen in einer Angeigen...
von: Luc:-?

Geschrieben am: 03.01.2007 14:00:52
...kannst, Macora,
weiß ich nicht! ;-)
Aber, wenn du sie in eine 3.Zelle transferieren willst, geht das ganz einfach auch ohne VBA:
in Tabelle3!C4: =Tabelle1!A1&Tabelle2!A1

Das ist schon alles (evtl noch ein Trennzeichen dazwischen, z.B. ...&" "&...).
Gruß Luc :-?
Bild

Betrifft: AW: Texte aus zwei Zellen in einer Angeigen
von: macora.inc@t-online.de
Geschrieben am: 03.01.2007 17:53:28
Tipps waren prima, vielen Dank, hat alles geklappt.
MfG
macora
Bild

Betrifft: AW: Texte aus zwei Zellen in einer Angeigen
von: Murat

Geschrieben am: 05.01.2007 14:07:25
Hallo,
habe ein ähnliches Problem,
habe den Code für meine Datei angepasst
Sub Test()
Dim Text1$, Text2$, Ausgabe$, Ziel As Range
Text1 = Sheets("Anwesenheit_JanJun").Range("I7").Value
Text2 = Sheets("Anwesenheit_JanJun").Range("J7").Value
Ausgabe = Text1 & ", " & Text2
Set Ziel = Sheets("Tabelle1").Range("a1")
Ziel = Ausgabe
End Sub

Was muss ich ändern wenn mein Rangebereich nicht nur eine Zeile ("I7") sondern
über mehrere zeilen geht ("I7:I700")? Wenn ich das in den obigen Code eingebe
bekomme ich den Fehler^: Typen unverträglich
VG
Murat
 Bild
Excel-Beispiele zum Thema "Texte aus zwei Zellen in einer Angeigen"
Makros in Abhängigkeit vom Zellennamen aufrufen Zellen auf Kommentar überprüfen
Spalten bedingt summieren und Zellen formatieren Text aus Textbox in Zellen aufteilen
Zellen vergleichen und markieren Zählen formatierter Zellen
Daten aus Textdatei gezielt in Zellen übernehmen Zellen verbinden und trennen
Zellen bei Minuswerten schraffieren Zeilen oberhalb der markierten Zellen einfügen