Contenu récent par bobaskis

Bonjour, Dans un classeur comportant un nombre d'onglets variables (avec des onglets masqués qui ne doivent pas être pris en compte) je dois mettre en page (1er macro) puis imprimer (2è macro) de l'onglet 2 (ici Feuil1) à un onglet STOP (ne pas mettre en page puis imprimer cet onglet STOP)...

Re : Macro pour faire deux listes sans doublons... réponse de l'aide sur excel 2003 "Mot clé introuvable"

Re : Macro pour faire deux listes sans doublons... je n'ai pas trouvé d'aide via F1 sur Scripting ou Dictionary. merci pour tes infos

Re : Macro pour faire deux listes sans doublons... bjr, Bebere peux-tu me donner quelques explications sur ton code ? Tu écris : Set M = CreateObject("Scripting.Dictionary") : je ne connais pas, après quelques recherches sur google je crois avoir compris qu'il s'agit d'une sorte de tableau ...

Re : pb boucle do loop damned pas eu le temps de tester, j'ai résolu le pb autrement, merci pour ton aide.

Re : pb boucle do loop Le ploint de départ c'est que j'ai la macro dans un fichier (modèle), cette macro va ouvrir d'autres fichiers et faire des traitements sur la feuille centralisation de ces fichiers s'il n'y a pas de feuille centralisation alors il n'y a pas de traitement à appliquer...

bjr, dans une boucle do loop j'ai un test à l'intérieur de cette boucle si le test est vrai je souhaite passer à l'élément suivant (Fichier) Sub Test01() Do while Fichier<>"" Set Wb = Workbooks.Open(Chemin & Fichier) ...instructions qui ouvre un fichier 'test s'il y a une feuille...

Re : macro ouvrir feuille cachée slt, je pense avoir trouvé (les feuilles cherchées dans cet exemple sont "budget" et "index" Sub Test1() Dim Sht As Worksheet For Each Sht In ThisWorkbook.Sheets If Sht.Visible = xlSheetHidden Then Sht.Visible = xlSheetVisible Next Sht Dim n As...

Re : macro ouvrir feuille cachée ok ta macro ouvre toutes les feuilles cachées mais maintenant comment faire pour savoir s'il y a une feuille janvier ou fevrier et la sélectionner ?

bjr à tous, j'ai 50 fichiers à traiter, ils contiennent des feuilles cachées (janvier ou février). Dans chaque fichier il y a soit une feuille janvier soit une feuille fevrier. Je sais comment faire pour ouvrir une feuille cachée : Sheets("NomDeLafeuille").Visible = true Mon pb ...