Hallo Detlev,

danke für deine schnelle Antwort. Aber ich löse mein Problem noch nicht. Ich habe es zu schlecht dargestellt.

Hier ein neuer Versuch:

In den Zellen C10 - C20 kann die Zeichenkette _xy vorkommen, sie soll dann gelöscht werden.

d.h. in der Zelle kann folgendes stehen

    a) text_xy

    b) _xy

    c) text

    d)         = leer

Es soll immer nur _xy gelöscht werden.

Fragen:

   1) Wie kann man mit einer For-Next-Schleife die Zellen C10 - C20 abfragen, ob" _xy" vorkommt?

        Wenn Ja, soll es gelöscht werden,

   2) sonst soll nicht passieren,

       bzw. der Originaltext soll immer erhalten bleiben.

   3) Warum geht folgende VBA-Zeile nicht ?

            Range("C14") = Range("C14").Replace("_xy", "")

           oder       A = Range("C14")

                          A = A.Replace("_xy", "")

Ich bin kein VBA-Neuling, sonder eher ein VBA-Stümperling. Ich habe vor Jahren meinen persönlichen Jahreskalender gemacht und möchte nun darin die Umstellung der Sommer- und Winterzeit eintragen, Das klappt auch bestens. Doch leider werden dann auch vorhandene Einträge überschrieben.

Oder es kann schon mal so aussehen:  "Herbert_SoZeit+1h_SoZeit+1h"  -  wenn die Umstellung 2x auf den gleichen Tag trifft.

Mit der neuen VBA-Prozedur möchte ich also die Einträge erhalten. Dazu lösche ich vorher in den Zellen den alten Eintrag (_SoZeit+1h) und kopiere dann an der  Stelle den vorhandenen Text plus den Umstellungshinweis.

So ist meine Vorstellung. Ob ich es schaffe, weiss ich noch nicht - wenn Ja, nur massiver Hilfe.

Bisher habe ich das Problem mit einem Eintrag am unteren Kalenderrand gelöst. Aber ich denke, das ist nicht so elegant.

Für deine Hilfe herzlichen Dank

Herbert