PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2025 → Titre ou nom d'une feuille excel
Titre ou nom d'une feuille excel
Iniciado por Jean-Michel, 12,dic. 2019 13:53 - 3 respuestas
Miembro registrado
856 mensajes
Publicado el 12,diciembre 2019 - 13:53
Bonjour,

xlsFeuilleEnCours permet de connaitre ou modifier une feuille excel.
Si je veux la connaitre, il me renvoie son rang.

Comment connaitre le nom de la feuille ?





Dans cet exemple la feuille numéro 4 s'appelle "Phoenix"
Comment me renvoyer le nom "Phoenix" dans un champs ?

Merci à vous.

--
Synchronize Systems International LTD
Développement d'outils de gestion

Environnements AS400 – Windows
Langages GAP III – CL – Visual Basic - Visual Adélia - Adélia - Windev

Bangkok / Pattaya
Publicado el 12,diciembre 2019 - 14:15
Bonjour,

Essaie ceci : Info("La feuille 2 se nomme : "+ IdFichierXLS..NomFeuille ) où "IdFichierXLS" est l'identifiant d'ouverture de ton fichier excel.
Cela devrait renvoyer le nom de la feuille qui est active.

Cordialement
Miembro registrado
948 mensajes
Publicado el 12,diciembre 2019 - 14:20
Bonjour
Get :
xl est un objet automation dynamique
xl = allouer un objet automation "Excel.Application"
IF xl = Null THEN
Trace("Erreur 'Excel.application' n'est pas installé sur ce poste !")
RETOUR
END
xl>>Visible = True
xl>>WorkBooks>>Open("D:\___A CLASSER\rapport carburant-2-1.xlsx")
Trace(xl>>ActiveSheet>>Name)


Set :
xl est un objet automation dynamique
xl = allouer un objet automation "Excel.Application"
IF xl = Null THEN
Trace("Erreur 'Excel.application' n'est pas installé sur ce poste !")
RETOUR
END
xl>>Visible = True
xl>>WorkBooks>>Open("D:\___A CLASSER\rapport carburant-2-1.xlsx")
Trace(xl>>ActiveSheet>>Name)
xl>>ActiveSheet>>Name = "Windev"


--
L'urgent est fait, l'impossible est en cours. Pour les miracles, prévoir un délai.
Quand un utilisateur vous a aidé, n'oubliez pas de le remercier...
Miembro registrado
856 mensajes
Publicado el 13,diciembre 2019 - 06:23
Vous êtes genials (ou géniaux) ! Quel talent.
Les 2 exemples fonctionnent !

Grand merci !!!

--
Synchronize Systems International LTD
Développement d'outils de gestion

Environnements AS400 – Windows
Langages GAP III – CL – Visual Basic - Visual Adélia - Adélia - Windev

Bangkok / Pattaya