Avatar billede Michael_H007 Juniormester
27. august 2014 - 22:10 Der er 4 kommentarer og
1 løsning

Makro til indsættelse af dato og tekst

Jeg har brug for en makro, der indsætter dags dato i formatet dd.mm.åå + initialer på brugeren + en selvvalgt tekst i samme linie.

eks. 12.08.14 - XX - Dette er en test (hvor XX er personens initialer fra opsætningen af Excel
Avatar billede store-morten Ekspert
28. august 2014 - 09:10 #1
Sub test()
    Range("A1").Value = Date & " " & Application.UserName & " Dette er en test"
End Sub
Avatar billede Michael_H007 Juniormester
28. august 2014 - 09:37 #2
Tak

To ting:

Data skal ikke indsættes i celle A1, men i cellen hvor makroen bliver afspillet

Kan du ændre til initialer ikke navn
Avatar billede store-morten Ekspert
28. august 2014 - 10:03 #3
Sub test()
    ActiveCell.Value = Date & " " & Application.UserName & " Dette er en test"
End Sub


Application.UserName henter fra opsætningen af Excel
Avatar billede Michael_H007 Juniormester
28. august 2014 - 10:50 #4
Hvordan styrer jeg datoformat så det bliver dd.mm.åå ikke dd-mm-åååå
Avatar billede store-morten Ekspert
28. august 2014 - 11:00 #5
Sub test()
    ActiveCell.Value = Format(Date, "dd.mm.yy") & " " & Application.UserName & " Dette er en test"
End Sub
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

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