title image


Smiley Re: aktuelles Datum einfügen
Ja ich schon wieder. ;-)



Also mit Makro:







Private Sub Worksheet_Change(ByVal Target As Range)

Dim c As Range

For Each c In Target

    If c.Column = 1 Then

        If IsEmpty(c) Then

            Range("B" & c.Row) = ""

        Else

            Range("B" & c.Row) = Date

        End If

    End If

Next

End Sub





Code eingefügt mit Syntaxhighlighter 4.0





Ohne Makro geht es nur manuell (per "Inhalte einfügen" bzw. Tastenkombination "STRG + Punkt"). Vielleicht wäre eine benutzerdefinierte Funktion noch eine Option für dich. Ist aber letzendlich auch ein Makro.




Gruß,



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: