Ubuntu-fr

nautic

[Résolu]Macro avec OOo2 calc !!! Besoin d'un petit coup de pouce...

Bonjour,
Impossible de prendre le contenu d'une cellule pour l'afficher...
voici mon code :

Sub Progtest
Dim oDocument As Object, oSheet As Object, oCell As Object
Dim xx As integer, yy as integer
Dim sstring as string
xx=2
yy=2
oDocument=ThisComponent
oSheet=oDocument.Sheets.getByName("Feuille1")
oCell=oSheet.getCellByPosition(xx,yy)
sstring=oCell.getValue
MsgBox("Valeur="+sstring)
End sub

Dans mes cellules j'ai mis du texte mais "oCell.getValue" renvoie 0 dans la message box, au lieu du contenu de la cellule(2,2).

Je suis preneur d'un petit exemple qui marche...

Dernière modification par nautic (Le 02/10/2006, à 14:04)

Jer!cho

Re : [Résolu]Macro avec OOo2 calc !!! Besoin d'un petit coup de pouce...

Je ne connais pas le langage des macros de OO et c'est pour cela que je lis ce post car j'ai quelques macros de Excel à retranscrire, mais...

xx=1
yy=1
...
Dans mes cellules j'ai mis du texte mais "oCell.getValue" renvoie 0 dans la message box, au lieu du contenu de la cellule(2,2).

-> il n'y aurait pas une contradiction là ???
... à moins que la première cellule soit la (0,0) (mais oui c'est bien sûr !)

En tous cas, je suis curieux de suivre ce post.

Dernière modification par Jer!cho (Le 30/09/2006, à 22:20)

Hagar de l'Est

Re : [Résolu]Macro avec OOo2 calc !!! Besoin d'un petit coup de pouce...

Pour info, il y a le forum d'OOo avec une section consacrée aux macros, tu auras peut-être plus de réponses : http://www.forum-openoffice.org/forum/index.php.
Au fait, c'est 'pouce'.

Dernière modification par Hagar de l'Est (Le 30/09/2006, à 23:04)

nautic

Re : [Résolu]Macro avec OOo2 calc !!! Besoin d'un petit coup de pouce...

Merci...
J'ai corrigé mon poste initial 'pouce' et (2,2)...
Je vous tiens au courant dès que j'ai du mieux...

yarel

Re : [Résolu]Macro avec OOo2 calc !!! Besoin d'un petit coup de pouce...

il faut utiliser la propriété 'String' de l'objet cellule car tu récupèere un string
Modifie juste

 sstring=oCell.getValue

en

sstring=oCell.String

et c'est bon tu récupère le texte de la cellule C3 ;-)

---

vivez libre... pensez libre...
installez GNU / LINUX
yarel contrib

nautic

Re : [Résolu]Macro avec OOo2 calc !!! Besoin d'un petit coup de pouce...

Merci
Effectivement ça marche comme ça...

ça marche aussi avec

sstring=oCell.getString

Merci encore