Soyez le premier à donner votre avis sur cette source.
Snippet vu 18 457 fois - Téléchargée 31 fois
'********************************************************** 'Coder par FeuxX '********************************************************** '================================================ 'dans un Module Global newexcel As New Excel.Application '================================================ '================================================= 'code '================================================= 'j'ouvre excel newexcel.Visible = True 'j'ajout un classeur newexcel.Workbooks.Add ' on met en gras la cellule C2 newexcel.Range("C2").Font.Bold = True ' on enleve le cadrillage newexcel.ActiveWindow.DisplayGridlines = False '==================================================================================== 'Mise en couleur des cellules '============================= 'couleurs '--------- 'Aqua => 8, 28, 33, 34, 42 'Black =)> 1, 51, 52 'Blue =)> 5, 32, 41, 49 'Fuchsia =)> 7, 26 'Gray =)> 16, 46, 47, 48, 56 'Green =)> 10, 43 'Lime =)> 4 'Maroon =)> 9, 30, 53 'Navy =)> 11, 25, 55 'Olive =)> 12, 44, 45 'Purple =)> 13, 18, 21, 29, 54 'Red =)> 3 'Silver =)> 15, 17, 20, 22, 24, 35, 36, 37, 38, 39 'Teal =)> 14, 23, 31, 50 'White =)> 2, 19, 40 'Yellow =)> 6, 27 '------------- 'range(cells(a,b),cells(c,d)) 'procedure de selection de champs '(a,b) = colone 'a= debut de la selection 'b= nombre de champs selectioner apres '(c,d) = ligne 'c= debut de selection 'd= nombre de champs selectioner apres '====================================================================================== 'selectionne la case b2 est la mets de couleur jaune Selection.Range(Cells(2, 2), Cells(2, 3)).Interior.ColorIndex = 6
29 oct. 2004 à 16:16
Est-il possible d'adapter ce code pour qu'une cellule soit coloriée en vert en cas de bonne réponse à une question (dont la réponse est dans une autre cellule masquée) et rouge si la réponse est fausse ?
merci d'avance
29 oct. 2004 à 16:15
Est-il possible d'adapter ce code pour qu'une cellule soit coloriée en vert en cas de bonne réponse à une question (dont la réponse est dans une autre cellule masquée) et rouge si la réponse est fausse ?
merci d'avance
8 déc. 2003 à 22:23
Merci m'sieur
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.