Bonjour à toutes et tous.
Je bricole actuellement sur un fichier questionnaire se présentant sous la forme d'un USF.
Ce que j'aimerai faire : Récupérer un texte dans une feuille qui varie selon la question et sur une ligne qui varie également selon la question. J'ai donc écrit le code ci-dessous. Mais comme à mon habitude j'ai un problème de synthaxe. Pourriez vous m'aider à bien écrire le code.
J'ai enlevé ce qui fonctionne. LC et PC me donnent bien les valeurs attendues.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Private Sub Button_Q_Prec_Click() Dim LC As String Dim PC As String PC = Sheets("Base_USF").Cells(2, 3).Value 'PC = Page cible LC = Sheets("Base_USF").Cells(2, 4).Value 'LC = Ligne cible Questionnaire01.Box_Comm.Value = Sheets("PC").Name.Cells(2, LC).Value End Sub
Merci d'avance pour votre aide
Thierry
Partager