Indsæt dato 2
Jeg var vist lidt for hurtig med at acceptere et tidligere spørgsmål, da jeg ikke helt kan få formlen til at fungere på den måde, jeg gerne vil.Formlen er:
selle A65436 skal indsætte et X manuelt
herefter indsættes denne kode i arkets kodemodul
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:IV10000")) Is Nothing Then Exit Sub
If Range("A65436").Value <> "X" Then
Range("A65400:A65536") = "": Range("A65436").Value = "X"
ActiveCell.Value = Format(Now(), "dd-mm-yyyy")
End If
End Sub
Hvad bestemmer, hvilken kolonne datoen skal sættes ind i? Jeg vil gerne have den sat i kolonne Z i den ny-indsatte linie.
