selection plusieur onglet

[vinc26]

bonjour
est il possible de savoir quelle onglet ont été selectionné
s'il y a eu plusieur selection et les quel selectioné
tout ca en vba
merci d'avance
vinc

 

[Sylvain]

bonsoir,

une idée de solution : insère ce code dans le code du classeur :

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Sheets(1).Cells(Sheets(1).Range("a6500").End(xlUp).Row + 1, 1).Value = Sh.Name
End Sub

A chaque changement de feuille le nom de la feuille choisie est rajoutée dans la colonne A de la feuille 1.

A+

 

[Sylvain]

bonsoir,

pour savoir où placer ce code, il y a le didacticiel de @+Thierry :





A+

 

[myDearFriend]

Bonsoir Vinc26, Sylvain.


Autre solution possible :

Sub DetermFeuilSelect()
Dim ListeFeuilles As String
Dim Feuille As Worksheet
   For Each Feuille In Windows(1).SelectedSheets
      ListeFeuilles = ListeFeuilles & vbLf & Feuille.Name
   Next Feuille
   MsgBox "Il y a " & Windows(1).SelectedSheets.Count & " feuille(s) sélectionnée(s) :" & ListeFeuilles
End Sub


Cordialement.

Didier_mDF

 

[vinc26]

merci a tous ca fction du tonner