Bonjour à toutes et à tous
La ligne ci dessous "Pour mettre en gras" est erronée,
quelle syntaxe utiliser pour le faire?
If Month(j) <> Month(Jour.Value) Then
'Extrait de CalFr2 de Daniel M Merci à lui.
cntrl.ForeColor = &H80000011 'si le jour est dans le mois, fort
constraste
cntrl.Font.style = "GRAS" '*************** pour
mettre en Gras *********************
Else
cntrl.ForeColor = &H800000 'sinon semaine prec et suiv, faible
contraste
End If
Désolé ...pour toi ... Cà marche avec Excel 2000 ...
Jacques93
Bonjour Thierry K,
cntrl.Font.Bold = True
pour passer en gras, et
cntrl.Font.Bold = False
pore revenir en "normal"
Bonjour à toutes et à tous La ligne ci dessous "Pour mettre en gras" est erronée, quelle syntaxe utiliser pour le faire?
If Month(j) <> Month(Jour.Value) Then 'Extrait de CalFr2 de Daniel M Merci à lui. cntrl.ForeColor = &H80000011 'si le jour est dans le mois, fort constraste
cntrl.Font.style = "GRAS" '*************** pour mettre en Gras *********************
Else cntrl.ForeColor = &H800000 'sinon semaine prec et suiv, faible contraste End If
Office Pro 2003 Win XP Pro SP2
Merci d'avance pour vos conseils
pour répondre, enlever w x y z
Thierry K
-- Cordialement,
Jacques.
Bonjour Thierry K,
cntrl.Font.Bold = True
pour passer en gras, et
cntrl.Font.Bold = False
pore revenir en "normal"
Bonjour à toutes et à tous
La ligne ci dessous "Pour mettre en gras" est erronée,
quelle syntaxe utiliser pour le faire?
If Month(j) <> Month(Jour.Value) Then
'Extrait de CalFr2 de Daniel M Merci à lui.
cntrl.ForeColor = &H80000011 'si le jour est dans le mois, fort
constraste
cntrl.Font.style = "GRAS" '*************** pour
mettre en Gras *********************
Else
cntrl.ForeColor = &H800000 'sinon semaine prec et suiv, faible
contraste
End If
Bonjour à toutes et à tous La ligne ci dessous "Pour mettre en gras" est erronée, quelle syntaxe utiliser pour le faire?
If Month(j) <> Month(Jour.Value) Then 'Extrait de CalFr2 de Daniel M Merci à lui. cntrl.ForeColor = &H80000011 'si le jour est dans le mois, fort constraste
cntrl.Font.style = "GRAS" '*************** pour mettre en Gras *********************
Else cntrl.ForeColor = &H800000 'sinon semaine prec et suiv, faible contraste End If
Office Pro 2003 Win XP Pro SP2
Merci d'avance pour vos conseils
pour répondre, enlever w x y z
Thierry K
-- Cordialement,
Jacques.
Thierry K
ça marche,
c'est bien Bold=true
merci Jacques93 merci également à Carim
pour votre promptitude et vos conseils pour secourir les bidouilleurs désirant reculer les limites de leurs connaissances.
Cordialement
Thierry K "Jacques93" a écrit dans le message de news: %
Bonjour Thierry K,
cntrl.Font.Bold = True
pour passer en gras, et
cntrl.Font.Bold = False
pore revenir en "normal"
Bonjour à toutes et à tous La ligne ci dessous "Pour mettre en gras" est erronée, quelle syntaxe utiliser pour le faire?
If Month(j) <> Month(Jour.Value) Then 'Extrait de CalFr2 de Daniel M Merci à lui. cntrl.ForeColor = &H80000011 'si le jour est dans le mois, fort constraste
cntrl.Font.style = "GRAS" '*************** pour mettre en Gras *********************
Else cntrl.ForeColor = &H800000 'sinon semaine prec et suiv, faible contraste End If
Office Pro 2003 Win XP Pro SP2
Merci d'avance pour vos conseils
pour répondre, enlever w x y z
Thierry K
-- Cordialement,
Jacques.
ça marche,
c'est bien Bold=true
merci Jacques93
merci également à Carim
pour votre promptitude et vos conseils pour secourir les bidouilleurs
désirant reculer les limites de leurs connaissances.
Cordialement
Thierry K
"Jacques93" <jacques@Nospam> a écrit dans le message de news:
%23WAPk2lZHHA.4396@TK2MSFTNGP06.phx.gbl...
Bonjour Thierry K,
cntrl.Font.Bold = True
pour passer en gras, et
cntrl.Font.Bold = False
pore revenir en "normal"
Bonjour à toutes et à tous
La ligne ci dessous "Pour mettre en gras" est erronée,
quelle syntaxe utiliser pour le faire?
If Month(j) <> Month(Jour.Value) Then
'Extrait de CalFr2 de Daniel M Merci à lui.
cntrl.ForeColor = &H80000011 'si le jour est dans le mois,
fort constraste
cntrl.Font.style = "GRAS" '*************** pour
mettre en Gras *********************
Else
cntrl.ForeColor = &H800000 'sinon semaine prec et suiv, faible
contraste
End If
pour votre promptitude et vos conseils pour secourir les bidouilleurs désirant reculer les limites de leurs connaissances.
Cordialement
Thierry K "Jacques93" a écrit dans le message de news: %
Bonjour Thierry K,
cntrl.Font.Bold = True
pour passer en gras, et
cntrl.Font.Bold = False
pore revenir en "normal"
Bonjour à toutes et à tous La ligne ci dessous "Pour mettre en gras" est erronée, quelle syntaxe utiliser pour le faire?
If Month(j) <> Month(Jour.Value) Then 'Extrait de CalFr2 de Daniel M Merci à lui. cntrl.ForeColor = &H80000011 'si le jour est dans le mois, fort constraste
cntrl.Font.style = "GRAS" '*************** pour mettre en Gras *********************
Else cntrl.ForeColor = &H800000 'sinon semaine prec et suiv, faible contraste End If