[EXCEL] Cellen selecteren op kleur?

Pagina: 1
Acties:
  • 3.079 views sinds 30-01-2008
  • Reageer

  • The_Bash
  • Registratie: December 2004
  • Laatst online: 05-12-2025
Volgens mij is dit een hele domme vraag, maar je weet maar nooit.
Ik heb in excel een tabel waarbij met kleuren verschillen zijn aangegeven voor een variabele. Nu wil ik bijvoorbeeld alle geel gemarkeerde cellen selecteren. Kan Excel dat?

404 error: File not found | PSN: The_Bash


  • onkl
  • Registratie: Oktober 2002
  • Laatst online: 23:54
Dat kan alleen met een VBA macro.
Lees excel cellen op kleur sorteren/optellen eens door voor meer info.

[ Voor 60% gewijzigd door onkl op 14-03-2006 11:50 ]


  • The_Bash
  • Registratie: December 2004
  • Laatst online: 05-12-2025
Aha, bedankt Onkl. Ik heb de search wel gebruikt maar dit topic niet gevonden. Ik ga weer verder puzzelen. Ik zal mijn bevindingen hier nog even posten :Y)

[ Voor 20% gewijzigd door The_Bash op 14-03-2006 12:00 ]

404 error: File not found | PSN: The_Bash


  • onkl
  • Registratie: Oktober 2002
  • Laatst online: 23:54
Hier een brok werkende code.
Visual Basic:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub Kleurselectie()
Dim kleur As Range
Dim totaalbereik As Range
Dim deelbereik As Range
Dim cel As Range
Set kleur = Application.InputBox("Selecteer een cel met de te selecteren kleur", "Kleurselectie", , , , , , 8)
Set totaalbereik = Application.InputBox("Selecteer het te selecteren vlak", "Kleurselectie", , , , , , 8)
Application.ScreenUpdating = False
Set deelbereik = kleur
For Each cel In totaalbereik
    If cel.Interior.ColorIndex = kleur.Interior.ColorIndex Then
        Set deelbereik = Application.Union(deelbereik, cel)
    End If
Next cel
deelbereik.Select
Application.ScreenUpdating=True
End Sub
Geef aan de eerste inputbox een cel met de goede kleur. Geef aan de tweede box de cellen waarin je wilt zoeken.