B
brad85
Guest
Bonjour tout le monde,
Je poste pour la premiere fois, dans ce forum car étant un vrai newbee, je galere !!!
Mon probleme :
un fichier excel , avec x feuilles de calcul
je créé un sommaire (de toute les feuilles de mon classeur) en Feuil1 avec cette macro récupérer et qui fonctionne :
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim I As Integer
For I = 2 To Worksheets.Count
Range("A" & I).Select
ActiveSheet.Hyperlinks.Add _
Anchor:=Selection, _
Address:="", _
SubAddress:=Worksheets(I).Name & "!A1", _
TextToDisplay:=Worksheets(I).Name
Next
Cancel = True
End Sub
Maintenant je voudrais que dans le somaire, a droite de chaque nom de feuille, apparaisse la valeur numérique d'un champ calcul d'une cellule de cette meme feuille.
La cellule a extraire est la meme dans chaque feuille
J'espere avoir été assez clair .... sinon dites le moi
Merci bcq 😀
Je poste pour la premiere fois, dans ce forum car étant un vrai newbee, je galere !!!
Mon probleme :
un fichier excel , avec x feuilles de calcul
je créé un sommaire (de toute les feuilles de mon classeur) en Feuil1 avec cette macro récupérer et qui fonctionne :
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim I As Integer
For I = 2 To Worksheets.Count
Range("A" & I).Select
ActiveSheet.Hyperlinks.Add _
Anchor:=Selection, _
Address:="", _
SubAddress:=Worksheets(I).Name & "!A1", _
TextToDisplay:=Worksheets(I).Name
Next
Cancel = True
End Sub
Maintenant je voudrais que dans le somaire, a droite de chaque nom de feuille, apparaisse la valeur numérique d'un champ calcul d'une cellule de cette meme feuille.
La cellule a extraire est la meme dans chaque feuille
J'espere avoir été assez clair .... sinon dites le moi
Merci bcq 😀