CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

meiland Mester

24. august 2021 - 21:49 Der er 1 kommentar og
1 løsning

VBA: Finde ud af om værdi findes i et defineret range

Hej Eksperter !!

Jeg har et regneark med et data-ark og et værdi ark.

I værdiarket skal jeg i bestemte kolonner (f.eks. J) fra fra række 8 til lastrow finde de celleværdier som ikke findes i data-arket's kolonne B4:B10.
Hvis celleværdien (i værdi-arket) ikke findes på data-arket, skal cellen udfyldes med gult.
Jeg tænker at koden skal ligne lidt ala:

For række=8 to lastrow then
if cells(10,række).value "ikke findes i sheets("Data").range("B4:B10")" then
ActiveCell.Interior.Color = 65535
end if
next række

Udfordringen er koden i "".
Jeg kunne selvfølgelig for hver værdi i kolonne J, lave en løkke, der løber igennem data i B4:B10,

Håber, at I har en løsning.

Synes godt om

jens48 Ekspert

24. august 2021 - 23:02 #1

Noget i denne stil vil kunne bruges:

Sub test()
Dim LastRow, Rk As Long
LastRow = Range("J" & Cells.Rows.Count).End(xlUp).Row
For Rk = 8 To LastRow
If WorksheetFunction.CountIf(Range("B4:B10"), Cells(Rk, 10)) = 0 Then
Cells(Rk, 10).Interior.Color = 65535
End If
Next
End Sub

Synes godt om

meiland Mester

24. august 2021 - 23:23 #2

Hej Jens48
Tak for hjælpen - Det var lige den hjælp jeg behøvede.
Jeg måtte lige tilføje en ekstra ting, da ikke alle celler i kolonne J har en værdi.

Sub test()
Sheets("Specification").Select
Dim LastRow, Rk As Long
LastRow = Range("J" & Cells.Rows.Count).End(xlUp).Row
For Rk = 8 To LastRow
If WorksheetFunction.CountIf(Sheets("data").Range("Std_Tools"), Cells(Rk, 10)) = 0 Then
If Len(Cells(Rk, 10).Value) > 0 Then Cells(Rk, 10).Interior.Color = 65535
End If
Next
End Sub

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Excel kurser

Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Formale på dage Af norberg i Excel	4	I går 09:57	I går 14:40
NUM. tastatur og pc indbygget mus virker ikke. Af arnepedersen i Excel	30	27/12/202410:47	29/12/202414:32
Automatisk give specifikke point udfra placering Af jernrosen3 i Excel	5	19/12/202410:24	22/12/202413:14
Delvis udfyld en celle, baseret på en %-sats fra anden celle Af Brian Nielsen i Excel	2	16/12/202415:27	17/12/202422:03
Hjælp til formatering af excel ark. Af Nicholas i Excel	23	13/12/202412:32	18/12/202415:44

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS