Bonsoir,
Arnaud POUSSIER wrote:
Subject: Re: [prog] Vider le contenu de certaines cellules
Re Bonjour
Je voudrais savoir s'il est possible via une macro de vider le contenu
de certaines cellules dans un document calc.
Mon soucis vient du fait que ces cellules sont disséminées un peu
partout dans mon document.
je en sais pas si celà repond à ta question
laCellule = laFeuille.getCellRangeByName("E20")
laCellule.string = ""
Merci Laurent pour ces infos,
aprés test il s'avére que ça marche pour une seule cellule à la fois, je
suis obligé de dupliqué les deux lignes qui tu m'indiques autant de fois
que j'ai de cellule à éffacer.
Laurent n'a donné qu'un exemple, mais n'a pas décliné toutes ses
possibilités ;)
J'ai tenter de mettre plusieurs cellules (non contigües) en même temps
mais cela ne marche pas.
Là ça ne va pas ! Il ne me semble pas que ce soit possible.
Bonne fin de journée
Arnaud
Voici, un autre type de traitement
Sub EffacerContenuCellules()
Dim oDoc As Object, oSheets As Object, oSheet As Object
Dim oCellRange As Object
oDocument = ThisComponent 'Le classeur
oSheets = oDocument.Sheets 'La collection de feuilles
oSheet = oSheets.getByIndex(0) 'La "Feuille1"
oCellRange = oSheet.getCellRangeByName("H1:I4") 'La plage à gérer
oCellRange.clearContents(1) '( nContentFlags as long )
'http://api.openoffice.org/docs/common/ref/com/sun/star/sheet/XSheetOperation.html#clearContents
'http://api.openoffice.org/docs/common/ref/com/sun/star/sheet/CellFlags.html
'Valeurs de CellFlags
'VALUE = 1
'DATETIME = 2
'STRING = 4
'ANNOTATION = 8
'FORMULA = 16
'HARDATTR = 32
'STYLES = 64
'OBJECTS = 128
'EDITATTR = 256
'FORMATTED = 512
End Sub
Remarque : La plage "H1:I4" pourrait être 'programmée' de différentes
façons ...