Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Rebonjour "Most",Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le week-end
;-)
--
Tisane
Rebonjour "Most",
Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le week-end
;-)
--
Tisane
Rebonjour "Most",Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le week-end
;-)
--
Tisane
En effet ce que vous me proposez est trop compliqué pour moi.
Rebonjour "Most",Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de
politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer
ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ
de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le
week-end
;-)
--
Tisane
En effet ce que vous me proposez est trop compliqué pour moi.
Rebonjour "Most",
Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de
politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer
ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ
de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le
week-end
;-)
--
Tisane
En effet ce que vous me proposez est trop compliqué pour moi.
Rebonjour "Most",Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de
politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer
ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ
de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le
week-end
;-)
--
Tisane
En effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et 1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
TisaneRebonjour "Most",Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de
politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer
ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ
de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le
week-end
;-)
--
Tisane
En effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et 1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
Tisane
Rebonjour "Most",
Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de
politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer
ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ
de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le
week-end
;-)
--
Tisane
En effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et 1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
TisaneRebonjour "Most",Comment créer un lien hyprtexte qui démasque juste en dessous un texte
caché ?
Là, tu t'y prends mal. Si tu oublies maintenant les formules de
politesse,
tu vas te faire "jeter"...
J'ai répondu à ton dernier message.
Voici un complément :
Mettre le texte dans une ligne de tableau réduite à 0,1 cm pour masquer
ou
de hauteur libre pour afficher me semble jouable.
Essaie d'autoenregistrer la macro.
Pour le "lien", il ne sera pas hypertexte, mais plutôt un code de champ
de
type { macrobutton nom_macro Texte du lien }.
D'autres contributeurs interviendront certainement, mais c'est le
week-end
;-)
--
Tisane
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas encore
possible sur word. Ce que vous me proposez est trop compliqué pour un novice
comme moi en langage informatique.
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas encore
possible sur word. Ce que vous me proposez est trop compliqué pour un novice
comme moi en langage informatique.
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas encore
possible sur word. Ce que vous me proposez est trop compliqué pour un novice
comme moi en langage informatique.
Bonjour !
'Most' nous a écrit ...J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas encore
possible sur word. Ce que vous me proposez est trop compliqué pour un novice
comme moi en langage informatique.
En réalité ce que vous demandez n'est pas du tout pour Word !!!
Word est un traitement de texte.
Sa finalité reste de produire des documents /imprimés/
Une page dynamique avec du texte qui 's'ouvre' sur un lien, on voit ça
sur des pages Web. Et Word, même dans sa dernière version reste
un très mauvais éditeur de pages Web. Question d'outil !
Songez par exemple que votre texte accordéon va totalement bouleverser
la mise en page de votre document (nombre de pages, renvois, table
des matières etc.)
Word étant très puissant et programmable, il /peut/ le faire
mais il est normal que ça ne soit pas aussi évident que de
mettre un titre en gras...
Toutes sortes d'objets peuvent être collapsés.
La macro proposée par Tisane utilisant un tableau d'une ligne
peut être unifiée pour chaque bouton-macro :
{ MacroButton AfficherMasquerTableauSuivant Titre (double-clic pour
afficher/masquer le détail) }
Sub AfficherMasquerTableauSuivant()
With ActiveDocument.Range(Selection.End, _
ActiveDocument.Content.End).Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
End If
End With
End Sub
Anacoluthe
« Si l'homme ne façonne pas ses outils, les outils le façonneront. »
- Arthur MILLER
Bonjour !
'Most' nous a écrit ...
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas encore
possible sur word. Ce que vous me proposez est trop compliqué pour un novice
comme moi en langage informatique.
En réalité ce que vous demandez n'est pas du tout pour Word !!!
Word est un traitement de texte.
Sa finalité reste de produire des documents /imprimés/
Une page dynamique avec du texte qui 's'ouvre' sur un lien, on voit ça
sur des pages Web. Et Word, même dans sa dernière version reste
un très mauvais éditeur de pages Web. Question d'outil !
Songez par exemple que votre texte accordéon va totalement bouleverser
la mise en page de votre document (nombre de pages, renvois, table
des matières etc.)
Word étant très puissant et programmable, il /peut/ le faire
mais il est normal que ça ne soit pas aussi évident que de
mettre un titre en gras...
Toutes sortes d'objets peuvent être collapsés.
La macro proposée par Tisane utilisant un tableau d'une ligne
peut être unifiée pour chaque bouton-macro :
{ MacroButton AfficherMasquerTableauSuivant Titre (double-clic pour
afficher/masquer le détail) }
Sub AfficherMasquerTableauSuivant()
With ActiveDocument.Range(Selection.End, _
ActiveDocument.Content.End).Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
End If
End With
End Sub
Anacoluthe
« Si l'homme ne façonne pas ses outils, les outils le façonneront. »
- Arthur MILLER
Bonjour !
'Most' nous a écrit ...J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas encore
possible sur word. Ce que vous me proposez est trop compliqué pour un novice
comme moi en langage informatique.
En réalité ce que vous demandez n'est pas du tout pour Word !!!
Word est un traitement de texte.
Sa finalité reste de produire des documents /imprimés/
Une page dynamique avec du texte qui 's'ouvre' sur un lien, on voit ça
sur des pages Web. Et Word, même dans sa dernière version reste
un très mauvais éditeur de pages Web. Question d'outil !
Songez par exemple que votre texte accordéon va totalement bouleverser
la mise en page de votre document (nombre de pages, renvois, table
des matières etc.)
Word étant très puissant et programmable, il /peut/ le faire
mais il est normal que ça ne soit pas aussi évident que de
mettre un titre en gras...
Toutes sortes d'objets peuvent être collapsés.
La macro proposée par Tisane utilisant un tableau d'une ligne
peut être unifiée pour chaque bouton-macro :
{ MacroButton AfficherMasquerTableauSuivant Titre (double-clic pour
afficher/masquer le détail) }
Sub AfficherMasquerTableauSuivant()
With ActiveDocument.Range(Selection.End, _
ActiveDocument.Content.End).Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
End If
End With
End Sub
Anacoluthe
« Si l'homme ne façonne pas ses outils, les outils le façonneront. »
- Arthur MILLER
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas
encore
possible sur word. Ce que vous me proposez est trop compliqué pour un
novice
comme moi en langage informatique.
En effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta
demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois
quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou
non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et
1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le
titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace
dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est
perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
Tisane
[...]
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas
encore
possible sur word. Ce que vous me proposez est trop compliqué pour un
novice
comme moi en langage informatique.
En effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta
demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois
quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou
non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et
1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le
titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace
dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est
perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
Tisane
[...]
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas
encore
possible sur word. Ce que vous me proposez est trop compliqué pour un
novice
comme moi en langage informatique.
En effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta
demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois
quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou
non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et
1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le
titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace
dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est
perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
Tisane
[...]
En réalité ce que vous demandez n'est pas du tout pour Word !!!
Word est un traitement de texte.
Sa finalité reste de produire des documents /imprimés/
Songez par exemple que votre texte accordéon va totalement bouleverser
la mise en page de votre document (nombre de pages, renvois, table
des matières etc.)
[...]
En réalité ce que vous demandez n'est pas du tout pour Word !!!
Word est un traitement de texte.
Sa finalité reste de produire des documents /imprimés/
Songez par exemple que votre texte accordéon va totalement bouleverser
la mise en page de votre document (nombre de pages, renvois, table
des matières etc.)
[...]
En réalité ce que vous demandez n'est pas du tout pour Word !!!
Word est un traitement de texte.
Sa finalité reste de produire des documents /imprimés/
Songez par exemple que votre texte accordéon va totalement bouleverser
la mise en page de votre document (nombre de pages, renvois, table
des matières etc.)
[...]
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas
encore
possible sur word. Ce que vous me proposez est trop compliqué pour un
novice
comme moi en langage informatique.
As-tu testé le document que j'ai mis en ligne ?
Si c'est cela que tu voulais et si tu respectes le pas à pas que je t'ai
proposé en remplaçant la macro par celle d'Anacoluthe (que je remercie au
passage d'avoir améliorée), tu dois y arriver.
Bonne continuation,
--
TisaneEn effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta
demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois
quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou
non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et
1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le
titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace
dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est
perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
Tisane
[...]
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas
encore
possible sur word. Ce que vous me proposez est trop compliqué pour un
novice
comme moi en langage informatique.
As-tu testé le document que j'ai mis en ligne ?
Si c'est cela que tu voulais et si tu respectes le pas à pas que je t'ai
proposé en remplaçant la macro par celle d'Anacoluthe (que je remercie au
passage d'avoir améliorée), tu dois y arriver.
Bonne continuation,
--
Tisane
En effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta
demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois
quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou
non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et
1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le
titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace
dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est
perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
Tisane
[...]
J'epérais quelque chose de très très simple, comme un simple clic sur un
bouton pour obtenir ce que je désire. C'est dommage que ce n'est pas
encore
possible sur word. Ce que vous me proposez est trop compliqué pour un
novice
comme moi en langage informatique.
As-tu testé le document que j'ai mis en ligne ?
Si c'est cela que tu voulais et si tu respectes le pas à pas que je t'ai
proposé en remplaçant la macro par celle d'Anacoluthe (que je remercie au
passage d'avoir améliorée), tu dois y arriver.
Bonne continuation,
--
TisaneEn effet ce que vous me proposez est trop compliqué pour moi.
Après avoir accompli mon devoir de citoyenne, je me suis remise à ta
demande
car... elle sort de l'ordinaire et surtout m'intéresse (j'en vois
quelques
applications originales)...
Tu trouveras à l'adresse suivante un exemple de texte qui s'affiche ou
non
en double-cliquant sur un titre.
http://cjoint.com/?gkjcWwXCj3
Ce n'est qu'un échantillon et j'ai réduit les tests au minimum.
En m'inspirant de ce qu'a fait Greg Maxey (merci à lui), le résultat est
plutôt sympa et assez facile à mettre en oeuvre.
Voici un mode opératoire succinct :
1. Sélectionne ton premier titre (sans le "retour chariot")
2. Appuie sur <Ctrl><F9>
3. Sans déplacer le curseur, tape ou copie/colle :
MacroButton AfficherMasquerTexte1
Pour obtenir { MacroButton AfficherMasquerTexte1 "Ton Titre" }
4. Sous ton titre, place le texte complet dans un tableau d'1 colonne et
1
ligne dont tu supprimes les bordures
5. Appuie sur <Alt><F11> pour aller dans la fenêtre du Visual Basic
6. Menu Insertion | Module
7. Colle le code placé entre les pointillés ci-dessous dans la fenêtre à
droite
8. Enregistre et quitte l'éditeur.
..............................
Sub AfficherMasquerTexte1()
With ActiveDocument.Tables(1).Rows(1)
If .HeightRule = wdRowHeightAuto Then
.HeightRule = wdRowHeightExactly
.Height = CentimetersToPoints(0.05)
Else
.HeightRule = wdRowHeightAuto
.Height = CentimetersToPoints(0)
End If
End With
End Sub
...............................
Il reste à tester.
Pour afficher/masquer le code { MacroButton ...} afin de modifier le
titre
par exemple, appuie sur <Alt><F9>.
Les macros doivent être activées :
- menu Outils | Macro | Sécurité
- coche "Niveau moyen" ou "Niveau faible"
Pour les autres titres, reprends les 8 points précédents, mais remplace
dans
le programme et dans le champ MacroButton :
AfficherMasquerTexte1 par AfficherMasquerTexte2
et dans le code
With ActiveDocument.Tables(1).Rows(1) par With
ActiveDocument.Tables(2).Rows(1)
J'espère que tu recevras d'autres suggestions car ce code est
perfectible,
ou tout simplement, il peut y avoir une meilleure solution.
Bon dimanche,
--
Tisane
[...]
Comment créer un lien hyprtexte qui démasque juste en dessous un texte caché ?
Comment créer un lien hyprtexte qui démasque juste en dessous un texte caché ?
Comment créer un lien hyprtexte qui démasque juste en dessous un texte caché ?