Discussion :

[elfiestador]

Bonjour,

Je rencontre un petit pbm.
Depuis une macro Access, je met en forme un fichier Excel

J'affecte a un range de cellules une formule avec le code suivant

Code :

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

1
2
3
4
5
 
For i = 1 To nbLigne
        '30eme
        wsExcel.Cells(5 + i, 9).Formula = "=SI(JOURS360(D" & CStr(i + 5) & ";E" & CStr(i + 5) & ")<JOURS360(D" & CStr(i + 5) & ";F2);JOURS360(D" & CStr(i + 5) & ";E" & CStr(i + 5) & ");JOURS360(D" & CStr(i + 5) & ";F2))"
    Next i

Cette instruction ne fonctionne pas et provoque l'arret de la mise en forme a partir de ce point.
De plus si j'enleve le "=" avant le "SI" la string pour la 1ere ligne vaut :

Code :

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

SI(JOURS360(D6;E6)<JOURS360(D6;F2);JOURS360(D6;E6);JOURS360(D6;F2))

Si depuis ma feuille excel je rajoute un "=" devant le "SI" de cette string, ma formule fonctionne...

Please help

[Jean-Philippe André]

salut,
quelle erreur est relevée exactement stp ?
il faut garder le "=" en début de formule dans tous les cas

[elfiestador]

Bon finalement, je vais faire ce traitement directement dans mon code VBA sinon, j'ai un autre petit pbm, quand je lie des tables dans access via ODBC j'ai une fenetre me demandant de choisir identifiant de champs unique.

Est-il de supprimer l'affichage de cette fenetre ?