Repérer visuellement dans une feuille de calcul les cellules non protégées
Soyez le premier à donner votre avis sur cette source.
Snippet vu 5 408 fois - Téléchargée 37 fois
Contenu du snippet
Repérer visuellement dans une feuille de calcul les cellules non protégées
source net
source net
Source / Exemple :
Attribute VB_Name = "VoirCellulesNonProtegees"
'Pour repérer visuellement dans une feuille de calcul
'quelles sont les cellules non protégées
'(ici mises en jaune)
Sub CellulesNonProtegees()
lastrw = Selection.SpecialCells(xlCellTypeLastCell).Row
lastclm = Selection.SpecialCells(xlCellTypeLastCell).Column
For rowidx = 1 To lastrw
For clmidx = 1 To lastclm
If Cells(rowidx, clmidx).Locked = False Then
Cells(rowidx, clmidx).Interior.ColorIndex = 6
Cells(rowidx, clmidx).Interior.Pattern = xlSolid
End If
Next
Next
End Sub
A voir également
- Repérer visuellement dans une feuille de calcul les cellules non protégées
- Vba copier valeur cellule dans une autre feuille ✓ - Forum Visual Basic
- Copier cellule dans autre feuille (vba) - Forum Visual Basic
- Copier le contenu d'une feuille excel dans une autre - Forum Visual Basic
- La cellule ou le graphique que vous essayez de modifier se trouve sur une feuille protégée ✓ - Forum VB.NET
- Copier coller valeurs d'une feuille vers une autre feuille à partir de la premiè ✓ - Forum Visual Basic 6
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.