Comment utiliser l'opérateur Mod de VBA (9 exemples)

  • Partage Ça
Hugh West

Le site VBA Mod n'est pas une fonction alors que MOD est une fonction dans une feuille de calcul Excel. VBA Mod est un opérateur qui divise deux nombres et renvoie le résultat de la division. reste L'opérateur Mod est une forme abrégée de MODULO qui est utilisé dans les opérations mathématiques. Mod opérateurs arrondir le site virgule flottante .

Dans cet article, je vous montrerai différents exemples d'utilisation de l'outil Excel VBA Mod opérateur.

Télécharger pour pratiquer

Exemples d'opérateurs de modération VBA.xlsm

Les bases de la fonction VBA Mod : résumé et syntaxe

Résumé

Le site VBA Mod L'opérateur divise deux nombres et renvoie la valeur reste . où l'on est connu comme un diviseur un autre est un numéro . le Mod L'opérateur divise le numéro par le diviseur .

Syntaxe

Numéro1 Mod Numéro2 (Diviseur)

Arguments

Arguments Obligatoire/optionnel Explication
Numéro 1 Requis Il s'agit d'un numérique expression
Numéro 2 Requis Il s'agit d'un numérique expression

Valeur de retour

Le site VBA Mod L'opérateur retourne un reste .

Version

Le site VBA Mod L'opérateur est disponible pour Excel 2000 et les versions ultérieures.

J'utilise Excel Microsoft 365 pour mettre en œuvre ces exemples.

9 exemples d'utilisation de la fonction VBA Mod dans Excel

1. utiliser le mode VBA pour obtenir le reste de l'information

Si vous voulez, vous pouvez obtenir un reste en utilisant le VBA Mod opérateur.

Laissez-moi vous expliquer la procédure,

Pour commencer, ouvrez le Développeur onglet>> ; sélectionner Visual Basic .

➤ Maintenant, une nouvelle fenêtre de Microsoft Visual Basic pour les applications apparaîtra.

Ensuite, de Insérer >> ; sélectionner Module

Maintenant, tapez le code suivant dans le fichier Module .

 Sub Get_Reminder() Dim n As Integer n = 29 Mod 3 MsgBox " 29 Mod 3 is " & ; n End Sub 

Ici, dans le Get_Reminder Dans la sous procédure, j'ai déclaré la variable n comme Entier et l'a utilisé pour conserver la valeur renvoyée par la fonction Mod opérateur.

Ensuite, j'ai utilisé le MsgBox pour montrer le reste .

Maintenant, Sauvez le code et retourner à la feuille de travail.

Encore une fois, ouvrez le Développeur onglet>> ; de Insérer >> ; sélectionner Bouton de Contrôles de formulaires

Maintenant, Traînée le site Bouton pour le placer là où vous voulez donner la légende.

Ensuite, vous pouvez donner un nom au bouton.

➤ Je l'ai nommé Obtenir un rappel .

⏩ Maintenant, clic droit sur la souris un menu contextuel de Affecter Macro apparaîtra.

De là, sélectionnez Attribuer une macro .

⏩ A boîte de dialogue de Attribuer une macro apparaîtra.

Ensuite, sélectionnez le Nom de la macro et Macros dans .

⏩ J'ai sélectionné Get_Reminder de la Nom de la macro et sélectionné VBA Mod.xlsm de Macros dans .

Enfin, cliquez sur OK .

Ensuite, cliquez sur le bouton nommé Get_Reminder .

Par conséquent, il montrera une boîte à messages avec le reste .

Vous pouvez le faire pour tous les numéros pour obtenir le reste .

Lire la suite : Fonction VBA Format dans Excel (8 utilisations avec exemples)

2. utilisation de la référence de cellule en VBA Mod pour obtenir le reste de l'information

En utilisant Référence de la cellule à partir de la feuille Excel, vous pouvez obtenir le reste de VBA Mod .

Pour ouvrir le VBA suivez les étapes expliquées dans la section 1.

Ensuite, tapez le code suivant dans le champ Module .

 Sub Reminder_Using_CellReference() Dim n As Integer n = Range("B4").Value Mod Range("C4").Value MsgBox Range("B4").Value & ; " Mod " & ; Range("C4").Value & ; " is " & ; n End Sub 

Ici, dans Rappel_Utilisation_Référence_de_cellules j'ai déclaré la variable n comme Entier et l'a utilisé pour conserver la valeur renvoyée par la fonction Mod opérateur.

Ensuite, nous avons utilisé la référence de la cellule B4 comme numéro 1 et C4 comme nombre2 (diviseur)

Ensuite, j'ai utilisé le MsgBox pour montrer le reste .

Maintenant, Sauvez le code et retourner à la feuille de travail.

Pour insérer le Bouton Suivez les étapes expliquées dans la section 1.

