Problème : programme en VBA

Bonjour,

Voila j'ai un exercice à faire mais je n'y arrive pas, je m'embrouille.

Voici l'énoncé : Rédigez le programme en VBA, l faut afficher les nombres divisibles par 3 compris entre 2 nombres que vous aurez saisis au préalable. On se bornera au maximum à 100 nombres trouvés.
Exemple :
premier nombre : 6
deuxième nombre : 15
les nombres divisibles par 3 sont : 6, 9, 12, 15


Attention vous devrez utiliser un tableau pour stocker les nombres trouvés et vous utiliserez l’opérateur mod qui permet d’avoir le reste de la division entière pour déterminer qu’un nombre est divisible par 3
Exemple : 15 mod 3 vaut 0, 15 mod 3 vaut 2

Je suis complétement bloquer, voici ce que j'ai fait :

Sub Nombre_divisibles_par_3()

'Déclarations des constantes

'Déclarations des variables

Dim nbr_entiers1 As Integer
Dim nbr_entiers2 As Integer


nbr_entiers1 = InputBox("Saisissez un nombre entier entre 1 et 100")
nbr_entiers2 = InputBox("Saisissez un nombre entier entre 1 et 100")


nbr_entiers1 > nbr_entiers2