Insérer une formule dans une cellule VBA Résolu

Question

Bonjour, 

Je suis relativement novice en VBA. Je tente d'inclure une formule dans une cellule mais j'ai l'erreur suivante:

"Erreur d'execution 1004",  "Erreur définie par l'application ou par l’objet"

Mon code ressemble à ceci: (Notez que la variable text contient le nom d'une worksheet)

Dim recherche As String
recherche = "=RECHERCHEV(A5;'" & text & "'!A2:Z150;10;FAUX)"
Cells(7, 2).Value = recherche

Si vous avez une idée je suis preneur!

Antoine

Patrice33740 · Answer

Bonjour,

1. Tu n'a pas défini la valeur de text
2. Tu ne dois jamais utiliser un mot réservé au langage pour nommer une variable : remplaces text par texte
3. Il est vivement conseillé de toujours rattacher les objets range (ou cells) à la feuille ad hoc.

Essaies :
Sub Test()
Dim recherche As String
Dim texte As String
  texte = "MaFeuille"
  recherche = "=RECHERCHEV(A5;'" & texte & "'!A2:Z150;10;FAUX)"
  Worksheet(1).Cells(7, 2).FormulaLocal = recherche
End Sub

Insérer une formule dans une cellule VBA

1 réponse

Votre réponse