• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

rij opmaken

Status
Niet open voor verdere reacties.

ronnie123

Gebruiker
Lid geworden
21 nov 2007
Berichten
595
hallo mensen
hoe kan ik met voorwaardelijke opmaak de rij kleuren tot kolom M
als in de rij kolom A geselecteerd is.
dus als A1 geselecteerd is moet A1 t/m M1 gekleurd worden
dit tot rij 200
groetjes ronnie
 
Bvb voor achter het betreffende werkblad in de VBA editor

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A200")) Is Nothing Then
  Range("A1:M200").Interior.ColorIndex = 0
  Target.Resize(, 13).Interior.ColorIndex = 6
End If
End Sub
 
Ook met VO en alleen.....
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Application.ScreenUpdating = True
End Sub

..als code.
 

Bijlagen

  • Rij kleurt mee.xlsb
    14,4 KB · Weergaven: 36
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan