Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
LeSteph
Bonjour, outre les possibilités de l'automatiser en vba Méthode1: Tu mets une cellule de chaque feuille (sontitre par exemple) en liaison avec la première(sommaire) et dans le menu option général tu enlèves modification directe. Quand tu dblclique sur le lien cela affiche la feuille concernée. Cela peut même ouvrir un classeur si nécessaire. Tu peux aussi mettre un retour sur la première(Sommaire ) dans chaque feuille.
Méthode2 tu trouveras plus simplement Menu Edition Coller un lien hypertexte Par copier coller lien Hypertxt tu suis la même démarche.
leSteph
"ced" a écrit dans le message de news:066f01c4a06e$9421db30$ Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui dirige dans les feuilles
merci
Bonjour,
outre les possibilités de l'automatiser en vba
Méthode1:
Tu mets une cellule de chaque feuille (sontitre par exemple)
en liaison avec la première(sommaire) et
dans le menu option général
tu enlèves modification directe.
Quand tu dblclique sur le lien cela affiche la feuille concernée.
Cela peut même ouvrir un classeur si nécessaire.
Tu peux aussi mettre un retour sur la première(Sommaire )
dans chaque feuille.
Méthode2
tu trouveras plus simplement
Menu Edition
Coller un lien hypertexte
Par copier coller lien Hypertxt
tu suis la même démarche.
leSteph
"ced" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:066f01c4a06e$9421db30$a401280a@phx.gbl...
Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles
que l'on a dans un classeur excel et de mettre un lien qui
dirige dans les feuilles
Bonjour, outre les possibilités de l'automatiser en vba Méthode1: Tu mets une cellule de chaque feuille (sontitre par exemple) en liaison avec la première(sommaire) et dans le menu option général tu enlèves modification directe. Quand tu dblclique sur le lien cela affiche la feuille concernée. Cela peut même ouvrir un classeur si nécessaire. Tu peux aussi mettre un retour sur la première(Sommaire ) dans chaque feuille.
Méthode2 tu trouveras plus simplement Menu Edition Coller un lien hypertexte Par copier coller lien Hypertxt tu suis la même démarche.
leSteph
"ced" a écrit dans le message de news:066f01c4a06e$9421db30$ Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui dirige dans les feuilles
merci
papou
Bonjour Insertion, Lien Hypertexte, Emplacement dans ce document. Cordialement Pascal
"ced" a écrit dans le message de news:066f01c4a06e$9421db30$ Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui dirige dans les feuilles
merci
Bonjour
Insertion, Lien Hypertexte, Emplacement dans ce document.
Cordialement
Pascal
"ced" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:066f01c4a06e$9421db30$a401280a@phx.gbl...
Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles
que l'on a dans un classeur excel et de mettre un lien qui
dirige dans les feuilles
Bonjour Insertion, Lien Hypertexte, Emplacement dans ce document. Cordialement Pascal
"ced" a écrit dans le message de news:066f01c4a06e$9421db30$ Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui dirige dans les feuilles
merci
LeSteph
Re, au cas où pour mettre un lien ex Titre en a1 dans une cellule de feuil1 þuil2!A1
"LeSteph" a écrit dans le message de news:
Bonjour, outre les possibilités de l'automatiser en vba Méthode1: Tu mets une cellule de chaque feuille (sontitre par exemple) en liaison avec la première(sommaire) et dans le menu option général tu enlèves modification directe. Quand tu dblclique sur le lien cela affiche la feuille concernée. Cela peut même ouvrir un classeur si nécessaire. Tu peux aussi mettre un retour sur la première(Sommaire ) dans chaque feuille.
Méthode2 tu trouveras plus simplement Menu Edition Coller un lien hypertexte Par copier coller lien Hypertxt tu suis la même démarche.
leSteph
"ced" a écrit dans le message de news:066f01c4a06e$9421db30$ Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui dirige dans les feuilles
merci
Re,
au cas où pour mettre un lien
ex Titre en a1
dans une cellule de feuil1 þuil2!A1
"LeSteph" <lecocosteph@frite.fr> a écrit dans le message de
news:u5JTyEHoEHA.260@TK2MSFTNGP10.phx.gbl...
Bonjour,
outre les possibilités de l'automatiser en vba
Méthode1:
Tu mets une cellule de chaque feuille (sontitre par exemple)
en liaison avec la première(sommaire) et
dans le menu option général
tu enlèves modification directe.
Quand tu dblclique sur le lien cela affiche la feuille concernée.
Cela peut même ouvrir un classeur si nécessaire.
Tu peux aussi mettre un retour sur la première(Sommaire )
dans chaque feuille.
Méthode2
tu trouveras plus simplement
Menu Edition
Coller un lien hypertexte
Par copier coller lien Hypertxt
tu suis la même démarche.
leSteph
"ced" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:066f01c4a06e$9421db30$a401280a@phx.gbl...
Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles
que l'on a dans un classeur excel et de mettre un lien qui
dirige dans les feuilles
Re, au cas où pour mettre un lien ex Titre en a1 dans une cellule de feuil1 þuil2!A1
"LeSteph" a écrit dans le message de news:
Bonjour, outre les possibilités de l'automatiser en vba Méthode1: Tu mets une cellule de chaque feuille (sontitre par exemple) en liaison avec la première(sommaire) et dans le menu option général tu enlèves modification directe. Quand tu dblclique sur le lien cela affiche la feuille concernée. Cela peut même ouvrir un classeur si nécessaire. Tu peux aussi mettre un retour sur la première(Sommaire ) dans chaque feuille.
Méthode2 tu trouveras plus simplement Menu Edition Coller un lien hypertexte Par copier coller lien Hypertxt tu suis la même démarche.
leSteph
"ced" a écrit dans le message de news:066f01c4a06e$9421db30$ Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui dirige dans les feuilles
merci
Modeste
Bonsour ® ,
pour résumer ce qu'ont proposé les prédecesseurs.... à mettre dans ton Perso.xls :
Sub Creer_Sommaire() '-----MPFE By geedee le 22/09/2004 Dim feuille$(), Recap As Boolean Recap = False '------------------ on recence les feuilles de calculs For i = 1 To ActiveWorkbook.Worksheets.Count ReDim Preserve feuille$(i) If feuille$(i) = "Le Sommaire" Then '--il y a déja un eu sommaire' Recap = True Else feuille$(i) = ActiveWorkbook.Worksheets(i).Name End If Next '----s'il n'y a pas encore de sommaire on le crée If Not Recap Then ActiveWorkbook.Worksheets.Add before:=Worksheets(1) ActiveSheet.Name = "Le Sommaire" End If '---------------- on réactualise le sommaire With ActiveWorkbook.Sheets("Le sommaire") .Cells.Clear For i = 1 To UBound(feuille$) .Cells(i, 1) = feuille$(i) .Cells(i, 1).Hyperlinks.Add Anchor:=.Cells(i, 1), Address:="", SubAddress:= _ "'" & feuille$(i) & "'!A1", TextToDisplay:=Format (feuille$(i), "@") '--- ici les simples quotes permettent l'utilisation des noms comportant des espaces Next .Select End With End Sub
;o))) @+
-----Message d'origine----- Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui
dirige dans les feuilles
merci .
Bonsour ® ,
pour résumer ce qu'ont proposé les prédecesseurs....
à mettre dans ton Perso.xls :
Sub Creer_Sommaire()
'-----MPFE By geedee le 22/09/2004
Dim feuille$(), Recap As Boolean
Recap = False
'------------------ on recence les feuilles de calculs
For i = 1 To ActiveWorkbook.Worksheets.Count
ReDim Preserve feuille$(i)
If feuille$(i) = "Le Sommaire" Then
'--il y a déja un eu sommaire'
Recap = True
Else
feuille$(i) = ActiveWorkbook.Worksheets(i).Name
End If
Next
'----s'il n'y a pas encore de sommaire on le crée
If Not Recap Then
ActiveWorkbook.Worksheets.Add before:=Worksheets(1)
ActiveSheet.Name = "Le Sommaire"
End If
'---------------- on réactualise le sommaire
With ActiveWorkbook.Sheets("Le sommaire")
.Cells.Clear
For i = 1 To UBound(feuille$)
.Cells(i, 1) = feuille$(i)
.Cells(i, 1).Hyperlinks.Add Anchor:=.Cells(i, 1),
Address:="", SubAddress:= _
"'" & feuille$(i) & "'!A1", TextToDisplay:=Format
(feuille$(i), "@")
'--- ici les simples quotes permettent l'utilisation
des noms comportant des espaces
Next
.Select
End With
End Sub
;o)))
@+
-----Message d'origine-----
Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles
que l'on a dans un classeur excel et de mettre un lien
qui
pour résumer ce qu'ont proposé les prédecesseurs.... à mettre dans ton Perso.xls :
Sub Creer_Sommaire() '-----MPFE By geedee le 22/09/2004 Dim feuille$(), Recap As Boolean Recap = False '------------------ on recence les feuilles de calculs For i = 1 To ActiveWorkbook.Worksheets.Count ReDim Preserve feuille$(i) If feuille$(i) = "Le Sommaire" Then '--il y a déja un eu sommaire' Recap = True Else feuille$(i) = ActiveWorkbook.Worksheets(i).Name End If Next '----s'il n'y a pas encore de sommaire on le crée If Not Recap Then ActiveWorkbook.Worksheets.Add before:=Worksheets(1) ActiveSheet.Name = "Le Sommaire" End If '---------------- on réactualise le sommaire With ActiveWorkbook.Sheets("Le sommaire") .Cells.Clear For i = 1 To UBound(feuille$) .Cells(i, 1) = feuille$(i) .Cells(i, 1).Hyperlinks.Add Anchor:=.Cells(i, 1), Address:="", SubAddress:= _ "'" & feuille$(i) & "'!A1", TextToDisplay:=Format (feuille$(i), "@") '--- ici les simples quotes permettent l'utilisation des noms comportant des espaces Next .Select End With End Sub
;o))) @+
-----Message d'origine----- Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui
dirige dans les feuilles
merci .
Modeste
Oupsss... leger correctif :
For i = 1 To ActiveWorkbook.Worksheets.Count ReDim Preserve feuille$(i) If ActiveWorkbook.Worksheets(i).Name = "Le Sommaire" Then '--il y a déja un eu sommaire' Recap = True End If feuille$(i) = ActiveWorkbook.Worksheets(i).Name Next
@+
-----Message d'origine----- Bonsour ® ,
pour résumer ce qu'ont proposé les prédecesseurs.... à mettre dans ton Perso.xls :
Sub Creer_Sommaire() '-----MPFE By geedee le 22/09/2004 Dim feuille$(), Recap As Boolean Recap = False '------------------ on recence les feuilles de calculs For i = 1 To ActiveWorkbook.Worksheets.Count ReDim Preserve feuille$(i) If feuille$(i) = "Le Sommaire" Then '--il y a déja un eu sommaire' Recap = True Else feuille$(i) = ActiveWorkbook.Worksheets(i).Name End If Next '----s'il n'y a pas encore de sommaire on le crée If Not Recap Then ActiveWorkbook.Worksheets.Add before:=Worksheets(1) ActiveSheet.Name = "Le Sommaire" End If '---------------- on réactualise le sommaire With ActiveWorkbook.Sheets("Le sommaire") .Cells.Clear For i = 1 To UBound(feuille$) .Cells(i, 1) = feuille$(i) .Cells(i, 1).Hyperlinks.Add Anchor:=.Cells(i, 1), Address:="", SubAddress:= _ "'" & feuille$(i) & "'!A1", TextToDisplay:=Format (feuille$(i), "@") '--- ici les simples quotes permettent l'utilisation des noms comportant des espaces Next .Select End With End Sub
;o))) @+
-----Message d'origine----- Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui
dirige dans les feuilles
merci .
.
Oupsss...
leger correctif :
For i = 1 To ActiveWorkbook.Worksheets.Count
ReDim Preserve feuille$(i)
If ActiveWorkbook.Worksheets(i).Name = "Le Sommaire" Then
'--il y a déja un eu sommaire'
Recap = True
End If
feuille$(i) = ActiveWorkbook.Worksheets(i).Name
Next
@+
-----Message d'origine-----
Bonsour ® ,
pour résumer ce qu'ont proposé les prédecesseurs....
à mettre dans ton Perso.xls :
Sub Creer_Sommaire()
'-----MPFE By geedee le 22/09/2004
Dim feuille$(), Recap As Boolean
Recap = False
'------------------ on recence les feuilles de calculs
For i = 1 To ActiveWorkbook.Worksheets.Count
ReDim Preserve feuille$(i)
If feuille$(i) = "Le Sommaire" Then
'--il y a déja un eu sommaire'
Recap = True
Else
feuille$(i) = ActiveWorkbook.Worksheets(i).Name
End If
Next
'----s'il n'y a pas encore de sommaire on le crée
If Not Recap Then
ActiveWorkbook.Worksheets.Add before:=Worksheets(1)
ActiveSheet.Name = "Le Sommaire"
End If
'---------------- on réactualise le sommaire
With ActiveWorkbook.Sheets("Le sommaire")
.Cells.Clear
For i = 1 To UBound(feuille$)
.Cells(i, 1) = feuille$(i)
.Cells(i, 1).Hyperlinks.Add Anchor:=.Cells(i, 1),
Address:="", SubAddress:= _
"'" & feuille$(i) & "'!A1", TextToDisplay:=Format
(feuille$(i), "@")
'--- ici les simples quotes permettent l'utilisation
des noms comportant des espaces
Next
.Select
End With
End Sub
;o)))
@+
-----Message d'origine-----
Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles
que l'on a dans un classeur excel et de mettre un lien
qui
For i = 1 To ActiveWorkbook.Worksheets.Count ReDim Preserve feuille$(i) If ActiveWorkbook.Worksheets(i).Name = "Le Sommaire" Then '--il y a déja un eu sommaire' Recap = True End If feuille$(i) = ActiveWorkbook.Worksheets(i).Name Next
@+
-----Message d'origine----- Bonsour ® ,
pour résumer ce qu'ont proposé les prédecesseurs.... à mettre dans ton Perso.xls :
Sub Creer_Sommaire() '-----MPFE By geedee le 22/09/2004 Dim feuille$(), Recap As Boolean Recap = False '------------------ on recence les feuilles de calculs For i = 1 To ActiveWorkbook.Worksheets.Count ReDim Preserve feuille$(i) If feuille$(i) = "Le Sommaire" Then '--il y a déja un eu sommaire' Recap = True Else feuille$(i) = ActiveWorkbook.Worksheets(i).Name End If Next '----s'il n'y a pas encore de sommaire on le crée If Not Recap Then ActiveWorkbook.Worksheets.Add before:=Worksheets(1) ActiveSheet.Name = "Le Sommaire" End If '---------------- on réactualise le sommaire With ActiveWorkbook.Sheets("Le sommaire") .Cells.Clear For i = 1 To UBound(feuille$) .Cells(i, 1) = feuille$(i) .Cells(i, 1).Hyperlinks.Add Anchor:=.Cells(i, 1), Address:="", SubAddress:= _ "'" & feuille$(i) & "'!A1", TextToDisplay:=Format (feuille$(i), "@") '--- ici les simples quotes permettent l'utilisation des noms comportant des espaces Next .Select End With End Sub
;o))) @+
-----Message d'origine----- Bonjour a tous !!
y a t 'il possibilité de faire un sommaire des feuilles que l'on a dans un classeur excel et de mettre un lien qui
