Thema Datum  Von Nutzer Rating
Antwort
31.07.2022 07:28:28 Martin
NotSolved
31.07.2022 09:18:45 ralf_b
NotSolved
Rot Textteil in Zelle suchen ausschneiden und in anderer Zelle wieder einfügen
31.07.2022 09:33:29 ralf_b
Solved
31.07.2022 12:31:14 Martin
NotSolved
31.07.2022 11:29:12 volti
Solved
31.07.2022 12:32:26 Martin
NotSolved
31.07.2022 22:06:11 Martin
NotSolved
31.07.2022 22:30:16 volti
Solved

Ansicht des Beitrags:
Von:
ralf_b
Datum:
31.07.2022 09:33:29
Views:
759
Rating: Antwort:
 Nein
Thema:
Textteil in Zelle suchen ausschneiden und in anderer Zelle wieder einfügen

Du mußt deine Frage ncht zweimal stellen.

Hier eine Minimallösung 

Sub Makro1()
Dim zielzelle As Range
Set zielzelle = Range("B1")
With WorksheetFunction
    zielzelle.Value = Right(Range("A1"), Len(Range("A1")) - .Find("AL", Range("A1")) + 1)
    Range("A1") = Replace(Range("A1"), zielzelle.Value, "")
End With
End Sub

 

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
31.07.2022 07:28:28 Martin
NotSolved
31.07.2022 09:18:45 ralf_b
NotSolved
Rot Textteil in Zelle suchen ausschneiden und in anderer Zelle wieder einfügen
31.07.2022 09:33:29 ralf_b
Solved
31.07.2022 12:31:14 Martin
NotSolved
31.07.2022 11:29:12 volti
Solved
31.07.2022 12:32:26 Martin
NotSolved
31.07.2022 22:06:11 Martin
NotSolved
31.07.2022 22:30:16 volti
Solved