➤ J'ai nommé le bouton Référence de la cellule .

Après cela, cliquez sur le Bouton pour exécuter le VBA code.

Par conséquent, vous obtiendrez le reste pour la référence de la cellule utilisée.

Related Content : Comment retourner une valeur dans une fonction VBA (valeurs de type tableau ou non)

3. utilisation du mode VBA pour obtenir le reste d'un nombre négatif

Le site VBA Mod soutient également négatif numéros tout en calculant le reste .

Pour ouvrir le VBA suivez les étapes expliquées dans la section 1.

Ensuite, tapez le code suivant dans le champ Module .

 Sub Reminder_From_NegativeNumber() Dim n As Integer n = Range("B5").Value Mod Range("C5").Value MsgBox Range("B5").Value & ; " Mod " & ; Range("C5").Value & ; " is " & ; n End Sub 

Ici, dans Rappel_du_nombre_négatif, J'ai déclaré la variable n comme Entier et l'a utilisé pour conserver la valeur renvoyée par la fonction Mod opérateur.

Ensuite, nous avons utilisé la référence de la cellule B5 comme numéro 1 et C5 comme nombre2 (diviseur)

Ensuite, j'ai utilisé le MsgBox pour montrer le reste .

Maintenant, Sauvez le code et retourner à la feuille de travail.

Pour insérer le Bouton, suivez les étapes expliquées dans la section 1.

➤ J'ai nommé le bouton Rappel du nombre négatif .

Après cela, cliquez sur le Bouton pour exécuter le VBA code.

Par conséquent, vous obtiendrez le reste pour le nombre négatif .

Lire la suite : Comment utiliser la fonction IsNumeric de VBA (9 exemples)

4. utiliser le mode VBA pour obtenir le reste d'une cellule

Au lieu de montrer le reste à travers le msg boîte vous pouvez le placer dans une cellule en utilisant la fonction VBA MOD fonction.

Pour ouvrir le VBA suivez les étapes expliquées dans la section 1.

Ensuite, tapez le code suivant dans le champ Module .

 Sub Reminder_in_Cell() ActiveCell.FormulaR1C1 = "=MOD(RC[-2],RC[-1])" Range("D4").Select End Sub 

Ici, dans s ub-procédure Rappel_dans_la_cellule J'ai utilisé le Cellule active.FormuleR1C1 pour obtenir la position de ActiveCell .

Ensuite, on a utilisé le MOD pour obtenir le reste .

Aussi, j'ai utilisé le Sélectionnez méthode.

Maintenant, Sauvez le code et retourner à la feuille de travail.

Pour insérer le Bouton et attribuer le site VBA code suivre les étapes expliquées dans la section 1.

➤ J'ai nommé le bouton Rappel en cellule .

Ensuite, sélectionnez le D4 cellule.

Ensuite, cliquez sur le Bouton pour exécuter le VBA code.

Par conséquent, vous obtiendrez le reste dans la cellule sélectionnée.

En suivant le même processus, vous obtiendrez la reste pour le reste des chiffres.

Lire la suite : Comment utiliser la fonction MsgBox dans Excel VBA (Guide complet)

5. utilisation de VBA Mod avec le diviseur d'un nombre entier et le nombre flottant.

Au cas où votre diviseur est un entier mais votre numéro est en float alors vous pouvez utiliser le VBA Mod opérateur.

Pour ouvrir le VBA suivez les étapes expliquées dans la section 1.

Ensuite, tapez le code suivant dans le champ Module .

 Sub Reminder_From_Decimal_Number() Dim n As Integer n = Range("B5").Value Mod Range("C5").Value MsgBox Range("B5").Value & ; " Mod " & ; Range("C5").Value & ; " is " & ; n End Sub 

Ici, dans le R sous-procédure eminder_From_Decimal_Number, J'ai déclaré la variable n comme Entier et l'a utilisé pour conserver la valeur renvoyée par la fonction Mod opérateur.

Ensuite, nous avons utilisé la référence de la cellule B5 comme numéro 1 et C5 comme nombre2 (diviseur)

Ensuite, j'ai utilisé le MsgBox pour montrer le reste .

Maintenant, Sauvez le code et retourner à la feuille de travail.

Pour insérer le Bouton Suivez les étapes expliquées dans la section 1.

➤ J'ai nommé le bouton Rappel à partir d'un nombre décimal .

Après cela, cliquez sur le Bouton pour exécuter le VBA code.

Par conséquent, vous obtiendrez le reste pour le nombre décimal .

Mais il y a un problème que Le VBA fait le tour le site décimal Ici, le résultat était censé être 2.25 mais le VBA Mod l'a arrondie à 2 .

N'oubliez pas que si un décimal/flottant est supérieure à 0.5 dans le VBA Mod alors ce sera rassemblé à la valeur entière suivante.

