Bonjour
Désolé d'avoir comme 1er post une question, mais je suis pressé par le temps et n'arrive pas à trouver de solution sur le net (ah bravo la politesse !).
Je voudrais savoir s'il est possible d'utiliser Evaluate avec une chaine de caractère et une propriété.
Vous allez vous dire mais pourquoi veut-il faire comme ça?
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 'j'ai une variable qui contient une chaine de caractère Dim cell_val_cherchee As String cell_val_cherchee = "ActiveWorkbook.Worksheets(1).Range(""F7"")" 'elle est en String pour une bonne raison 'declaration d'une variable pour cellule Dim cell_quelconque As Range Set cell_quelconque = ThisWorkbook.Worksheets(1).Range("A2") 'ce que je veux obtenir : cell_quelconque = ActiveWorkbook.Worksheets(1).Range("F7").Offset(, ColCour - 1) 'en bref, rentrer une valeur d'une cellule dans une autre 'mais je veux le faire avec ma variable cell_val_cherchee 'Donc j'essaye avec evaluate : cell_quelconque = Evaluate(cell_val_cherchee & ".Offset(, ColCour - 1)") 'mais cela ne marche pas
Et bien pour expliquer en gros cell_quelconque appartient à un fichier excel.
Dans la macro de ce fichier, je vais ouvrir un autre fichier excel dans lequel sera cell_val_cherchee .
Comme je fais appel à une procédure et que l'adresse de cell_val_cherchee va changer,
je préfère passer cela par paramètre dans l'appel.
Vous allez me dire de mettre cell_val_cherchee en Range,
j'ai essayé mais ça récupère une plage du 1er fichier excel, et non pas celui qui est ouvert, c'est pourquoi j'utilise une variable de type String.
Je veux donc interpréter cette chaine ainsi qu'un offset.
Cela est-il possible ?
Merci
Partager