Pagina 1 di 1

[Risolto] Creazione automatica fogli da elenco

Inviato: mercoledì 6 marzo 2024, 17:10
da Giu_Pe
Salve a tutti, sono semi-analfabeta su Calc.
Ho creato un file con una colonna dedicata alle Aziende ed avrei la necessità che per ogni azienda inserita, venga in automatico creato un foglio di lavoro. è possibile fare una cosa del genere su Calc? Allego file esempio

Grazie a tutti

Re: Creazione automatica fogli da elenco

Inviato: mercoledì 6 marzo 2024, 17:15
da charlie
Ciao e benvenuto/a sul forum.
Se intanto ti vuoi presentare, farai cosa gradita. Puoi farlo in questa sezione -> https://forum.openoffice.org/it/forum/v ... m.php?f=16

L’utente che apre un quesito si impegna: In caso di inosservanza saremo costretti ad azioni di “richiamo”, sospensione o chiusura del profilo utente.
Buon proseguimento.

Re: Creazione automatica fogli da elenco

Inviato: giovedì 7 marzo 2024, 10:38
da patel
Ciao, occorre una macro come questa
Sub CreaFogli
Doc= ThisComponent
nfogli = 2 ' da modificare
for r = 1 to nfogli
nomefoglio = Doc.Sheets(0).GetCellbyPosition( 1, r ).string
If not Doc.Sheets.hasbyName(nomefoglio) Then Doc.Sheets.insertNewByName(nomefoglio,Doc.Sheets.Count)
next
End Sub

Re: Creazione automatica fogli da elenco

Inviato: giovedì 7 marzo 2024, 10:38
da patel
Ciao, occorre una macro come questa

Codice: Seleziona tutto

Sub CreaFogli
Doc= ThisComponent
nfogli = 2 ' da modificare
for r = 1 to nfogli
  nomefoglio = Doc.Sheets(0).GetCellbyPosition( 1, r ).string
  If not Doc.Sheets.hasbyName(nomefoglio) Then Doc.Sheets.insertNewByName(nomefoglio,Doc.Sheets.Count)
next
End Sub