Erreur lors du changement de couleur d'une cellule
Fermé
Bob0876
Messages postés
40
Date d'inscription
mardi 16 septembre 2014
Statut
Membre
Dernière intervention
4 décembre 2014
-
Modifié par pijaku le 18/09/2014 à 10:36
Bob0876 Messages postés 40 Date d'inscription mardi 16 septembre 2014 Statut Membre Dernière intervention 4 décembre 2014 - 16 sept. 2014 à 21:51
Bob0876 Messages postés 40 Date d'inscription mardi 16 septembre 2014 Statut Membre Dernière intervention 4 décembre 2014 - 16 sept. 2014 à 21:51
A voir également:
- Erreur lors du changement de couleur d'une cellule
- Excel colorer une cellule sous condition d'une autre cellule ✓ - Forum Excel
- Erreur 1004 vba ✓ - Forum VB / VBA
- Somme si couleur - Guide
- Excel compter cellule couleur sans vba ✓ - Forum Excel
- Youtube une erreur s'est produite ✓ - Forum YouTube
2 réponses
ccm81
Messages postés
10543
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 mars 2023
2 336
Modifié par pijaku le 18/09/2014 à 10:37
Modifié par pijaku le 18/09/2014 à 10:37
Bonjour
Essaies comme ceci
Cdlmnt
Essaies comme ceci
Sheets("Donées").Range("A6:A7").Font.ColorIndex = 3
Cdlmnt
Bob0876
Messages postés
40
Date d'inscription
mardi 16 septembre 2014
Statut
Membre
Dernière intervention
4 décembre 2014
Modifié par pijaku le 18/09/2014 à 10:37
Modifié par pijaku le 18/09/2014 à 10:37
Bonjour,
merci mais j'ai trouver l'erreur. Ces que ma feuille est protégé par un mot de pass.
cependant, j'ai un autre problème. j'aimerais deprotege ma feuille sans qui me demande d'entrée le mot de passe. J'ai fais ceci :
Mais il me demande quand meme le mot de passe!!!
merci mais j'ai trouver l'erreur. Ces que ma feuille est protégé par un mot de pass.
cependant, j'ai un autre problème. j'aimerais deprotege ma feuille sans qui me demande d'entrée le mot de passe. J'ai fais ceci :
Private Sub Workbook_Open()
Dim pass As String
pass = Worksheets("Données").Cells(1, 7).Value
ActiveSheet.Unprotect
Worksheets("Données").Unprotect Password:=pass
Worksheets("Données").Range("F1:G1").Interior.ColorIndex = 2
Worksheets("Données").Protect Password:=pass
ActiveSheet.Protect
protege
ActiveSheet.Shapes("bouton").Visible = False
motdepasse.Show
bouton
End Sub
Mais il me demande quand meme le mot de passe!!!