Avatar billede spoi Nybegynder
02. april 2007 - 07:44 Der er 3 kommentarer og
1 løsning

redigeringsdato og hvem der har redigeret

Kan ikke få følgende til at virke. Der sker absolut ikke noget. Nogen der har en ide om havd der er galt? Kunne også godt tænke mig at få et navn ind for perosnen der har redigeret.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Range("E7") = Now
End Sub

LN
Avatar billede kabbak Professor
02. april 2007 - 08:10 #1
Tusk at den skal Være i ThisWorkbook modulet og ikke i Ark, eller de andremoduler, hvor man normalt har makroer.

Denne sætter også  brugernavnet for Office brugeren ind, hvis det er natværksbrugeren, du skal bruge , må du sige til.


Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Range("E7") = Now & " " & Application.UserName
End Sub
Avatar billede kabbak Professor
02. april 2007 - 08:12 #2
Tusk = Husk

Den skriver først i arket, når du ændrer eller skriver i arket
Avatar billede spoi Nybegynder
02. april 2007 - 08:57 #3
perfekt
Det var lige netop det med ThisWorkbook jeg ikke havde lagt koden i. Tak

point til dig - så læg et svar

LN
Avatar billede kabbak Professor
02. april 2007 - 09:31 #4
et svar ;-))
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester