Erreur VBA commande
Résolu
Bonjour,
j'ai un soucis avec cela....
For i = 1 To Taille
MachineTime = Cells(12, i + 4)
ChangeOver = Cells(11, i + 4)
SStops = Cells(10, i + 4)
QtySurBns = Cells(8, i + 4)
ExpFormule = MachineTime & "-" & ChangeOver & "-" & SStops & "-" & QtySurBns
Cells(13, i + 4).Formula = "=" & ExpFormule
Next i
Excel me rapporte une erreur à hauteur de Cells(13, i + 4).Formula = "=" & ExpFormule
Je comprends pas... Du tout...
L'erreur : "Application-defined ou object-defined error"
Merci... Sauvez moi...
j'ai un soucis avec cela....
For i = 1 To Taille
MachineTime = Cells(12, i + 4)
ChangeOver = Cells(11, i + 4)
SStops = Cells(10, i + 4)
QtySurBns = Cells(8, i + 4)
ExpFormule = MachineTime & "-" & ChangeOver & "-" & SStops & "-" & QtySurBns
Cells(13, i + 4).Formula = "=" & ExpFormule
Next i
Excel me rapporte une erreur à hauteur de Cells(13, i + 4).Formula = "=" & ExpFormule
Je comprends pas... Du tout...
L'erreur : "Application-defined ou object-defined error"
Merci... Sauvez moi...
2 réponses
-
hum, quelle est la logique dans ta volonté d'utiliser ".Formula"??
Ton code tel qu'il est fait revient à faire :
Cells(13, i + 4).Formula = "=" & "1-2-4-5"
donc autant faire
Cells(13, i + 4) = MachineTime - ChangeOver - SStops - QtySurBns
Au moins ta cellule 13,i+4 contiendra le résultat.
le code que tu utlise ne permet pas de faire une formule du type "=C5-D5-E5-F5" par exemple... est-ce ca que tu voulais faire?
si c'est ca que tu voulais faire essaye de mettre juste cette ligne dans ta boucle for
si c'est ca que tu veux faire, essaye simplement ca dans ta boucle for :
Cells(13, i + 4).FormulaR1C1 = "=RC[-1]-RC[-2]-RC[-3]-RC[-5]" -
Je voulais qu'on puisse encore voir les différentes composantes du calcul.
Mais bon, tant que ça marche...
Merci.
