Supportnet / Forum / Tabellenkalkulation
Zellen verbinden mit Abhängikeit und Zeilenumbruch
Frage
Folgendes Problem stellt sich mir.
z.B In der Spate A habe ich Zahlenwerte die einen Bereich definieren (z.B 220)
in der Spalte B habe ich Textwerte die den Bereich als Text defineiren. (z.B Fertigung)
in der Spalte C habe ich die jeweiligen Inhalte (z.B Löten)
Sieht in etwa so aus
Spalte A
220
220
220
220
348
348
Spalte B
Fertigung
Fertigung
Fertigung
Fertigung
Support
Support
Spalte C
Löten
abstreifen
verdrehen
u.s.w
Nun möchte ich alle Werte aus der Spalte C in eine Zelle schreiben die in der Spalte A den selben Wert haben. Jedoch möchte ich die Werte die aus der Spalte C geholt werden mit einem Umbruch versehen, damit ich diese Werte dan wieder untereinander stehen habe.
Wer weis wie ich dies lösen kann ?
Antwort 1 von Saarbauer
Hallo,
nicht ganz verständlich, aber vielleicht kannst du hier mal ein Beispiel einstellen
http://www.netupload.de/
und den Link hier hinterlegen
Gruß
Helmut
nicht ganz verständlich, aber vielleicht kannst du hier mal ein Beispiel einstellen
http://www.netupload.de/
und den Link hier hinterlegen
Gruß
Helmut
Antwort 2 von good_4
Salut Helmut,
habe die Datei unter :
http://www.netupload.de/detail.php?img=4799af10e44db0ae2b1a0e601af2c857.xls
hochgeladen
Gruss
habe die Datei unter :
http://www.netupload.de/detail.php?img=4799af10e44db0ae2b1a0e601af2c857.xls
hochgeladen
Gruss
Antwort 3 von Saarbauer
Hallo,
jetzt verständlich, aber da muß ich mir erst mal ein paar Gedanken machen.
Gruß
Helmut
jetzt verständlich, aber da muß ich mir erst mal ein paar Gedanken machen.
Gruß
Helmut
Antwort 4 von good_4
Merci für den Einsatz.
Gruss
Gruss
Antwort 5 von Saarbauer
Hallo,
nach meiner Ansicht nur mit VBA lösbar.
Hier mein Makro
Sub Zusammenfügen()
letzteZeile = Range("A65536").End(xlUp).Row
j = 2
i = 2
Range("D" & j).Value = Range("A" & i).Value
Range("E" & j).Value = Range("B" & i).Value
Range("F" & j).Value = Range("C" & i).Value
For i = 3 To letzteZeile
If Range("A" & i).Value = Range("D" & j).Value Then
Range("F" & j).Value = Range("F" & j).Value & ", " & Range("C" & i).Value
Else
j = j + 1
Range("D" & j).Value = Range("A" & i).Value
Range("E" & j).Value = Range("B" & i).Value
Range("F" & j).Value = Range("C" & i).Value
End If
Next i
End Sub
Gruß
Helmut
nach meiner Ansicht nur mit VBA lösbar.
Hier mein Makro
Sub Zusammenfügen()
letzteZeile = Range("A65536").End(xlUp).Row
j = 2
i = 2
Range("D" & j).Value = Range("A" & i).Value
Range("E" & j).Value = Range("B" & i).Value
Range("F" & j).Value = Range("C" & i).Value
For i = 3 To letzteZeile
If Range("A" & i).Value = Range("D" & j).Value Then
Range("F" & j).Value = Range("F" & j).Value & ", " & Range("C" & i).Value
Else
j = j + 1
Range("D" & j).Value = Range("A" & i).Value
Range("E" & j).Value = Range("B" & i).Value
Range("F" & j).Value = Range("C" & i).Value
End If
Next i
End Sub
Gruß
Helmut

