Meldung wenn in Zelle geschrieben wird

Forumthread: Meldung wenn in Zelle geschrieben wird
7 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Meldung wenn in Zelle geschrieben wird

18.01.2025 11:50:22

philipp

Guten Morgen,
ich suche, wenn ich in einem Bereich, z.B. B10:B30, C20:C30 etwas schreibe, das dann in
Zelle A10 nur den Wert des heutigen Datums geschrieben wird also 18.01.2025.

gruß philipp

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Meldung wenn in Zelle geschrieben wird

18.01.2025 12:09:05

Kuwer
Danke Uwe funktioniert !

18.01.2025 12:48:03

philipp
AW: Danke Uwe funktioniert !

18.01.2025 17:56:33

GerdL
AW: Geht bei mir auch mit Leerzeichen. o.w.T.

18.01.2025 18:12:51

Kuwer
Kleine Nachfrage

18.01.2025 16:08:48

philipp
AW: Kleine Nachfrage

18.01.2025 17:32:07

Kuwer
Klappt doch ! -)

18.01.2025 18:11:23

philipp

AW: Meldung wenn in Zelle geschrieben wird

18.01.2025 12:09:05

Kuwer

Hallo phillipp,

im Modul des entsprechenden Tabellenblattes:

Private Sub Worksheet_Change(ByVal Target As Range)

  If Not Intersect(Target, Range("B10:B30,C20:C30")) Is Nothing Then

    Range("A10").Value = Date

  End If

End Sub

Gruß, Uwe

Danke Uwe funktioniert !

18.01.2025 12:48:03

philipp

AW: Danke Uwe funktioniert !

18.01.2025 17:56:33

GerdL

Moin
Ist vor b347 ein Leerzeichen in der Codezeile?
Dann ist dieses zu eleminieren.
Gruß Gerd

AW: Geht bei mir auch mit Leerzeichen. o.w.T.

18.01.2025 18:12:51

Kuwer

Kleine Nachfrage

18.01.2025 16:08:48

philipp

Hallo Uwe,
habe den Bereich geändert, der Bereich O11:O24, leider keine Reaktion, sonst ja.

  'Private Sub Worksheet_Change(ByVal Target As Range)

  If Not Intersect(Target, Range("b26:b50, b347:b370,O11:O24")) Is Nothing Then

   Range("P35").value = Date

     

    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios _

           :=True, Password:=getStrPassWort                                      'schützen

 End If

gruß philipp

AW: Kleine Nachfrage

18.01.2025 17:32:07

Kuwer

Hallo phillipp,

bei mir geht es.

Gruß, Uwe

Klappt doch ! -)

18.01.2025 18:11:23

philipp

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!