Discussion :

[arctica]

Bonjour à tous

tous les jours j'apprends grace à vous hélas je ne suis encore que débutant...
voila à l'execution de ma maccro au dernier stade il me mets
"erreur d'execution 1004
erreur définie par l'application ou par l'objet"
voici ma ligne qui contient une formule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sheets("Globale").Activate
Range("Q3").Select
ActiveCell.FormulaR1C1 = _
"=IF(AND(R[-4]C[2]=""znl"",LEFT(R[-4]C[8],3)=""dhl"",R[-4]C[11]+2<TODAY(),R[-4]C[12]="""",COUNTIF(R[14]C[2926],R[-4]C[4])),""pas livrée ?"",IF(AND(R[-4]C[2]=""znl"",LEFT(R[-4]C[8],3)=""dhl"",R[-4]C[11]+3<TODAY(),R[-4]C[12]="""",COUNTIF(R[38]C[2926],R[-4]C[4])),""pas livrée ?"",IF(AND(R[-4]C[2]=""znl"",LEFT(R[-4]C[8],3)=""joy"",R[-4]C[11]+2<TODAY(),R[-4]C[12]="""",COUNTIF(R[14]C[6982],R[-4]C[4])),""pas livrée ?"",IF(AND(R[-4]C[2]=""znl"",LEFT(R[-4]C[8],3)=""joy"",R[-4]C[11]+3<TODAY(),R[-4]C[12]="""",COUNTIF(R[38]C[6982],R[-4]C[4])),""pas livrée ?"",IF(AND(R[-4]C[2]=""znl"",LEFT(R[-4]C[8],3)=""joy"",R[-4]C[11]+4<TODAY(),R[-4]C[12]="""",COUNTIF(R[62]C[6982],R[-4]C[4])),""pas livrée ?"","""")))))"

Pourriez vous m'aider?

[mondev]

Salut 'arctica',

J'ai remarqué que tu dépasse les limites de la feuilles :
On est positionné sur la cellule "Q3" et tu testes (R[-4]C[2]=""znl"") une cellule qui se trouve à 4 lignes au dessus de celle là (une ligne/cellule qui n'existe pas).

C'est tout ce que j'ai pu remarquer, ta formule est super longue.
Ce serait plus simple d'utiliser l'Audit de formule je crois !


A+...

[arctica]

Bonjour Mondev,

en fait cette formule je l'ai enregistré à l'aide de l'enregistreur puis je l'ai appliqué à ma macro que j'ai un peu modifiée depuis pour la présentation ce qui explique le décalage donc je vais la réenregistrer pour voir à noter que cette commande suit une autre commande disposant également une autre formule dans la rangée à coté (p3) qui elle n'a pas de souci à s'executer . Mais qu'est ce que c'est que l'Audit de formule?

[mondev]

Sans passer par VBA :
ta formule est ce qu'elle marche correctement ?
et est ce que tu peux nous la recopier (comme dans la cellule avec les "Si" etc) ?


Excel >>> Outils >>> Audit de formules >>> ...

[Pierre Fauconnier]

Salut.

Une bonne idée pour rédiger les formules en VBA...

Tu rédiges la formule en Excel. Tu te places sur la cellule qui contient la formule puis, dans l'éditeur de VBA, tu saisis ce qui suit dans la fenêtre d'exécution

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

? activecell.formula

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

? activecell.formulaR1C1

(Personnellement, je n'aime pas cette façon d'afficher les formules...)
Tu vois ainsi comment la formule est construite et comment tu dois reconstituer la chaine.

Cela est dit nonobstant le fait souligné par mondev que cette formule en Q3 ne peut que renvoyer une erreur d'exécution, VBA ne permettant pas de créer dans une cellule une formule qui ne saurait être saisie dans Excel.

Question: Pourquoi utiliser la formule en R1C1?