Avatar billede mvhansen Nybegynder
21. januar 2006 - 12:09 Der er 2 kommentarer og
1 løsning

If sætning

Hej eksperter

Jeg har et problem med if sætninge.
Jeg er lige begyndt at programer i vba.
mit problem er,jeg har lavet en kode der ser sådan ud.

Public Sub Sodavand_mvh()
Dim iResultat As Integer
  iResultat = InputBox("Skriv venligst Pris:")
  MsgBox iResultat & " Kr Modtaget"
  Range("C5").Value = Range("C5").Value + iResultat
End Sub

Jeg vil godt have en msgbox der kommer frem hvis brugeren ikke indtaster et beløb ("Du skal indtaste et beløb")
Og hvis brugeren trykker på cancel skal den lukke inputboxen
uden at melde fejl

Jeg har prøvet med men det virker ikke,jeg ved godt at der mangler noget

Public Sub Sodavand_mvh()
Dim iResultat As Integer
  iResultat = InputBox("Skriv venligst Pris:")
 
  If iResultat = "" Then
  MsgBox = ("Du skal indtaste et beløb")
  Else
 
 
 
  MsgBox iResultat & " Kr Modtaget"
  Range("C5").Value = Range("C5").Value + iResultat
 
  End If
End Sub

mvh

mvhansen
Avatar billede brynil Nybegynder
21. januar 2006 - 12:32 #1
Prøv:

Sub Resultat()
Dim iResultat As String
  iResultat = InputBox("Skriv venligst Pris:")
  If iResultat = "" Then
    MsgBox "Der skal angives et beløb"
  Else
    MsgBox iResultat & " Kr Modtaget"
    Range("C5").Value = Range("C5").Value + CInt(iResultat)
  End If
End Sub
Avatar billede mvhansen Nybegynder
21. januar 2006 - 12:48 #2
ok brynil
det virker
du får mange tak


kan du ligge et svar

mvh
mvhansen
Avatar billede brynil Nybegynder
21. januar 2006 - 12:49 #3
Yesp - tak :))
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