Discussion :

[casho]

Bonjour
j'ai un problème lors de l'affichage d'une chaine de caractère correspondant à une formule dans une cellule d'une feuille excel à partir de VB6.
voici un exemple de code :

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
 
Private sub editBul
 
Dim objXl as new Excel.Application
Dim wbXl as new Excel.Workbook
Dim wsXl as new Excel.Worksheet
 
Dim formule as String
 
formule="=(0.1 * (F4-50050) * 0.8 * 0.01 * (F4 + 512) )"
set wbXl = objXl.open("C:\test.xls")
set wsXl = wbXl.ActiveSheet
wsXl.cell(5, 10).value=formule
...
end sub

une erreur est générée au niveau de la ligne wsXl.cell(5, 10).value=formule
et le message retourné est :

Valeur de propriété incorrecte

ou encore

la méthode range de l'objet a échouée

.
j'ai déjà utilisé plusieurs autres méthodes par exemple les propriétés .text, .formula, .range de l'objet workSheet mais sans succès.
Quelqu'un peut-il m'aider ?
merci d'avance

[zazaraignée]

Salut

Essaie plutôt

Code :

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

wsXl.cell(5, 10).formula=formule

[AlainTech]

Hum, hum...

Une Worksheet n'a pas de propriété Cell mais bien Cells.

Ce qui donne:

Code :

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

wsXl.Cells(5, 10).Formula = formule