Debian-facile

le_lutin

Membre

Lieu : Alsace

Distrib. : Debian 12

Noyau : Linux 6.1

(G)UI : Gnome - IceWM

Inscription : 01-11-2019

[RÉSOLU] LibreOffice Calc : renommer des feuilles automatiquement

Bonjour,
J'ai un document Libreoffice Calc contenant 150 feuilles, et je souhaiterais les renommer automatiquement de " 1" à "150" tout en gardant leur ordre.
Avez-vous une méthode pour cela ?
merci.
Belle journée.

Dernière modification par le_lutin (05-05-2023 12:29:17)

Anonyme

Invité

Re : [RÉSOLU] LibreOffice Calc : renommer des feuilles automatiquement

Bonjour,
Une méthode, oui : écrire une macro.
La solution, non.

le_lutin

Membre

Lieu : Alsace

Distrib. : Debian 12

Noyau : Linux 6.1

(G)UI : Gnome - IceWM

Inscription : 01-11-2019

Re : [RÉSOLU] LibreOffice Calc : renommer des feuilles automatiquement

ok, je vais me pencher là dessus.
Belle soirée.

le_lutin

Membre

Lieu : Alsace

Distrib. : Debian 12

Noyau : Linux 6.1

(G)UI : Gnome - IceWM

Inscription : 01-11-2019

Re : [RÉSOLU] LibreOffice Calc : renommer des feuilles automatiquement

Bonjour,
voici la macro que j'ai utilisée

Sub RenommerToutesLesFeuilles()

Dim oDoc As Object
Dim oSheet As Object

oDoc = ThisComponent

For i = 0 To ThisComponent.Sheets.Count - 1
    oSheet = ThisComponent.Sheets(i)
    oSheet.Name = CStr(i +1)
Next i

End Sub

[RÉSOLU]