Hallo Wim,
dat is dezelfde configuratie als die van mij, dus kunnen we moeilijk fout doen.
Open je werkboek Wim.xlsx (waar "Wim" staat voor de naam van jou werkboek).
Klik op de Office-knop (linksboven hoek) en kies voor
Opslaan als: "
Excel map met ingeschakelde macro's"
Het "Opslaan als" bestandbeheer zal openen met als voorstel de bestandsnaam: Wim.xls
mKlik op de knop "
Opslaan".
Open het betreffende werkblad (indien er meerdere zijn).
Zoek in je werkbalk het tabblad "
Ontwikkelaars".
(
Staat dit tabblad er niet, ga als volgt te werk: Klik op de Microsoft Office-knop en klik vervolgens op "Opties voor Excel".
Klik op "Populair" en schakel het selectievakje "Tabblad Ontwikkelaars op het lint weergeven" in.)
- Klik op het tabblad
"Ontwikkelaars" en klik op
"Programmacode weergeven".
- Het Microsoft Visual Basic (VBA) venster opent.
Indien je links geen deelvenster "VBAProject" ziet, klik dan op Beeld, en klik daar op Projectverkenner - In het deelvenster "VBAProject" Vind je
VBAProject (Wim.xlsm)- Indien dit project niet geopend is, klik dan op het plusteken links van de project-naamom de boomstructuur te openen.
- Je ziet nu de namen van de tabbladen die in je werkboek staan.
- Dubbelklik op de naam van het werkblad waarin je de macro wilt uitvoeren (dus het werkblad waarin je de rijen wilt laten kleuren)
- Selecteer de code hieronder en kies voor
Kopiëren (Ctrl+C).
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
Cells.Interior.ColorIndex = 0
Target.EntireRow.Interior.ColorIndex = 8
Application.ScreenUpdating = True
End Sub
- Zet nu de cursor in het rechter vak van het VBA-venster en rechtsklik en kies voor
Plakken (Ctrl+V).
- Sluit het VBA-venster en
sla je werkboek op.
- De macro moet nu werken: telkens je een cel op een andere rij kiest (eender welke kolom) wordt die rij gekleurd.
Indien de opmerking van RedHead hierboven bij jou van toepassing is, dan moet je dit eerst laten weten.
Dan passen we de macro aan zodat de door jou ingekleurde cellen NIET worden betrokken in het proces.
Heb je GEEN zelf ingekleurde cellen in je werkblad, dan is er geen probleem.
In bijlage een (leeg) voorbeeldbestandje.
Groeten,
SoftAid