Avatar billede familienriis Nybegynder
19. januar 2008 - 10:07 Der er 2 kommentarer og
1 løsning

loop 2 gange

Jeg har en kode som skal gå til "videre:" aller nederst i koden, hvis der er et problem i koden.

der kunne jeg godt tænke mig at hvis:
a1=36 så skal a1 stættes til 37.
a1=37 så skal a1 stættes til 36.
Herefter skal den gå til toppen af koden igen og køre den

Men den skal kun gøre det en gang. Så den tester 36 EN gang og 37 EN gang.

Hvis den både har testet 36 og 37 skal den skrive "der er fejl på både 36 og 37"

Jeg går ud fra at det har noget loop at gøre, men jeg ved ikke om det er noget dre kan lade sig gøre
Avatar billede jkrons Professor
19. januar 2008 - 13:42 #1
Prøv med denne:

Sub T()
    If Range("A1").Value = 36 Then
        Range("A1").Value = 37
        ElseIf Range("A1").Value = 37 Then
            Range("A1").Value = 36
    Else
        MsgBox "Fejl på både 36 og 37", vbOKOnly + vbExclamation
    End If
End Sub

Den skriver  en evt. fejl i en msgbox. Hvis du hellere vil have det i cellen, kan du rette til

Range("A1").Value = "Fejl på både 36 og 37",

i stedet for linien medc MsgBox
Avatar billede familienriis Nybegynder
29. februar 2008 - 22:11 #2
jeg havde helt glemt denne.
har du et svar jkrons?
tak for hjælpen
Avatar billede jkrons Professor
01. marts 2008 - 09:37 #3
Her er et svar :-)
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