Discussion :

[mardona]

Bonjour,

pour simplifier, quand je clique sur un bouton, celui-ci déclenche une procédure qui met à jour les formule de certaines cellule. Généralement les cellules Excel touchée valent par exemple: "=NBCAR(N19) + NBCAR(N23)" ou simplement des fois "=NBCAR(N19)".

Pour mois la formule est celle que j'attend. Le problème est que lorsque'elle est mise à jour par la procédure ci-dessus, l'évaluation de la formule ne donne rien (ou plutôt un #) avec le commentaire suivant: La formule contient du texte non reconnu.

Ce qui est bizzare, c'est qu'en sélectionnant la cellule avec la formule, et tapant seulement un retour chariot sur la barre de formule, la formule fonctionne.


Quelqu'un aurait il déjà rencontré ce problème.

Merci

[spoyet]

Ta macro rentre la formule?

Si oui

Code :

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

    ActiveCell.FormulaLocal = fformule1

[mardona]

non ça ne marche pas.
Voici un bout de code si ça peut t'aider:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
...
fatWorkbook.Activate   'activation du classeur contenant la feuille de travail Ws_analyse

'Construction de la formule
For I = 1 To parentActivityRowCollection.Count
      parentActivityRow = parentActivityRowCollection(I)
      relativeRow = (parentActivityRow + 1) - totalMatineeProjetRange.row
      If (formule = "") Then
          formule = "= NBCAR(R[" & CStr(relativeRow) & "]C[0])"
      Else
          formule = formule & " + NBCAR(R[" & CStr(relativeRow) & "]C[0])"
      End If
Next I
    
Ws_Analyse.Select
Ws_Analyse.Cells(totalMatineeProjetRange.row, totalMatineeProjetRange.Column).Select  'Sélection de la cellule contenant la formule
ActiveCell.FormulaR1C1Local = formule       
      
ThisWorkbook.Activate

Le débogueur signale une erreur sur la ligne en Gras:
Erreur d'exécution 1004
Erreur définie par l'application ou par l'objet

[spoyet]

Regarde dans le corps de ta formule c'est peut-être la qu'il y à l'erreur