Série d'Exercices VBA : Gestion des Fruits

Série d'Exercices VBA pour la Gestion des Fruits

Exercice 1:
Écrire un script VBA qui affiche un message "Bienvenue dans le Système de Gestion des Fruits" à l'ouverture du classeur Excel.

• Détails:
  • Utiliser l'événement Workbook_Open pour déclencher l'affichage du message.
  • Le message doit être affiché via une boîte de message (MsgBox).
  • Cet exercice aide à comprendre comment exécuter du code automatiquement à l'ouverture d'un fichier Excel.

Exercice 2: Function

Exercice:
Créer une fonction VBA appelée TotalPrice qui calcule le prix total des fruits. La fonction doit prendre deux arguments : la quantité de fruits et le prix par fruit, et retourner le prix total.

• Détails:
  • La fonction doit être capable de gérer des nombres entiers et des nombres à virgule flottante.
  • Utiliser des arguments pour passer la quantité et le prix.
  • Le résultat doit être retourné en utilisant le nom de la fonction.
• Scénario: Vous êtes chargé de calculer le coût total d'un lot de fruits pour une commande en utilisant la quantité et le prix unitaire.

Exercice 3: Sub

Exercice:
Créer une procédure Sub qui change la couleur de fond de la feuille de calcul actuelle en jaune clair.

• Détails:
  • Utiliser le mot-clé Sub pour définir la procédure.
  • Utiliser ActiveSheet pour référencer la feuille active.
  • Modifier la propriété Interior.Color pour changer la couleur de fond des cellules.
• Scénario: Le directeur souhaite différencier visuellement certaines feuilles de calcul en changeant la couleur de fond.

Exercice 4: Notions Chaînes (Manipulation de Chaînes)

Exercice:
Écrire un code VBA qui prend le nom d'un fruit en entrée, affiche sa longueur et le convertit en majuscules.

• Détails:
  • Utiliser la fonction InputBox pour obtenir le nom du fruit de l'utilisateur.
  • Utiliser Len pour calculer la longueur de la chaîne.
  • Utiliser UCase pour convertir la chaîne en majuscules.
  • Afficher les résultats via une boîte de message.
• Scénario: L'utilisateur souhaite vérifier le nom d'un fruit et le transformer en majuscules pour des raisons de mise en forme uniforme dans un rapport.

Exercice 5: Si simple

Exercice:
Créer un script VBA pour vérifier si le prix par fruit est supérieur à 10 $. Afficher un message en conséquence.

• Détails:
  • Utiliser une instruction If pour vérifier la condition.
  • Demander à l'utilisateur d'entrer le prix par fruit via une InputBox.
  • Afficher des messages différents selon que le prix est supérieur ou inférieur à 10 $.
• Scénario: Avant de procéder à la commande, il est nécessaire de vérifier si le prix par fruit dépasse un seuil pour appliquer une politique de prix spécifique.

Exercice 6: Si et Objets

Exercice:
Écrire un code VBA qui vérifie si une feuille de calcul nommée "Fruits" existe. Si elle existe, l'activer; sinon, la créer.

• Détails:
  • Utiliser une boucle pour parcourir les feuilles de calcul existantes.
  • Utiliser If pour décider d'activer ou de créer une feuille.
  • Ajouter une nouvelle feuille en utilisant Worksheets.Add si elle n'existe pas.
• Scénario: Vous devez organiser les données de fruits dans une feuille de calcul dédiée et vous assurer que cette feuille est toujours disponible pour la saisie des données.

Exercice 7: Si imbriqués

Exercice:
Écrire un script VBA pour catégoriser les fruits selon leur prix : "Bon marché" (moins de 5 $), "Modéré" (entre 5 $ et 10 $), et "Cher" (plus de 10 $).

• Détails:
  • Utiliser des instructions If imbriquées pour gérer les multiples conditions.
  • Demander à l'utilisateur d'entrer le prix via une InputBox.
  • Afficher la catégorie correspondante dans une boîte de message.
• Scénario: Cette fonctionnalité est utilisée pour étiqueter automatiquement les fruits dans les rapports en fonction de leur coût, facilitant ainsi les décisions d'achat.

Exercice 8: Boolean

Exercice:
Créer un code VBA pour vérifier si l'inventaire de fruits est bas (moins de 20) et définir une variable booléenne en conséquence.

• Détails:
  • Utiliser une variable booléenne pour stocker le résultat.
  • Utiliser une instruction If pour définir la variable.
  • Afficher un message indiquant si l'inventaire est bas ou suffisant.
• Scénario: Pour la gestion de stock, il est crucial de signaler les niveaux d'inventaire bas afin de commander de nouveaux fruits.

Exercice 9: While

Exercice:
Écrire un script VBA qui ajoute des fruits à une liste jusqu'à ce que l'utilisateur entre "stop".

