KN 88-372065-69 − Guten Tag, hier meine Frage zu Calc: Wie kann ich die Einträge der 2 Zellen in diesem Textimport in einem Schritt auf einen Eintrag übertragen?
Zum besseren Verständnis habe ich einen PDF-Anhang mit dem Betreff „Kopieren von Text in 1 Zelle von Calc“ angefügt.
Vielen Dank vorab! MfG, zimmer201604
Lieber User,
vielleicht hilft Ihnen die Lösung per Anhang.
Makros für Ihre Frage habe ich nur zu Excel. Ob diese unter LibreOffice Calc laufen habe ich nicht geprüft.
Beispiel 1:
Sub ZeilenumbruchAusMarkiertenZellenEntfernen()
Dim Zelle As Range
For Each Zelle In Selection
Zelle.Value = Application.Substitute(Zelle.Value, Chr(10), „“)
Next Zelle
End Sub
Beispiel 2:
Sub ZeilenumbruchAusZelleEntfernen()
Range(„A1“).Value = Application.Substitute(Range(„A1“).Value, Chr(10), „“)
End Sub
Sub ZeileumbruchEntfernenV2()
Range(„A1“).Value = Replace(Range(„A1“).Value, vbLf, „“)
End Sub
Quelle: Bernd Held, VBA-Tanker 5622, 5623
Herzliche Grüße
Josef Schreiner