Avatar billede MegaEngine Nybegynder
09. januar 2012 - 15:59 Der er 1 kommentar

VBA. hvis celle er indeholdt i erklæret område. Eller hvis værdier i område er indeholdt i erklæret område

hej alle,

Jeg er ved at lave noget kontrol på noget inddata.
Jeg modtager x antal navne på en lang liste(ikke unikke).
Dem kopierer jeg ind i mit excel-miljø.

Jeg vil holde listen op imod en liste jeg har på en anden fane.
Hvis der er et navn i inddata som ikke optræder på min checkliste, skal makroen stoppe eg. først ved hjælp af en msg boks.

jeg arbejder i excel 2003

pft.
M.E.
Avatar billede MegaEngine Nybegynder
24. januar 2012 - 08:55 #1
Fandt min egen løsning.
Dim MyRange As Range
Dim X

Dim End_row

End_row = ActiveCell.Row
Range("a1", "a" & End_row).Select
Set MyRange = Selection

If ActiveCell = Empty Then
ActiveCell.Offset(1, 0).Select
Else
On Error Resume Next
X = WorksheetFunction.VLookup(ActiveCell.Value, MyRange, 1, 0)
If Err = 0 Then
ActiveCell.Offset(1, 0).Select
Else
MsgBox ("Tekst")
Exit Sub
End If
On Error GoTo 0
End If
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
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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