Bonjour,
Dans le cadre de cette formation, vous pourrez accéder à l'explication complète de la création d'un complément Excel de A à Z (userform, procédure paramétrable, ajout du bouton dans le ruban, transformation en complément, choix du bouton, etc.).
S'inscrire à la formation : https://www.xlerateur.com/seminaire-vba-gestion-des-tableaux-structures-listobjects/
Ce complément vous permettra de faire ceci :
Bonjour à tous,
Voici un petit code VBA qui va vous permettre de mettre en couleurs vos onglets, histoire de mettre un peu de couleurs dans nos longues soirées !
Ce code fait partie du séminaire que je vais donner ici : https://www.xlerateur.com/seminaire-vba-gestion-des-tableaux-structures-listobjects/
N'attendez pas pour vous inscrire !
Attention avant d'exécuter ce code, car toutes les couleurs d'onglet existantes seront réinitialisées. Vous pouvez changer les couleurs en changeant le numéro du thème (xlThemeColorAccent2). En changeant le 0.8 et le 1.8, vous décidez des valeurs de départ et de fin pour les gradients de couleurs.
Téléchargez ici le fichier de test:
Sub ListerFeuiles()
Dim wksALister As Worksheet
Dim sglTintAndShade As Single
sglTintAndShade = 0.8
For Each wksALister In ThisWorkbook.Worksheets
wksALister.Tab.ThemeColor = xlThemeColorAccent2
wksALister.Tab.TintAndShade = sglTintAndShade
sglTintAndShade = sglTintAndShade - (1.8 / ThisWorkbook.Worksheets.Count)
Next
End SubA bientôt.
Voici une petite fonctionnalité que j'utilise rarement et à tort.
En allant dans Affichage, Fenêtre Variables locales, on peut afficher les valeurs des variables locales en cours d'exécution, y compris des tableaux.
Ici, debug.print ne fonctionnerait pas, mais dans la fenêtre de variable locale, on peut toutefois voir le résultat.
Démonstration avec la nouvelle fonction dynamique matricielle SEQUENCE. J'utilise cette fonction pour générer un tableau de 10 lignes sur 1 colonne, démarrant en 1 et avec un pas de 1. En Français : 1 2 3 4 5 6 7 8 9 10 !!!
