[VBExcel]_Rech.adresse cells ds une selection
yulu@tele2.fr
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
JvDo Messages postés 1978 Date d'inscription Statut Membre Dernière intervention -
JvDo Messages postés 1978 Date d'inscription Statut Membre Dernière intervention -
je viens de charger cette macro sur le net
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> "$B$95" Then
ActiveWindow.Zoom = 55
Else
ActiveWindow.Zoom = 100
End If
End Sub
afin de surseoir à un défaut ( je croie) d'excel lors de la consultation d'une liste déroulante via "Validation des données".
cette option, plus pratique à mettre en oeuvre que les comboBOx et autres...ne permet pas de modifier la taille des polices consultées lorsque l'on se trouve à zoom faible.
Donc la seule astuce c'est de zoomer dessus lorsqu'on la sélectionne....
certes c'est bien..mais j'ai plusieurs cellules dans ce cas sur mon tableau...et comme je suis ultra novice dans le domaine, je n'arrive pas à modifier le code ci-dessus pour qu'il "pioche" dans une selection de cellules que j'aurais prédéfini
vous suivez ?
merci d'avance pour vos réponses et à dispo pour détailler
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> "$B$95" Then
ActiveWindow.Zoom = 55
Else
ActiveWindow.Zoom = 100
End If
End Sub
afin de surseoir à un défaut ( je croie) d'excel lors de la consultation d'une liste déroulante via "Validation des données".
cette option, plus pratique à mettre en oeuvre que les comboBOx et autres...ne permet pas de modifier la taille des polices consultées lorsque l'on se trouve à zoom faible.
Donc la seule astuce c'est de zoomer dessus lorsqu'on la sélectionne....
certes c'est bien..mais j'ai plusieurs cellules dans ce cas sur mon tableau...et comme je suis ultra novice dans le domaine, je n'arrive pas à modifier le code ci-dessus pour qu'il "pioche" dans une selection de cellules que j'aurais prédéfini
vous suivez ?
merci d'avance pour vos réponses et à dispo pour détailler
A voir également:
- [VBExcel]_Rech.adresse cells ds une selection
- Ds clock - Télécharger - Bureautique
- Sims 2 zarbville ds code triche ✓ - Forum Jeux vidéo
- Inverser selection excel - Forum Excel
- Comment réinitialiser nintendogs ds ✓ - Forum Jeux vidéo
- Recommencer le jeu nintendogs - Forum Jeux vidéo
3 réponses
Bonjour,
tu pourrais te définir un nom pour l'ensemble des cellules sur lesquelles tu veux gérer le zoom.
ensuite dans la macro évènementielle, tu teste l'intersection de target avec la zone nommée.
si l'intersection n'est pas vide, tu zoomes
sinon.... rien
A+
tu pourrais te définir un nom pour l'ensemble des cellules sur lesquelles tu veux gérer le zoom.
ensuite dans la macro évènementielle, tu teste l'intersection de target avec la zone nommée.
si l'intersection n'est pas vide, tu zoomes
sinon.... rien
A+
merci pour l'astuce
mais quand tu dis "tester l'intersection", je traduis par, si ma zone s'appelle par ex. "PARAMZOOM",:
If Target.Address =PARAMZOOM....?
d'autre part, je viens de constater qu'un phénomène pernicieux se mettait en place à l'usage de ce code,
en effet, la fonction"annuler" d'excel n'est plus dispo !!!
impossible d'annuler les précédentes actions..tout semble "figé" dans le présent..quid? comment se faisse ?
merci d'avance encore
mais quand tu dis "tester l'intersection", je traduis par, si ma zone s'appelle par ex. "PARAMZOOM",:
If Target.Address =PARAMZOOM....?
d'autre part, je viens de constater qu'un phénomène pernicieux se mettait en place à l'usage de ce code,
en effet, la fonction"annuler" d'excel n'est plus dispo !!!
impossible d'annuler les précédentes actions..tout semble "figé" dans le présent..quid? comment se faisse ?
merci d'avance encore
