Bonjour Laurent, 

Alors, oui je suis sur de mes champs.

REM Adesso - nous allons réaliser les formules
REM reposition sur st_li
jeCherche = maFeuille.createSearchDescriptor
with jeCherche 
        .SearchString = "st_li"
        .searchWords = false
end with
trouv = maFeuille.findAll(jeCherche)
monDocument.CurrentController.Select(trouv(0))
maCellule = monDocument.currentSelection

print "D"+cstr(maCellule.CellAddress.Row+1)
adresseDebut = "D"+cstr(maCellule.CellAddress.Row+1)
REM print 
maFeuille.getCellrangeByName("D"+cstr(maCellule.CellAddress.Row+1)).string
REM print 
maFeuille.getCellByPosition(maxcol-2,maCellule.CellAddress.Row).string

maCellule = 
maFeuille.getCellByPosition(maxcol-1,maCellule.CellAddress.Row)
REM print maCellule.String

adresseFin=adresseString(monDocument,maCellule.CellAddress) 
print adresseFin


maCellule = maFeuille.getCellByPosition(maxcol,maCellule.CellAddress.Row)
REM print maCellule.String

maCellule.Formula = "=SOMME("+adresseDebut+":"+adresseFin+")"

-----------------------------------
Stéphane PURNELLE                         Admin. Systèmes et Réseaux 
Service Informatique       Corman S.A.           Tel : 00 32 (0)87/342467

Laurent Godard <[email protected]> wrote on 25/02/2010 12:31:13:

> Laurent Godard <[email protected]> 
> 25/02/2010 12:31
> 
> Veuillez répondre à
> [email protected]
> 
> A
> 
> [email protected]
> 
> cc
> 
> Objet
> 
> Re: [prog] Problème génération d'une formule en OOo Basic
> 
> Bonjour stefane
> 
> > J'ai dans mon code la ligne suivante : 
> > 
> > maCellule.Formula = "=SOMME("+adresseDebut+":"+adresseFin+")"
> > 
> > Seulement, elle ne marche pas car elle devient =somme(D3:AS3) dans la 
> > cellule
> 
> difficile de dire sans le code et l'exemple sous les yeux
> es tu sur de la valeur et du calcul de adresseDebut et adresseFin ?
> 
> Laurent
> 
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: [email protected]
> For additional commands, e-mail: [email protected]
> 

Répondre à