Requete SQL en VBA Liste deroulante

Bonjour,
Dans le cadre de mon BTS SIO où je suis en 1re année je dois créer une base de données et des formulaires sous excel (userform) et je bute sur les listes déroulantes. Je vous explique:
J'ai une table Centre avec les champs : (num_centre, nom_centre)
une table Sous_Centre avec les champs : (num_sscentre,nom_sscentre,num_centre)
Et J'ai une table Sous_Sous_Centre avec les champs : (num_ss_sscentre,nom_ss_sscentre,num_sscentre)

Pour éviter le risque d'erreur je voudrais diriger l'utilisateur en faisant des listes déroulantes restreintes.

De la liste des centres cela nous donne le sous centre et du sous centre cela nous donne le sous-sous centre séléctionnées.
Après m'etre connecté à ma base de donnée Access lorsque l'user form se charge j'ai créé une requete basique :
"SELECT num_centre,nom_centre FROM Centre;" que j'ai écrit dans la procédure lorsque j'appuie sur un bouton

Private Sub BtnValider_Click()    
    Dim existeenreg As Boolean    
        
        
    Set TBon_RST = New ADODB.Recordset    
    reqsql = "Select num_centre, nom_centre from Centre"    
    nom = "R"    
    TBon_RST.Open reqSql, Mabase    
    existeenreg = TBon_RST.EOF    
        
      
    While existeenreg = False    
    x = TBon_RST.Fields(2)    
    CboCentre.AddItem "x"    
    TBon_RST.movement    
    Wend

Pour le champ sous-centre, je voudrais restreindre le choix suivant ce qui a été précédement choisi dans Centre.Pour le champ sous-sous-centre, je voudrais restreindre le choix suivant ce qui a été précédement choisi dans Centre et dans sous centre.
Donc je pense passé par des "IF" et quelques variables ça devrait marché... Mais lorsque je test mon bout de code décris au dessus ça m'indique : "Erreur d'éxécution '438' : Propriété ou méthode non gérée par cet objet.

Si une âme charitable en a une, je luis serais éternellement reconnaissant.

Par avance,
Merci.
lilian.tobelem@hotmail.fr