lien

Salut

Je sais pas si on peut faire un lien vers une macro sur un texte dans une
cellule, dans Excel.
Moi, pour faire ça, j'insère un bouton (barre d'outil "formlaires"), et
j'affecte la macro voulue à ce bouton.

Thibault

"dede2801" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 7B725A00-4D73-4B40-8A52-D0B19FF0E6A5@microsoft.com...

bonjour ,

je voudrai faire une table de matiere
ex.
feuil1: A1þuil2
A2þuil3
A3þuil4
et puis faire un lien directe par macro entre la cel.A1 (feuil2) et la
feuil2

merci de votre aide

bonjour

voila un exemple que tu peux adapter

Sub tdm()
Sheets("Sommaire").Select
Range("B5").Select

'boucle
For Each f In ActiveWorkbook.Sheets
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", _
SubAddress:="'" & f.Name & "'!A1", TextToDisplay:=f.Name
ActiveCell.Offset(2).Select
Next
End Sub


bon courage

Asterix

Bonjour dede2801,

Sub ListFeuil()
With Application
.ScreenUpdating = False
.DisplayAlerts = False
End With
On Error Resume Next
Sheets("Sommaire").Delete
Set nSht = Sheets.Add(Before:=Sheets(1))
nSht.Name = "Sommaire"
[A1] = "Liste des onglets du classeur"
For i = 2 To Sheets.Count
nSht.Cells(i, 1).Value = Sheets(i).Name
With Worksheets(nSht.Name)
ActiveSheet.Hyperlinks.Add Anchor:=.Cells(i, 2), _
Address:="", SubAddress:=Sheets(i).Name & "!A1", _
TextToDisplay:="Lien vers " & Sheets(i).Name
End With
Next i
End Sub


ChrisV


"dede2801" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 7B725A00-4D73-4B40-8A52-D0B19FF0E6A5@microsoft.com...

bonjour ,

je voudrai faire une table de matiere
ex.
feuil1: A1þuil2
A2þuil3
A3þuil4
et puis faire un lien directe par macro entre la cel.A1 (feuil2) et la
feuil2

merci de votre aide

Merci à tous preoblèmes résolus