• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

automatische range value

Status
Niet open voor verdere reacties.
M

MiekeDM

Gebruiker
Lid geworden
8 feb 2003
Berichten
20
Ik wil dat in een excell spreadsheet wanneer één specifieke cel (bv. A3) in een andere cel (bv. A7) automatisch de datum en het exacte tijdstip van die verandering worden uitgeschreven... Met andere woorden: als iemand de inhoud in cel A3 wijzigt, moet automatisch in de cel A7 de functie NU() uitgevoerd worden... Iemand enig idee hoe ik dat kan doen?
 
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$3" Then [A7] = Now
End Sub
Kopieer de macro naar de werkblad-code
 
Inderdaad, die code lijkt te werken (al bedankt daarvoor). Er is enkel nog een klein probleempje: blijkbaar mag enkel de eerste keer dat de celinhoud verandert (als hij van leeg naar ingevuld gaat) de tijd opgeslagen worden... Hoe doe ik dat dan precies?
 
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$3" And Target <> "" And _
    [A7] = "" Then [A7] = Now
End Sub
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan