Remerciez-le!

Remerciez @Admin pour avoir partagé cet document gratuitement, de la manière la plus simple, en partageant sur les réseaux sociaux.

Astuces et code vba pour excel en francais

Astuces et code VBA pour Exce Rubriques Classeurs Workbooks Contrôles et Formulaires Feuilles Worksheets Fichiers XL ou autres Fonctions Formules Graphiques Menus Sélection OLE Automation Excel -- Access DAO Commandes diverses Programmes divers Téléchargement sur site http ericrenaud free fr Les classeurs Excel Workbooks Page mise à jour le Vous trouverez dans cette rubrique des exemples de programmes se rapportant aux classeurs Ajouter des feuilles dans un classeur et les renommer Enregistrer une copie du classeur sans modi ?er le classeur ouvert Fermer tous les classeurs ouverts sauf le classeur actif Renommer les onglets d'un classeur Ex Mois Mois Mois etc Trier les onglets d'un classeur Ajouter des feuilles dans un classeur et les renommer Sub AjouterRenommerFeuilles Dim cpt As Integer cpt Do While cpt ' Ajoute feuilles ' Ajout d'une feuille Application Sheets Add After Sheets Item Sheets Count Type xlWorksheet ' Renomme la feuille Application ActiveSheet Name Semaine CStr cpt cpt cpt Loop End Sub Enregistrer une copie du classeur Sub SaveCopyAs ActiveWorkbook SaveCopyAs C excel MonDouble xls End Sub Fermer tous les classeurs ouverts sauf le classeur actif Sub FermeClasseurs For Each Wk In Workbooks If Wk Name ThisWorkbook Name Then Wk Close savechanges True End If Next Wk End Sub Renommer les onglets d'un classeur Sub RenommeOnglets ' Renomme les onglets CL CL CL etc Dim I As Integer Application ScreenUpdating False For I To Worksheets I Name CL I Next I End Sub Trier les onglets d'un classeur C Sub TriNomsOnglets Dim I As Integer J As Integer For I To Sheets Count For J To I - If UCase Sheets I Name UCase Sheets J Name Then Sheets I Move Before Sheets J Exit For End If Next J Next I End Sub Contrôles divers en VBA Page mise à jour le Vous trouverez dans cette rubrique des exemples sur les di ?érents contrôles comme TextBox ComboBox ListBox Bouton d'option Case à cocher calendrier indicateur de progression etc Ces contrôles s'utilisent sur un Userform ou formulaire Quelques notions de base Comment créer un Userform Depuis une feuille Excel tapez ALT F ou par le menu Outils Macro Visual Basic Editor Vous a ?chez l'environnement Visual Basic Editor Insérer un Userform à l'aide du menu Insertion Userform La bo? te à outils doit s'a ?cher sinon utilisez le menu A ?chage Bo? te à outils Pour placer un contrôle sur un Userform - Sélectionner le contrôle désiré dans la fenêtre Bo? te à outils - Cliquer sur le contrôle choisi avec le bouton gauche de la souris et sans relacher celui-ci déplacer le contrôle vers le Userform puis relacher le bouton de la souris Voici les principaux contrôles de la bo? te à outils ci-dessous Les bo? tes de dialogue Boite de dialogue avec bouton d'option Le Userform DlgChoix Le code Code lançant l'ouverture de la bo? te de dialogue C Sub A ?cheBoutonsOption DlgChoix Show End Sub Code d'ouverture du formulaire Private Sub UserFormActivate DlgChoix ChoixPaire Value True End Sub Nota A l'ouverture du