Avatar billede danielbaek Nybegynder
10. juli 2006 - 17:03 Der er 7 kommentarer og
1 løsning

Dubletter i to kolonner

Hej,
Jeg har et excelark hvor jeg gerne vil have markeret de felter, hvor data i felterne over og under hinanden er ens.

Altså dvs. når både data i felt a1 og a2 er ens OG data i b1 og b2.

Jeg vil altså ikke have vist hvis a1 og a2 er ens, hvis b1 og b2 har forskellige data, og jeg vil heller ikke have felterne markeret, hvis a1 og b1 optræder længere nede i rækken, altså er lig med a123 og b123. Det skal altså være umiddelbart følgende data.

Giver dette mening? - og i så fald hvordan kan det gøres?
Avatar billede bak Forsker
10. juli 2006 - 17:51 #1
een måde at gøre det på er med betinget formatering.

Stil dig i fx. A2
vælg Formatering/betinget formatering
I 1. rullefelt vælger du "Formel er"
indsæt så denne formel
=($A13 & $B13 = $A14 & $B14)
og vælg en farve under knappen Formater / Mønstre.
Med formatpenslen kopierer du nu dette betingede format nedad og udad så langt du ønsker
Avatar billede bak Forsker
10. juli 2006 - 17:52 #2
sorry

=($A1 & $B1 = $A2 & $B2)
Avatar billede mrjh Novice
10. juli 2006 - 18:01 #3
Sub marker()

For r = 1 To 100 'Tilrettes
If Cells(r, 1) = Cells(r + 1, 1) And Cells(r + 1, 1) <> "" _
And Cells(r, 2) = Cells(r + 1, 2) And Cells(r + 1, 2) <> "" Then
Cells(r, 1).Interior.ColorIndex = 6
Cells(r + 1, 1).Interior.ColorIndex = 6
Cells(r, 2).Interior.ColorIndex = 6
Cells(r + 1, 2).Interior.ColorIndex = 6
End If
Next r

End Sub
Avatar billede mrjh Novice
10. juli 2006 - 18:04 #4
Ups sorry bak, du havde svaret. Ja hvorfor bruge vba når det kan klares på anden vis.
Avatar billede brynil Nybegynder
10. juli 2006 - 18:09 #5
mrjh > dine 4 linier med Interior osv kan du skrive som 1 linie:

Range(Cells(r, 1), Cells(r + 1, 2)).Interior.ColorIndex = 6

Ellers er dit forslag tæt på det jeg selv ville have foreslået ;))
Avatar billede mrjh Novice
10. juli 2006 - 18:15 #6
Ok - tak brynil. Jo kortere jo bedre :-)
Avatar billede danielbaek Nybegynder
11. juli 2006 - 09:57 #7
Hej,
Tusind tak bak - dit svar var lige det jeg var ude efter.
Smider du ikke et svar så du kan få point?

(også tak til jer andre, har dog ikke lige afprøvet det - syntes umiddelbart bak's så lettest ud)
Avatar billede bak Forsker
12. juli 2006 - 01:22 #8
Ok :-)
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

IT-JOB

Rambøll Management Consulting

Senior AI Engineer

Rambøll Management Consulting

Senior Software Engineer