Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Récupérer infos d'un onglet

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

azerta

XLDnaute Nouveau
Je ne sais pas si ce que je veus faire est réalisable. En faite, je travail sous Excel via VB et j’ai une dizaine d’onglet. J’ai un onglet qui s’appelle « Estim.00 » et il y a donc ds l’onglet index en C7 « travail xxx.00 ». Les 2derniers chiffres de l’onglet Estim doivent être récupérés ds les 2derniers chiffres de la cellule C7 de l’onglet Index. Or, il se peut que plus tard soit crée l’onglet Estim.01 ou/et Estim.02 etc.. et j’aimerai qu’à l’ouverture et à la fermeture du document Excel on puisse repérer l’onglet Estim le plus récent ( donc par les deux derniers chiffres d’Estim qui doivent être les plus élevés) et mettre à chaque fois les deux derniers chiffres à la place des deux derniers chiffres en C7 ds l’onglet « Index »

Je souhaite réaliser cela via VB..
Je ne sais pas si j’ai été clair…
Si quelqu’un peut m’aider svp..
Merci
 
Re : Récupérer infos d'un onglet

En VBA, avec les évènements d'Excel, tu vas pouvoir gérer "l'ouverture et la fermeture" du classeur. VB te permettra sans doute de contrôler le classeur mais pas trop les évènements, je crois. Ceci dit je suis loin d'être un spécialiste VB...
 
Re : Récupérer infos d'un onglet

Oui en effet il y a les évènements Worbookbefore_close et Worbook_Open
Mais ce que je veus surtout c récupérer les deux deniers chiffres de l'onglet Estim le plus récent pour les mettre ds la cellule C7 de l'index..
Comment faire déja pour arriver à coder : si il y a plusieurs onglet Estim , récupérer les deux derniers chiffres de l'onglet ayant le plus grand numéro à la fin...
 
Re : Récupérer infos d'un onglet

Avec un truc du genre :
Dim Num as Long, i as long
Num = 0
For i = 1 to Activeworkbook.worksheets.count
if Activeworkbook.worksheets(1).name Like "Estim*" and clng(right(Activeworkbook.worksheets(1).name,2))>Num then
Num =clng(right(Activeworkbook.worksheets(1).name,2))
end if
Next i
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…