cabsen
XLDnaute Junior
Bonjour le forum,
J'utilise la macro suivante pour extraire les données d'un fichier.
Mon problème est que je ne sais pas où ajouter un "xlValue" pour ne récupérer que les valeurs et non les formules dans le fichier "analyseur.xls".
Si quelqu'un sait comment faire ? À votre bon cœur
D'avance merci…
J'utilise la macro suivante pour extraire les données d'un fichier.
Code:
Public Sub TransfertDonnees()
acopier = Array("G8:G12")
For i = 1 To 52
vers = Array("B" & 2 + ((i - 1) * 7))
For n = 0 To UBound(acopier)
Workbooks("07_08_v13.xls").Sheets("sem" & Format(i, "00")).Range(acopier(n)).Copy Destination:=Workbooks("analyseur.xls").Sheets("collecte").Range(vers(n))
Next n
Next i
End Sub
Mon problème est que je ne sais pas où ajouter un "xlValue" pour ne récupérer que les valeurs et non les formules dans le fichier "analyseur.xls".
Si quelqu'un sait comment faire ? À votre bon cœur
D'avance merci…