Supportnet / Forum / Tabellenkalkulation
zellen verketten
Frage
hallo zusammen,
eine frage bitte wie bekome ich folgendes zustande:
habe 3 spalten.
möchte das ein makro zellen verkettet in spalte d wieder ausgibt
da die anzahl der daten variable von der menge ist, aber die spalten von a bis c immer gefüllt sind. in spalte d sollen aber die spalte a:c verkettet ausgegeben werden.
könnt ihr mir ein tipp geben.
danke im vorraus
Antwort 1 von Reiny
Vielleicht interpretiere ich die problemstellung falsch?
Für Zellverkettungen kannst du einfach die EXCEL-Funktion "VERKETTEN" verwenden (Programmversion englisch LINK?)
Beispiel für die Zusammenfassung der Zrellen A3 bis C3 mit 1 Leerzeichen zwischen den Elementen:
=VERKETTEN(A3;" ";B3;" ";C3)
Gruss reiny
Für Zellverkettungen kannst du einfach die EXCEL-Funktion "VERKETTEN" verwenden (Programmversion englisch LINK?)
Beispiel für die Zusammenfassung der Zrellen A3 bis C3 mit 1 Leerzeichen zwischen den Elementen:
=VERKETTEN(A3;" ";B3;" ";C3)
Gruss reiny
Antwort 2 von want2cu
Hallo,
es geht auch noch einfacher mit dem kaufmännischen &-Zeichen:
=A3&B3&C3
Diese Formel so weit wie nötig nach unten ziehen.
Falls ein Leerzeichen als Trennzeichen gewünscht ist, dieses einfach mit &" " in die Formel einfügen.
Cu
want2cu
es geht auch noch einfacher mit dem kaufmännischen &-Zeichen:
=A3&B3&C3
Diese Formel so weit wie nötig nach unten ziehen.
Falls ein Leerzeichen als Trennzeichen gewünscht ist, dieses einfach mit &" " in die Formel einfügen.
Cu
want2cu
Antwort 3 von last_boby
hallo want2cu, hallo reiny,
den register mappe lasse ich über folgende befehl einfügen.
with. worksheets("tabelle2")
.cells.clear
Range("A1").Autofilter _
Field:=4, Criterial1:= ad
seet rngAct = ("A2").currentRegion.SpecialCells(xxlCellTypeVisible)
rngAct.Copy.Range("A:A2")
End With
Worksheets ("Tabelle2").AutofilterMode=False
Application.Screenupdating = True
nun möchte ich genau hier den befehl über vba sagen das er die zellen a:c in spalte d verketten soll.
danke
den register mappe lasse ich über folgende befehl einfügen.
with. worksheets("tabelle2")
.cells.clear
Range("A1").Autofilter _
Field:=4, Criterial1:= ad
seet rngAct = ("A2").currentRegion.SpecialCells(xxlCellTypeVisible)
rngAct.Copy.Range("A:A2")
End With
Worksheets ("Tabelle2").AutofilterMode=False
Application.Screenupdating = True
nun möchte ich genau hier den befehl über vba sagen das er die zellen a:c in spalte d verketten soll.
danke
Antwort 4 von last_Boby
hallo
habe mein probl. gelöst
danke
gruss
habe mein probl. gelöst
danke
gruss