VBA Inputboks

Linjen:
Range("D4").Value = userInput

ændres til:
ActiveCell.Value = userInput

Lige et ekstra spørgsmål - når tekstboksen kommer frem skal jeg lige placere cursoren efter den prædefinerede tekst. Kan det ikke lade sig gøre, at man skriver direkte videre i tekstboksen efter den prædefinederede tekst (dato og brugernavn) uden yderligere handling ??

Det har jeg aldrig set en løsning på.

Men hvorfor ikke tilføje oplysningerne efterfølgende, så undgår du også at oplysningerne ændres.

Udskift den nuværende linje:

    userInput = InputBox("Skriv dit input her:", "Skriv her", _
    Format(Date, "dd.mm.yy") & " " & Application.UserName & " ")

med disse 2:

    userInput = InputBox("Skriv dit input her:", "Skriv her")
    userInput = Format(Date, "dd.mm.yy") & " " & Application.UserName & " " & userInput

Tak - virker perfekt.
Skriv så jeg kan give point :-)

Du har allerede fået et svar;-)

Godt det virkede for dig!

Har lige et supplerende spørgsmål. Hvis nu cellen er udfyldt med en tekst - hvordan undgår jeg så, at den overskrives ?