Avatar billede mrkr Juniormester
12. februar 2013 - 11:20 Der er 1 kommentar og
1 løsning

Kontrol af tal i kolonne og vise dem i msgbox

Jeg har et ark hvor der i kolonne O står tal fra 1 til 50
Det samme tal kan sagtens fremkomme flere gange.
Det er ikke sikkert at alle tal er brugt.

Jeg er interesseret i hvilke tal der IKKE står i kolonne O.
Derfor kunne ville det være super godt hvis jeg kunne få lidt vba til lave en kontrol for mig.

Koden skal kigge i kolonne 0 og liste de 5 første 5 tal op som IKKE er brugt i nummerserien 1-50.

Hvis nr. 1 og 4 og 5 og 6 og 8 er brugt skal msgboxen skrive noget ala:

Følgende numre er ikke anvendt:
2, 3, 7, 9, 10

Det er ikke relevant at den lister alle numre som ikke er brugt, da man typisk ikke skal bruge så mange forskellige numre på en gang.

Hvis der findes en formel til dette er det også fint.

Er der nogen der frisk på den opgave?
Avatar billede kabbak Professor
12. februar 2013 - 13:16 #1
Public Sub IkkeBrugt()
Dim I As Integer, X As Long, MsgStr As String, Y As Integer, IkkeFundet As Boolean
RW = Worksheets(1).UsedRange.Rows.Count' ret selv til dit ark
Y = 0
IkkeFundet = True

For I = 1 To 50
  For X = 1 To RW
    If Cells(X, "O") = I Then
      IkkeFundet = False
      Exit For
    End If
Next X

  If IkkeFundet Then
    Y = Y + 1
    MsgStr = MsgStr & I & ","
  End If
  IkkeFundet = True
  If Y >= 5 Then Exit For
Next I

If Y > 0 And Y <= 5 Then MsgBox MsgStr, , "Følgende numre er ikke anvendt:"

End Sub
Avatar billede mrkr Juniormester
12. februar 2013 - 14:40 #2
YES.
Den sad lige i skabet, nøjagtigt som jeg havde tænkt det.

Mange tak for hjælpen.
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