Si elle est inférieure à 0.5 dans le VBA Mod alors ce sera rassemblé à la valeur entière existante.

Lire la suite : Comment utiliser la fonction Int de VBA dans Excel ( 3 exemples)

Lectures similaires :

  • Comment utiliser la fonction IsNull dans Excel VBA (5 exemples)
  • Utiliser la fonction VBA Str dans Excel (4 exemples)
  • Comment utiliser la fonction Switch de VBA (6 exemples pertinents)
  • Utiliser la fonction VBA Len dans Excel (4 exemples)
  • Comment supprimer les doublons dans une feuille Excel (7 méthodes)

6. utilisation de VBA Mod lorsque le diviseur et le nombre sont tous deux des décimales

Si votre diviseur et numéro les deux sont en décimal/float vous pouvez également utiliser l'option VBA Mod opérateur.

Pour ouvrir le VBA suivez les étapes expliquées dans la section 1.

Ensuite, tapez le code suivant dans le champ Module .

 Sub Decimal_Both_Divisor_Number() Dim n As Integer n = Range("B5").Value Mod Range("C5").Value MsgBox Range("B5").Value & ; " Mod " & ; Range("C5").Value & ; " is " & ; n End Sub 

Ici, dans le sous-procédure Decimal_Both_Divisor_Number, J'ai déclaré la variable n comme Entier et l'a utilisé pour conserver la valeur renvoyée par la fonction Mod opérateur.

Ensuite, nous avons utilisé la référence de la cellule B5 comme numéro 1 et C5 comme nombre2 (diviseur)

Ensuite, j'ai utilisé le MsgBox pour montrer le reste .

Maintenant, Sauvez le code et retourner à la feuille de travail.

Pour insérer le Bouton, suivez les étapes expliquées dans la section 1.

➤ J'ai nommé le bouton Obtenez Rappel de Quand Diviseur & ; Nombre Décimal .

Après cela, cliquez sur le Bouton pour exécuter le VBA code.

Par conséquent, vous obtiendrez le reste pour les deux diviseur décimal et numéros .

Mais il y a un problème que VBA fait le tour des décimal Ici, le résultat était censé être 1.75 mais le VBA Mod l'a arrondie à 2 .

Contenu connexe : Fonction VBA EXP dans Excel (5 exemples)

7. mod VBA pour arrondir un nombre décimal supérieur à 0,5

Ici, je vais vous montrer comment le arrondir travaille dans le VBA Mod .

Pour vous démontrer le décimal problème de point, je vais d'abord calculer le reste en utilisant l'outil Excel MOD fonction.

En cellule D4 , tapez la formule suivante,

=MOD(B6, C6)

Ici, j'ai utilisé B6 comme numéro C6 en tant que diviseur .

Ensuite, appuyez sur ENTER pour obtenir le reste et vous obtiendrez le reste qui sera 7.7 .

Maintenant, calculons à travers VBA Mod pour ouvrir le VBA éditeur, suivez les étapes expliquées dans la section 1.

Ensuite, tapez le code suivant dans le champ Module .

 Sub RoundsUp_Number() Dim n As Integer n = Range("B6").Value Mod Range("C6").Value MsgBox Range("B6").Value & ; " Mod " & ; Range("C6").Value & ; " is " & ; n End Sub 

Ici, dans le sous-procédure Decimal_Both_Divisor_Number, J'ai déclaré la variable n comme Entier et l'a utilisé pour conserver la valeur renvoyée par la fonction Mod opérateur.

Ensuite, nous avons utilisé la référence de la cellule B6 comme numéro 1 et C6 comme nombre2 (diviseur)

Ensuite, j'ai utilisé le MsgBox pour montrer le reste .

Maintenant, Sauvez le code et retourner à la feuille de travail.

Pour insérer le Bouton Suivez les étapes expliquées dans la section 1.

➤ J'ai nommé le bouton RoundsUp Nombre décimal .

Après cela, cliquez sur le Bouton pour exécuter le VBA code.

Par conséquent, vous obtiendrez le reste pour la référence de la cellule utilisée.

Regardez attentivement le reste que le VBA Mod retourné. Le MOD pour les mêmes valeurs retournées 7.7 mais le VBA Mod L'opérateur est retourné 0 Comme le VBA a arrondi les valeurs.

Lire la suite : Comment utiliser la fonction arrondie VBA dans Excel (6 utilisations rapides)

8. déterminer un nombre pair ou impair

Le site VBA Mod détermine également le Même ou Odd un nombre dans une plage donnée.

Pour ouvrir le VBA suivez les étapes expliquées dans la section 1.

Ensuite, tapez le code suivant dans le champ Module .

 Sub Determine_Even_Or_Odd() Dim n As Integer For n = Range("B4").Value To Range("B8").Value If n Mod 2 = 0 Then MsgBox n & ; " is an even number !" Else MsgBox n & ; " is an odd number !" End If Next n End Sub 

