Bonjour,

je n'ai pas vraiment de problèmes de codes mais un Pb de technique !

J'ai une sorte de formulaire directement dans une feuille Excel, pas dans une Form.

L'idée, c'est d'avoir un formulaire multi-langues.
J'ai donc 4 option button pour choisir la langue et en fonction du choix les labels changeront.
La source, c'est un tableau avec en première colonne le nom du contrôle label et ensuite suivant la colonne la bonne traduction.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
'récupération de la langue choisie pouir déterminer la colonne de la table trad à prendre
    If Option_EN.Select = True Then col_lang = 4
    If Option_FR.Select = True Then col_lang = 5
    If Option_ES.Select = True Then col_lang = 6
    If Option_DE.Select = True Then col_lang = 7
 
'parcours des contrôles de ma page
    For Each Obj In ActiveSheet.OLEObjects
        'si c'est un label
        If TypeOf Obj.Object Is Label Then
                'parcours de chaque
                For i = 0 To NbLabel
                  'parcours du tableau de trad
                  For j = 0 To NbLigneTrad
                     If Sheets("Translation").Cells(j, 1) = Obj.Name Then
                     Obj.Caption = Sheets("Translation").Cells(j, col_lang)
                    End If
                  Next j
                Next i
        End If
    Next Obj

C'est une solution mais si vous avez d'autres idées pour gérer ce genre de problématique multi-langues, n'hésitez pas.

Bonne soirée.
Freiya