Aide macro VBA
m
Bonjour à toutes et à tous,
Une fois n'est pas coutume, j'ai de nouveau besoin d'aide.
J'aimerais que si ma formule (=SUMIFS('" & co & "'!$" & ce & "$8:$" & ce & "$24,'" & co & "'!$B$8:$B$24,'Data new data'!$G" & k & ") me retourne #VALUE! alors la macro ne s'excute pas sinon elle s'exécute.
En fait la formule récupère les données d'un fichier ('"&co&"'!) et si le fichier n'existe pas, je ne veux pas que la macro s'execute.
Je ne sais pas si quelqu'un pourrait m'aider pour palier à mon problème.
Je pensais sinon utiliser la fonction iserror.
Merci d'avance,
Marion.
Sub Expand()
i = 2
While Cells(i, 3) <> ""
If Cells(i, 3) <> co Then k = 4
co = Cells(i, 3)
ce = Cells(i, 5)
Cells(i, 1).Formula = "=SUMIFS('" & co & "'!$" & ce & "$8:$" & ce & "$24,'" & co & "'!$B$8:$B$24,'Data new data'!$G" & k & ")"
If Cells(i, 1).Value = "#VALUE!" Then
Cells(i, 1).Formula = ""
Else
i = i + 1
k = k + 1
End If
Wend
End Sub