Bonjour stefane
penses à utiliser la liste [email protected]
ecrit tres rapidement, je te propose le bout de code en fin de mail
Bon courage
laurent
'-----------------
Sub Main
feuille = thisComponent.sheets(0)
for ligne = 1 to 3
chaine = feuille.getCellrangeByName("A"+cstr(ligne)).string
decoupe = split(chaine,";")
for col = 0 to ubound(decoupe)
lettre = chr(asc("A") + col)
cell = feuille.getCellrangeByName(lettre+cstr(ligne))
cell.string = decoupe(col)
next col
next ligne
End Sub
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