Ici, dans le sous-procédure Determine_Even_Or_Odd, J'ai déclaré la variable n comme Entier .

Ensuite, j'ai utilisé un Pour où je garde la valeur que j'ai déclarée par référence de cellule.

Ensuite, j'ai utilisé un SI où j'ai défini les critères comme n Mod 2 = 0 si la valeur est vraie, il retournera un Même déclaration sinon Odd .

Ensuite, j'ai utilisé le MsgBox pour montrer le déclarations .

Maintenant, Sauvez le code et retourner à la feuille de travail.

Pour insérer le Bouton Suivez les étapes expliquées dans la section 1.

➤ J'ai nommé le bouton Pair ou impair .

Après cela, cliquez sur le Bouton pour exécuter le VBA code.

Par conséquent, vous pourrez savoir quelle valeur est Même et lequel est Odd .

Ici, 1 est le Odd numéro.

Ici, 2 est le Même numéro.

Lire la suite : Déclaration VBA If - Then - Else dans Excel (4 exemples)

9. utilisation de la plage de cellules en VBA Mod pour obtenir le reste.

Vous pouvez également utiliser le gamme de cellules pour obtenir le reste en utilisant le VBA Mod .

Pour ouvrir le VBA suivez les étapes expliquées dans la section 1.

Ensuite, tapez le code suivant dans le champ Module .

 Sub Get_Reminder_UsingVBA() Dim n As Integer For n = 4 To 9 MsgBox Cells(n, 2).Value Mod Cells(n, 3) Next n End Sub 

Ici, dans le Sous-procédure Get_Reminder_UsingVBA, J'ai déclaré la variable n comme Entier .

Ensuite, j'ai utilisé un Pour où j'ai gardé la valeur que j'ai déclarée par référence de cellule. La boucle fonctionnera pour les valeurs des lignes 4 à 9 .

Ensuite, j'ai utilisé le MsgBox pour montrer le reste .

Maintenant, Sauvez le code et retourner à la feuille de travail.

Pour insérer le Bouton Suivez les étapes expliquées dans la section 1.

➤ J'ai nommé le bouton Référence de cellule dynamique .

Après cela, cliquez sur le Bouton pour exécuter le VBA code.

Par conséquent, vous obtiendrez le reste pour toutes les valeurs utilisées, une par une.

La première est pour le numéro 29 où le diviseur est 3 .

Le 2ème est pour le numéro -47 où le diviseur est 5 .

La boucle fonctionnera jusqu'à ce qu'elle atteigne la rangée 9 Le cinquième est pour le numéro 59 où le diviseur est 6 .

Contenu connexe : Comment utiliser la fonction VBA Randomize dans Excel (5 exemples)

Différence entre le module Excel et le module VBA

Bien que dans la plupart des cas, les valeurs de retour soient les mêmes pour l'option MOD et la fonction VBA Mod Pourtant, dans certains cas, le résultat diffère de l'un à l'autre. Laissez-moi vous montrer la différence entre les deux.

MOD Fonction VBA Mod Opérateur
Le site MOD retourne les deux Entier et Décimal numéros. Mod L'opérateur renvoie uniquement Entier numéros.
Pendant l'utilisation d'un négatif nombre en MOD il ne renvoie pas un signe négatif . Il prend en charge négatif et renvoie ensuite le signe négatif .

Les choses à retenir

🔺 L'opérateur va arrondir les décimal/flottant points.

Section pratique

J'ai fourni une feuille d'exercice dans le cahier d'exercices pour mettre en pratique ces exemples expliqués.

Conclusion

Dans cet article, j'ai montré 9 exemples d'utilisation de l'outil Excel VBA Mod J'ai également essayé de couvrir les raisons pour lesquelles les erreurs apparaissent fréquemment, ainsi que les choses dont vous devez vous souvenir lorsque vous utilisez l'opérateur. N'hésitez pas à commenter ci-dessous pour tout type de questions et de suggestions.

Hugh West est un formateur et analyste Excel très expérimenté avec plus de 10 ans d'expérience dans l'industrie. Il est titulaire d'un baccalauréat en comptabilité et finance et d'une maîtrise en administration des affaires. Hugh a une passion pour l'enseignement et a développé une approche pédagogique unique qui est facile à suivre et à comprendre. Sa connaissance approfondie d'Excel a aidé des milliers d'étudiants et de professionnels du monde entier à améliorer leurs compétences et à exceller dans leur carrière. Grâce à son blog, Hugh partage ses connaissances avec le monde, offrant des tutoriels Excel gratuits et une formation en ligne pour aider les particuliers et les entreprises à atteindre leur plein potentiel.