J'ai associé une cellule dans une feuille de calcul, à une liste de
validation, parfait elle fonctionne comme je espérai. Par contre la police
pour afficher cette liste est vraiment petite. Peut-on la changer ? et si
oui comment.
Merci pour vos réponses.
Alt+F11 quand tu es sur la feuille concernée, ouvre Microsoft Visual Basic (VBA). double cliquer dans la fenêtre VBAProject (normalement en haut à gauche de l'écran) sur l'icone de la feuille concernée, Coller le code dans la fenetre de droite, L'adapter en fonction de la cellule dans laquelle se trouve ta validation par liste (A1 sur l'exemple) fermer VBA avec la croix de fermeture, Et tester le résultat en cliquant sur cette cellule, puis sur une autre.
Puis nous dire si ça le fait . (optionnel, mais apprécié) ;-)
-- Bien cordialement, P. Bastard
Merci de tes infos, mais je n'ai pas suffisamment d'expérience pour appliquer tes conseils. Je mets ce code dans Module ou Workbook. Dois je modifier quelque chose. quand est il invoqué ? Excuses pour ce manque d'expérience.
"Patrick BASTARD" a écrit dans le message de news: u$
Bonjour, *Polio2004* J'ai lu ton post avec le plus grand intéret :
A recopier dans le module de ta feuille :
'pour zoomer sur A1 lors de la sélection par liste Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next If Target.Address <> "$A$1" Then ActiveWindow.Zoom = 100 Else ActiveWindow.Zoom = 300 End If End Sub
-- Bien cordialement, P. Bastard
J'ai associé une cellule dans une feuille de calcul, à une liste de validation, parfait elle fonctionne comme je espérai. Par contre la police pour afficher cette liste est vraiment petite. Peut-on la changer ? et si oui comment. Merci pour vos réponses.
Bonjour, *Polio2004*
Comme je te l'ai dit :
A recopier dans le module de ta feuille.
Alt+F11 quand tu es sur la feuille concernée, ouvre Microsoft Visual Basic
(VBA).
double cliquer dans la fenêtre VBAProject (normalement en haut à gauche de
l'écran) sur l'icone de la feuille concernée,
Coller le code dans la fenetre de droite,
L'adapter en fonction de la cellule dans laquelle se trouve ta validation
par liste (A1 sur l'exemple)
fermer VBA avec la croix de fermeture,
Et tester le résultat en cliquant sur cette cellule, puis sur une autre.
Puis nous dire si ça le fait .
(optionnel, mais apprécié)
;-)
--
Bien cordialement,
P. Bastard
Merci de tes infos, mais je n'ai pas suffisamment d'expérience pour
appliquer tes conseils. Je mets ce code dans Module ou Workbook. Dois
je modifier quelque chose. quand est il invoqué ?
Excuses pour ce manque d'expérience.
"Patrick BASTARD" <pasdespambastardp@freepasdespam.fr> a écrit dans le
message de news: u$Oj6zOHFHA.2156@TK2MSFTNGP09.phx.gbl...
Bonjour, *Polio2004*
J'ai lu ton post OxyBATNHFHA.3352@TK2MSFTNGP10.phx.gbl
avec le plus grand intéret :
A recopier dans le module de ta feuille :
'pour zoomer sur A1 lors de la sélection par liste
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If Target.Address <> "$A$1" Then
ActiveWindow.Zoom = 100
Else
ActiveWindow.Zoom = 300
End If
End Sub
--
Bien cordialement,
P. Bastard
J'ai associé une cellule dans une feuille de calcul, à une liste de
validation, parfait elle fonctionne comme je espérai. Par contre la
police pour afficher cette liste est vraiment petite. Peut-on la
changer ? et si oui comment.
Merci pour vos réponses.
Alt+F11 quand tu es sur la feuille concernée, ouvre Microsoft Visual Basic (VBA). double cliquer dans la fenêtre VBAProject (normalement en haut à gauche de l'écran) sur l'icone de la feuille concernée, Coller le code dans la fenetre de droite, L'adapter en fonction de la cellule dans laquelle se trouve ta validation par liste (A1 sur l'exemple) fermer VBA avec la croix de fermeture, Et tester le résultat en cliquant sur cette cellule, puis sur une autre.
Puis nous dire si ça le fait . (optionnel, mais apprécié) ;-)
-- Bien cordialement, P. Bastard
Merci de tes infos, mais je n'ai pas suffisamment d'expérience pour appliquer tes conseils. Je mets ce code dans Module ou Workbook. Dois je modifier quelque chose. quand est il invoqué ? Excuses pour ce manque d'expérience.
"Patrick BASTARD" a écrit dans le message de news: u$
Bonjour, *Polio2004* J'ai lu ton post avec le plus grand intéret :
A recopier dans le module de ta feuille :
'pour zoomer sur A1 lors de la sélection par liste Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next If Target.Address <> "$A$1" Then ActiveWindow.Zoom = 100 Else ActiveWindow.Zoom = 300 End If End Sub
-- Bien cordialement, P. Bastard
J'ai associé une cellule dans une feuille de calcul, à une liste de validation, parfait elle fonctionne comme je espérai. Par contre la police pour afficher cette liste est vraiment petite. Peut-on la changer ? et si oui comment. Merci pour vos réponses.
AV
Il n'y a que le zoom pour varier la taille des caractères dans ce cas en Xl97, les suivants ne sais pas.
Ok, ok mais l'histoire du zoom (avis perso) c'est pas vraiment une réponse à une question qui n'a pas de solution.. Dans le même ordre d'idée, pourquoi pas prendre une loupe ou changer de lunettes ? ;-) AV
Il n'y a que le zoom pour varier la taille des caractères dans ce cas en
Xl97, les suivants ne sais pas.
Ok, ok mais l'histoire du zoom (avis perso) c'est pas vraiment une réponse à une
question qui n'a pas de solution..
Dans le même ordre d'idée, pourquoi pas prendre une loupe ou changer de lunettes
?
;-)
AV
Il n'y a que le zoom pour varier la taille des caractères dans ce cas en Xl97, les suivants ne sais pas.
Ok, ok mais l'histoire du zoom (avis perso) c'est pas vraiment une réponse à une question qui n'a pas de solution.. Dans le même ordre d'idée, pourquoi pas prendre une loupe ou changer de lunettes ? ;-) AV
Polio2004
Oui, cette solution marche bien, je vais la modifier pour l'adapter à mon application. Encore merci pour ton aide.
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Polio2004*
Comme je te l'ai dit :
A recopier dans le module de ta feuille.
Alt+F11 quand tu es sur la feuille concernée, ouvre Microsoft Visual Basic (VBA). double cliquer dans la fenêtre VBAProject (normalement en haut à gauche de l'écran) sur l'icone de la feuille concernée, Coller le code dans la fenetre de droite, L'adapter en fonction de la cellule dans laquelle se trouve ta validation par liste (A1 sur l'exemple) fermer VBA avec la croix de fermeture, Et tester le résultat en cliquant sur cette cellule, puis sur une autre.
Puis nous dire si ça le fait . (optionnel, mais apprécié) ;-)
-- Bien cordialement, P. Bastard
Merci de tes infos, mais je n'ai pas suffisamment d'expérience pour appliquer tes conseils. Je mets ce code dans Module ou Workbook. Dois je modifier quelque chose. quand est il invoqué ? Excuses pour ce manque d'expérience.
"Patrick BASTARD" a écrit dans le message de news: u$
Bonjour, *Polio2004* J'ai lu ton post avec le plus grand intéret :
A recopier dans le module de ta feuille :
'pour zoomer sur A1 lors de la sélection par liste Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next If Target.Address <> "$A$1" Then ActiveWindow.Zoom = 100 Else ActiveWindow.Zoom = 300 End If End Sub
-- Bien cordialement, P. Bastard
J'ai associé une cellule dans une feuille de calcul, à une liste de validation, parfait elle fonctionne comme je espérai. Par contre la police pour afficher cette liste est vraiment petite. Peut-on la changer ? et si oui comment. Merci pour vos réponses.
Oui, cette solution marche bien, je vais la modifier pour l'adapter à mon
application.
Encore merci pour ton aide.
"Patrick BASTARD" <pasdespambastardp@freepasdespam.fr> a écrit dans le
message de news: OBb3N4QHFHA.3612@TK2MSFTNGP09.phx.gbl...
Bonjour, *Polio2004*
Comme je te l'ai dit :
A recopier dans le module de ta feuille.
Alt+F11 quand tu es sur la feuille concernée, ouvre Microsoft Visual Basic
(VBA).
double cliquer dans la fenêtre VBAProject (normalement en haut à gauche de
l'écran) sur l'icone de la feuille concernée,
Coller le code dans la fenetre de droite,
L'adapter en fonction de la cellule dans laquelle se trouve ta validation
par liste (A1 sur l'exemple)
fermer VBA avec la croix de fermeture,
Et tester le résultat en cliquant sur cette cellule, puis sur une autre.
Puis nous dire si ça le fait .
(optionnel, mais apprécié)
;-)
--
Bien cordialement,
P. Bastard
Merci de tes infos, mais je n'ai pas suffisamment d'expérience pour
appliquer tes conseils. Je mets ce code dans Module ou Workbook. Dois
je modifier quelque chose. quand est il invoqué ?
Excuses pour ce manque d'expérience.
"Patrick BASTARD" <pasdespambastardp@freepasdespam.fr> a écrit dans le
message de news: u$Oj6zOHFHA.2156@TK2MSFTNGP09.phx.gbl...
Bonjour, *Polio2004*
J'ai lu ton post OxyBATNHFHA.3352@TK2MSFTNGP10.phx.gbl
avec le plus grand intéret :
A recopier dans le module de ta feuille :
'pour zoomer sur A1 lors de la sélection par liste
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If Target.Address <> "$A$1" Then
ActiveWindow.Zoom = 100
Else
ActiveWindow.Zoom = 300
End If
End Sub
--
Bien cordialement,
P. Bastard
J'ai associé une cellule dans une feuille de calcul, à une liste de
validation, parfait elle fonctionne comme je espérai. Par contre la
police pour afficher cette liste est vraiment petite. Peut-on la
changer ? et si oui comment.
Merci pour vos réponses.
Oui, cette solution marche bien, je vais la modifier pour l'adapter à mon application. Encore merci pour ton aide.
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Polio2004*
Comme je te l'ai dit :
A recopier dans le module de ta feuille.
Alt+F11 quand tu es sur la feuille concernée, ouvre Microsoft Visual Basic (VBA). double cliquer dans la fenêtre VBAProject (normalement en haut à gauche de l'écran) sur l'icone de la feuille concernée, Coller le code dans la fenetre de droite, L'adapter en fonction de la cellule dans laquelle se trouve ta validation par liste (A1 sur l'exemple) fermer VBA avec la croix de fermeture, Et tester le résultat en cliquant sur cette cellule, puis sur une autre.
Puis nous dire si ça le fait . (optionnel, mais apprécié) ;-)
-- Bien cordialement, P. Bastard
Merci de tes infos, mais je n'ai pas suffisamment d'expérience pour appliquer tes conseils. Je mets ce code dans Module ou Workbook. Dois je modifier quelque chose. quand est il invoqué ? Excuses pour ce manque d'expérience.
"Patrick BASTARD" a écrit dans le message de news: u$
Bonjour, *Polio2004* J'ai lu ton post avec le plus grand intéret :
A recopier dans le module de ta feuille :
'pour zoomer sur A1 lors de la sélection par liste Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next If Target.Address <> "$A$1" Then ActiveWindow.Zoom = 100 Else ActiveWindow.Zoom = 300 End If End Sub
-- Bien cordialement, P. Bastard
J'ai associé une cellule dans une feuille de calcul, à une liste de validation, parfait elle fonctionne comme je espérai. Par contre la police pour afficher cette liste est vraiment petite. Peut-on la changer ? et si oui comment. Merci pour vos réponses.
