Avatar billede gnalling1 Nybegynder
16. juni 2005 - 20:26 Der er 2 kommentarer og
1 løsning

Formel i Messagebox

Hej! Jeg vil gerne lave en messagebox, der udregner maxpulsen. I inputboxen indtastes alder og messageboxen skal så give resultatet = 220 - alder, så hvis jeg er 35, skal den give resultatet 185. Hvordan gør jeg det?
Avatar billede sjap Praktikant
16. juni 2005 - 21:02 #1
Prøv med følgende:

Sub BeregnMaksPuls()
Dim Message, Title, Default, Alder

Message = "Indtast alder"
Title = "Alder"
Default = "10"

Alder = InputBox(Message, Title, Default)
MsgBox "Den maksimale puls er " & 220 - Alder, vbInformation + vbOKOnly, "Maksimal puls"

End Sub
Avatar billede gnalling1 Nybegynder
16. juni 2005 - 21:13 #2
Fantastisk!!! Tak for hjælpen Sjap.
Avatar billede sjap Praktikant
16. juni 2005 - 21:15 #3
;0)
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