• Détails:
  • Utiliser une boucle While pour continuer jusqu'à ce que "stop" soit entré.
  • Utiliser une InputBox pour obtenir le nom du fruit.
  • Ajouter chaque fruit à une liste affichée dans une boîte de message.
• Scénario: Un employé ajoute des fruits au système de gestion jusqu'à ce que tous les fruits aient été enregistrés.

Exercice 10: While et Objets

Exercice:
Créer un script VBA qui utilise une boucle While pour parcourir toutes les feuilles de calcul et compter combien contiennent le mot "Fruit" dans leur nom.

• Détails:
  • Utiliser une boucle While pour traverser les feuilles.
  • Utiliser la fonction InStr pour vérifier la présence de "Fruit" dans le nom de la feuille.
  • Compter et afficher le nombre de feuilles correspondantes.
• Scénario: Il est nécessaire de vérifier régulièrement combien de feuilles de calcul sont utilisées pour la gestion des fruits.

Exercice 11: Pour

Exercice:
Créer un code VBA qui utilise une boucle For pour ajouter les prix de tous les fruits listés dans une colonne.

• Détails:
  • Utiliser une boucle For pour parcourir les cellules.
  • Assumer que les prix sont listés dans la colonne A, de A1 à A10.
  • Calculer le total et afficher dans une boîte de message.
• Scénario: Vous souhaitez calculer le coût total des fruits en inventaire.

Exercice 12: Plage et Boucle

Exercice:
Créer un script VBA pour ajouter une remise de 5% à tous les prix de fruits qui sont au-dessus de 15 $.

• Détails:
  • Utiliser une boucle pour traverser les cellules d'une plage donnée.
  • Vérifier si le prix est supérieur à 15 $ avant d'ajouter la remise.
  • Mettre à jour les prix directement dans les cellules.
• Scénario: Une politique de prix a été introduite pour inciter les ventes de fruits plus coûteux en appliquant une remise.

Exercice 13: Feuilles

Exercice:
Créer un script VBA pour renommer toutes les feuilles de calcul en ajoutant le suffixe "_Inventory".

• Détails:
  • Utiliser une boucle pour parcourir toutes les feuilles.
  • Utiliser la propriété Name pour renommer les feuilles.
  • Ajouter "_Inventory" à chaque nom de feuille existant.
• Scénario: Afin de mieux organiser le classeur, toutes les feuilles de gestion des inventaires doivent être renommées de manière cohérente.

Exercice 14: Tableaux

Exercice:
Créer un script VBA pour créer un tableau de fruits contenant le nom, le prix, et la quantité de chaque fruit.

• Détails:
  • Définir un tableau à trois colonnes : Nom, Prix, Quantité.
  • Ajouter au moins cinq entrées de fruits.
  • Afficher les informations du tableau dans une boîte de message.
• Scénario: Le directeur souhaite voir une liste des fruits avec leurs prix et quantités pour un rapport de vente hebdomadaire.

Exercice 15: Pour Chaque

Exercice:
Créer un script VBA pour parcourir chaque feuille de calcul et lister leur nom dans une nouvelle feuille appelée "Sommaire".

• Détails:
  • Utiliser une boucle For Each pour parcourir chaque feuille de calcul.
  • Ajouter les noms de feuilles dans une nouvelle feuille "Sommaire".
  • Assurer que la feuille "Sommaire" est créée si elle n'existe pas.
• Scénario: Pour faciliter la navigation entre différentes sections du classeur, un sommaire doit être créé automatiquement répertoriant toutes les feuilles disponibles.

Exercice 16: Chaînes de caractères

Exercice:
Créer un script VBA pour vérifier si un certain fruit est disponible dans la liste. Si trouvé, afficher "Fruit disponible", sinon "Fruit non disponible".

• Détails:
  • Utiliser une boucle pour parcourir la liste des fruits.
  • Comparer chaque entrée avec le fruit recherché.
  • Utiliser des chaînes de caractères pour la comparaison.
• Scénario: Pour vérifier rapidement la disponibilité d'un fruit spécifique dans l'inventaire.

Exercice 17: Userform

Exercice:
Créer un formulaire utilisateur (Userform) en VBA pour ajouter de nouveaux fruits à une liste. Le formulaire doit avoir des champs pour le nom du fruit, le prix et la quantité, et un bouton pour soumettre les données.

• Détails:
  • Créer un formulaire avec trois champs de saisie (nom, prix, quantité).
  • Ajouter un bouton "Ajouter" qui, lorsqu'il est cliqué, ajoute les informations du fruit à une liste dans une feuille de calcul.
  • Assurer une validation de base des données (par exemple, vérifier que le prix est un nombre).
• Scénario: Un formulaire simplifié pour ajouter rapidement des informations sur de nouveaux fruits dans le système d'inventaire.