Suite...
LibreStefan wrote
> moi soucis et au niveau de resu je n'arrive pas à trouver comment le
> passer dans la feuille et les cellules !
Puisque tu fais une boucle sur le jeu d'enregistrements tu peux faire comme
je disais précédemment : ouvrir le classeur, boucler sur le rowset et
simplement
mettre à jour les lignes correspondantes. Par exemple modifier ton code en
ajoutant :
dim oClasseur as object
dim oFeuille as object
dim i as long
oClasseur = stardesktop.loadcomponentFromUrl("private:factory/scalc",
"_blank", 0, array'))
oFeuille = oClasseur.sheets.getByIndex(0)
i = 0
Do While .next
' resu = resu & .Columns.getByName("NomProduit").String _
' & " : " & .Columns.getByName("PrixUnitaire").String & chr(13)
oFeuille.getCellByPosition(0, i).string =
.Columns.getByName("NomProduit").String
oFeuille.getCellByPosition(1, i).value =
.Columns.getByName("PrixUnitaire").Value
i = i + 1
Loop
Cordialement
Pierre-Yves
--
View this message in context:
http://nabble.documentfoundation.org/Resultat-d-une-requete-pre-enregistrees-dans-Calc-tp4101992p4102006.html
Sent from the Users mailing list archive at Nabble.com.
--
Envoyez un mail à [email protected] pour savoir comment vous
désinscrire
Les archives de la liste sont disponibles à
http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne
pourront pas être supprimés
