Bonjour,
J'ai un calendrier théorique que je remets à jour chaque mois, en fonction
du premier jour de la semaine que je rentre dans une cellule, j'ai créé une
macro qui va me construire mon calendrier mensuel en mettant des couleurs
pour les WE, et pour les vendredis une couleur différente, donc ça c'est
bon, je suis arrivée à le faire,ce que je souhaiterais c'est que dans la
cellule de mes vendredis j'ai "Vendredi Hebdo" qui se mette d'office en
couleur écriture "turquoise clair" car en fond de cellule j'ai un bleu assez
fonçé, comment rajouter cette option dans ma macro qui est la suivante :
.../
vabas
Loop
Range("a9").Select
Do While ActiveCell <> ""
If ActiveCell = "Vendredi" Then
vadroite
vadroite
vadroite
Selection.Interior.ColorIndex = 55
vagauche1
End If
vabas
Loop
Range("b9").Select
/...
Par avance merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
FdeCourt
Salut,
Pour la couleur de la police c'est : Selection.Font.ColorIndex = 8
Mets : With Selection .Interior.ColorIndex = 55 .Font.ColorIndex = 8 End With
A la place de Selection.Interior.ColorIndex = 55
Bonjour, J'ai un calendrier théorique que je remets à jour chaque mois, en fon ction du premier jour de la semaine que je rentre dans une cellule, j'ai cré é une macro qui va me construire mon calendrier mensuel en mettant des couleurs pour les WE, et pour les vendredis une couleur différente, donc ça c' est bon, je suis arrivée à le faire,ce que je souhaiterais c'est que dans la cellule de mes vendredis j'ai "Vendredi Hebdo" qui se mette d'office en couleur écriture "turquoise clair" car en fond de cellule j'ai un bleu assez fonçé, comment rajouter cette option dans ma macro qui est la suivant e : .../ vabas Loop Range("a9").Select Do While ActiveCell <> "" If ActiveCell = "Vendredi" Then vadroite vadroite vadroite Selection.Interior.ColorIndex = 55 vagauche1 End If vabas Loop Range("b9").Select /... Par avance merci
Salut,
Pour la couleur de la police c'est : Selection.Font.ColorIndex = 8
Mets :
With Selection
.Interior.ColorIndex = 55
.Font.ColorIndex = 8
End With
A la place de Selection.Interior.ColorIndex = 55
Bonjour,
J'ai un calendrier théorique que je remets à jour chaque mois, en fon ction
du premier jour de la semaine que je rentre dans une cellule, j'ai cré é une
macro qui va me construire mon calendrier mensuel en mettant des couleurs
pour les WE, et pour les vendredis une couleur différente, donc ça c' est
bon, je suis arrivée à le faire,ce que je souhaiterais c'est que dans la
cellule de mes vendredis j'ai "Vendredi Hebdo" qui se mette d'office en
couleur écriture "turquoise clair" car en fond de cellule j'ai un bleu assez
fonçé, comment rajouter cette option dans ma macro qui est la suivant e :
.../
vabas
Loop
Range("a9").Select
Do While ActiveCell <> ""
If ActiveCell = "Vendredi" Then
vadroite
vadroite
vadroite
Selection.Interior.ColorIndex = 55
vagauche1
End If
vabas
Loop
Range("b9").Select
/...
Par avance merci
Pour la couleur de la police c'est : Selection.Font.ColorIndex = 8
Mets : With Selection .Interior.ColorIndex = 55 .Font.ColorIndex = 8 End With
A la place de Selection.Interior.ColorIndex = 55
Bonjour, J'ai un calendrier théorique que je remets à jour chaque mois, en fon ction du premier jour de la semaine que je rentre dans une cellule, j'ai cré é une macro qui va me construire mon calendrier mensuel en mettant des couleurs pour les WE, et pour les vendredis une couleur différente, donc ça c' est bon, je suis arrivée à le faire,ce que je souhaiterais c'est que dans la cellule de mes vendredis j'ai "Vendredi Hebdo" qui se mette d'office en couleur écriture "turquoise clair" car en fond de cellule j'ai un bleu assez fonçé, comment rajouter cette option dans ma macro qui est la suivant e : .../ vabas Loop Range("a9").Select Do While ActiveCell <> "" If ActiveCell = "Vendredi" Then vadroite vadroite vadroite Selection.Interior.ColorIndex = 55 vagauche1 End If vabas Loop Range("b9").Select /... Par avance merci
JB
Bonjour,
Pourquoi ne pas utiliser les MFC plutôt qu'une macro?
Bonjour, J'ai un calendrier théorique que je remets à jour chaque mois, en fon ction du premier jour de la semaine que je rentre dans une cellule, j'ai cré é une macro qui va me construire mon calendrier mensuel en mettant des couleurs pour les WE, et pour les vendredis une couleur différente, donc ça c' est bon, je suis arrivée à le faire,ce que je souhaiterais c'est que dans la cellule de mes vendredis j'ai "Vendredi Hebdo" qui se mette d'office en couleur écriture "turquoise clair" car en fond de cellule j'ai un bleu assez fonçé, comment rajouter cette option dans ma macro qui est la suivant e : .../ vabas Loop Range("a9").Select Do While ActiveCell <> "" If ActiveCell = "Vendredi" Then vadroite vadroite vadroite Selection.Interior.ColorIndex = 55 vagauche1 End If vabas Loop Range("b9").Select /... Par avance merci
Bonjour,
Pourquoi ne pas utiliser les MFC plutôt qu'une macro?
Bonjour,
J'ai un calendrier théorique que je remets à jour chaque mois, en fon ction
du premier jour de la semaine que je rentre dans une cellule, j'ai cré é une
macro qui va me construire mon calendrier mensuel en mettant des couleurs
pour les WE, et pour les vendredis une couleur différente, donc ça c' est
bon, je suis arrivée à le faire,ce que je souhaiterais c'est que dans la
cellule de mes vendredis j'ai "Vendredi Hebdo" qui se mette d'office en
couleur écriture "turquoise clair" car en fond de cellule j'ai un bleu assez
fonçé, comment rajouter cette option dans ma macro qui est la suivant e :
.../
vabas
Loop
Range("a9").Select
Do While ActiveCell <> ""
If ActiveCell = "Vendredi" Then
vadroite
vadroite
vadroite
Selection.Interior.ColorIndex = 55
vagauche1
End If
vabas
Loop
Range("b9").Select
/...
Par avance merci
Bonjour, J'ai un calendrier théorique que je remets à jour chaque mois, en fon ction du premier jour de la semaine que je rentre dans une cellule, j'ai cré é une macro qui va me construire mon calendrier mensuel en mettant des couleurs pour les WE, et pour les vendredis une couleur différente, donc ça c' est bon, je suis arrivée à le faire,ce que je souhaiterais c'est que dans la cellule de mes vendredis j'ai "Vendredi Hebdo" qui se mette d'office en couleur écriture "turquoise clair" car en fond de cellule j'ai un bleu assez fonçé, comment rajouter cette option dans ma macro qui est la suivant e : .../ vabas Loop Range("a9").Select Do While ActiveCell <> "" If ActiveCell = "Vendredi" Then vadroite vadroite vadroite Selection.Interior.ColorIndex = 55 vagauche1 End If vabas Loop Range("b9").Select /... Par avance merci
URIANE
Merci pour ta réponse, mais comment lui dire dans ma macro d'écrire le texte suivant "Vendredi Hebdo" dans ma cellule ? Merci
Merci pour ta réponse, mais comment lui dire dans ma macro d'écrire le texte
suivant "Vendredi Hebdo" dans ma cellule ?
Merci
Je ne sais pas si tu as avancé, mais dans le cas contraire, tu peux mettre ton fichier ici www.cjoint.com que nous puissions y jeter un oeil et coir exactement ce que tu souhaites.
On 22 jan, 11:04, "URIANE" wrote:
Merci pour ta réponse, mais comment lui dire dans ma macro d'écrire l e texte suivant "Vendredi Hebdo" dans ma cellule ? Merci
Hello,
Je ne sais pas si tu as avancé, mais dans le cas contraire, tu peux
mettre ton fichier ici www.cjoint.com que nous puissions y jeter un
oeil et coir exactement ce que tu souhaites.
On 22 jan, 11:04, "URIANE" <uri...@yahoo.fr> wrote:
Merci pour ta réponse, mais comment lui dire dans ma macro d'écrire l e texte
suivant "Vendredi Hebdo" dans ma cellule ?
Merci
Je ne sais pas si tu as avancé, mais dans le cas contraire, tu peux mettre ton fichier ici www.cjoint.com que nous puissions y jeter un oeil et coir exactement ce que tu souhaites.
On 22 jan, 11:04, "URIANE" wrote:
Merci pour ta réponse, mais comment lui dire dans ma macro d'écrire l e texte suivant "Vendredi Hebdo" dans ma cellule ? Merci
