Inputbox et nom de feuille

K

kllmoon

XLDnaute Occasionnel

• 10 Décembre 2009

• #2

Re : Inputbox et nom de feuille

avec ActiveSheet.Name tout simplement

dim tavareiable as string
tavariable = ActiveSheet.Name

 

Vote positif 0 Vote négatif

P

Phil_PF

Guest

• 10 Décembre 2009

• #3

Re : Inputbox et nom de feuille

Merci,
mais ca marche pas quand dans la sélection il y a changement de feuille, je voudrais récupérer le nom de la feuille sur laquelle a été fait le clic (qui n'est pas forcement la feuille active au lancement de la macro)

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 10 Décembre 2009

• #4

Re : Inputbox et nom de feuille

Bonsoir à tous,
l'éternel bah ca marche pas!!!!!!
si tu avais pris le temps et la peine de faire une petit bout de fichier tu aurais déjà ta réponse, mais les explications seules sans savoir ce que tu veux exactement!!!
bref ce que j'en dis c'est pour que tu ais une réponse
bonne soirée a tous
papou

EDIT: Bonjour Jean Marcel, je vois que tu es comme moi avec un fichier c'est mieux tout de même

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 10 Décembre 2009

• #5

Re : Inputbox et nom de feuille

Bonjour à tous,

si j'y ai compris quelque chose.... :

Code:

Sub ipb()
Dim Rep As Range
    Set Rep = Application.InputBox(prompt:="Sélectionner les cellules", Type:=8)
    MsgBox Rep.Address
    MsgBox Rep.Parent.Name
End Sub

 

Vote positif 0 Vote négatif

P

Phil_PF

Guest

• 10 Décembre 2009

• #6

Re : Inputbox et nom de feuille

Merci ca marche

 

Vote positif 0 Vote négatif