VBA - Récupérer le nom d'un workbook et d'une feuille
Vaarek
Messages postés5Date d'inscriptionlundi 7 juin 2004StatutMembreDernière intervention25 juin 2004
-
14 juin 2004 à 10:25
Vaarek
Messages postés5Date d'inscriptionlundi 7 juin 2004StatutMembreDernière intervention25 juin 2004
-
14 juin 2004 à 11:07
Bonjour,
La question est assez simple, j'ai deux variable dans lesquelles je voudrais récupérer le nom du workbook actif ainsi que de la feuille active.
A_wBook = InputBox("Please enter the name of the data converted from SAP : ", "Information")
A_Sheet = InputBox("Please enter the name of the Excel Sheet containing the informations you want to export : ", "Information")
Avant je posais la question à l'utilisateur, mais c'est une phase inutile que je voudrais remplacer par un automatisme.
Il doit exister une solution comme :
A_wBook = Template.ActiveWorkbooks.Name (Evidament cela ne marche pas), mais je ne trouve pas la bonne syntaxe.
Merci de m'éclairer,
Cordialement
Vaarek
A voir également:
Workbook vba
Récupérer nom onglet excel - vba - Meilleures réponses
HFanny
Messages postés699Date d'inscriptionmercredi 19 février 2003StatutMembreDernière intervention13 mai 201120 14 juin 2004 à 10:53
Bonjour,
Ceci pourra t'aider je pense :
'nom du classeur actif :
Set A_wbook = ActiveWorkbook.Name
'nom de la feuille active
Set A_Sheet = ActiveSheet.Name
Tiens juste pour te mettre autre chose qui pourrait peut être te servir :
MsgBox "Nombre de classeur ouvert : " & Workbooks.Count
For Each wb In Workbooks
MsgBox "Le classeur " & wb.Name & " est ouvert."
For Each ws In wb.Worksheets
MsgBox ws.Name
Next ws
Next wb
Vaarek
Messages postés5Date d'inscriptionlundi 7 juin 2004StatutMembreDernière intervention25 juin 2004 14 juin 2004 à 10:28
Autre question, y a-t-il une fonction edit sur le forum?
J'ai oublier de préciser (même si ca paraît évident) Que tout cela je le fais sous VBA - Excel.