OptionButton pour donner le nom d'une variable

Bonjour à tous,

afin de simplifier mon projet pour lequel Banzaï m'a déjà aidé.

Je souhaitais créer un choix possible entre deux base de données via des OptionButton.

Une fois ce choix fait ceci me donnerais le nom de ma variable ce qui pourrait lancer ma macro.

Cela simplifierai car au lieu d'avoir une macro par Bdd, je n'aurais plus qu'une seule macro pour toutes les Bdd.

Ci joint le travail déjà effectué. Mon code fonctionnerais pour le choix des OptionButton mais bug au début de la macro

Merci d'avance pour votre aide et le temps passé.

36qcm-exemple.zip (31.04 Ko)

Bonjour,

Peut-être quelque chose comme ça :

Private Sub CréationMulti_Click()
Dim NbQuestions As Integer
Dim i As Integer
Dim WsBase As Worksheet
Dim Lg As Integer
Dim NomBdd As String

'Création du test
Application.ScreenUpdating = False

If OptionButton_A = True Then NomBdd = "BddA"
If OptionButton_B = True Then NomBdd = "BddB"
Unload Me

Set WsBase = Sheets(NomBdd)

La suite sans changement...

A+

Merci Galopin01 pour cette aide,

je n'étais pas loin mais c'est encore un problème de syntaxe. Je continue d'apprendre c'est le principal.

Rechercher des sujets similaires à "optionbutton donner nom variable"