Celle som viser dato for endringer gjort i angitt celleområde i MS Excel?

[Qumad]

Er det mulig og få en celle i MS Excel til og vise dato på når informasjonen i ett angitt celleområde ble endret?

 

I får tilfelle så ønsker vi celler langt ute til høyre som automatisk skal vise dato for sist endring i alle cellene til venstre for dato cellen på samme raden.

 

Altså:

V5 viser dator for endringer gjort i celleområdet A5:U5

V6 viser dator for endringer gjort i celleområdet A6:U6

[Harald Staff]

Høyreklikk arkfanen, lim inn følgende:

 

Private Sub Worksheet_Change(ByVal Target As Range)

 

Select Case Target(1).Column

 

Case 1 To 21

 

Cells(Target(1).Row, 22).Value = Now

 

Case Else

 

End Select

 

End Sub

 

Dette er en makroløsning, så den må lagres i en makroaktivert fil som xls eller xlsm.

 

Jeg har ikke tatt høyde hva som skjer når du endrer flere rader samtidig.

 

HTH. Beste hilsen Harald

[deaktivert443556]

Edit: Og da var spørsmålet allerede besvart...

 

Et noe relatert spørsmål ble stilt i denne tråden. Ved å modifisere koden til Harald Staff litt, så får du det du spør etter.

 

Som Harald skriver, høyreklikk på arkfanen og klikk vis kode. Lim inn det som står under.

 

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Count = 1 Then

If Target.Column < 22 And Target.Row > 4 And Target.Row < 7 Then Cells(Target.Row, 22) = Date

End If

End Sub

Endret 11. mars 2011 av Bradbury