Data fra inputbox til regneark

Public Sub test()
Dim tal As Variant
tal = InputBox("indtast tal")
Worksheets("Ark1").Range("A1") = Replace(tal, ",", ".")
End Sub

Mange tak for dit forslag. Det ser enkelt ud når man ved det. Det havde nok taget flere måneder for mig at finde en løsning.

Ved du i øvrigt hvordan man kan få kontakt til Sitet. Jeg har rettet min mailadresse, så jeg kunne ikke logge mig på, hverken med den gamle mail eller den nye mail. Jeg måtte oprette en ny profil for at komme på.

Godt at du kunne bruge løsningen.

ang. kontakten, så skriv her om dit problem.

http://www.eksperten.dk/spm/CoAdmin/

Da jeg er uerfaren bruger af eksperten, fik jeg ikke svaret så du fik dine point.    Jeg håber der sker nu.

Du skal acceptere mit svar, for at jeg får point

tak

Hvordan man accepterer svar på eksperten.dk:
https://www.youtube.com/watch?v=s26DGiuvXBo

Hej Kapbak

Du hjalp mig for længe siden. Da jeg nu igen havde brug for hjælp, opdagede jeg at mit spørgsmål stadig er åben.  Du skrev at jeg skal acceptere dit svar for at give dig point, men ved de svar jeg har fået fra dig er der vist et felt til "afkrydsning" af accepter svar.

Jeg er ked af at du sikkert ikke har fået dine velfortjente point, men hvad kan jeg gøre?????

du skal bare afkryds  "afkrydsning" af accepter svar og så tryk opret

Tak for dit svar.
Det var jeg godt klar over. Problemet er at der ikke er noget "Afkrydsningsfelt" på dine svar.

;-)