Erreur VBA commande
Résolu
2pax.cruz
-
Krysstof Messages postés 1659 Statut Membre -
Krysstof Messages postés 1659 Statut Membre -
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...
A voir également:
- Erreur VBA commande
- Invite de commande - Guide
- Commande terminal mac - Guide
- Diskpart commande - Guide
- Commande scannow - Guide
- 'Pip' n’est pas reconnu en tant que commande interne ✓ - Forum Python
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]"
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]"