erreur d'exécution de ma macro

Version imprimable

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:

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?

28/09/2009, 15h58
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+...
28/09/2009, 16h23
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?
28/09/2009, 16h38
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 >>> ...
29/09/2009, 09h21
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:

? activecell.formula

ou

Code:

? 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?