[Risolto] Salva file con nome di una cella

[alessandro64]

Buona sera mi chiamo Alessandro,
vorrei chiedere, come posso salvare un file con il nome di una cella specifica, in una cartella specifica, nel mio caso la "D1:E1" in quanto la celle essendo unite ne formano una soltanto.
Ho provato alcuni esempi, ma non saprei proprio come fare, vorrei imparare, ma sono un incapace totale. grazie

Allego file di esempio

Codice: Seleziona tutto

Salva_con_nome
Dim  args()
Doc = Thiscomponent
Sheet = Doc.Sheets(0)
   prefix = "file:///"
   Nome = Sheet.getCellRangeByName("D1").string
   
   Filename = TARGA & ".ods"
'   print Filename
   Filename =  prefix & Filename
   if FileExists(Filename ) then 
     print "File già esistente"
     exit sub
   end if
   Doc.storeToURL(Filename, args())
'   Doc.close(true)

End Sub

Ho provato alcuni esempi, ma non saprei proprio come fare, vorrei imparare, ma sono incapace totale.grazie

[Gaetanopr]

TARGA a cosa fà riferimento??
prova così

Codice: Seleziona tutto

Sub Salva_con_nome
Dim  args()
Doc = Thiscomponent
Sheet = Doc.Sheets(0)
   Nome = Sheet.getCellRangeByName("D1").string
   Filename = "file:///C:/Users/gaeta/OneDrive/Desktop/"& Nome &".ods"
   if FileExists(Filename ) then 
     print "File già esistente"
     exit sub
   end if
   Doc.storeToURL(Filename, args())
'   Doc.close(true)

End Sub

cambia questa parte

Codice: Seleziona tutto

"file:///C:/Users/gaeta/OneDrive/Desktop/

con il tuo percorso di salvataggio

[alessandro64]

buongiorno ho modificato il percorso con questa stringa "C:/Users/sandt/Desktop/officina/" , ma praticamente, al salvataggio, solo la prima volta lo salva con il nome. la seconda volta, dopo aver riaperto il file "preventivo", cambiando il contenuto della cella "D3" ,il salvataggio avviene solo con il nome del file Preventivo, a meno che, io no lancio il comando "esegui macro" ,dal menu tendina "strumenti.
c'è sicuramente un modo per rendere ,il tutto automatico? . grazie

[alessandro64]

ho allegato ,il file di prova modificato.grazie

[Gaetanopr]

Si può fare in diversi modi, uno di questi è usare un pulsante.

[alessandro64]

ringrazio per l'aiuto che mi è stato offerto, ho risolto il problema ,con la modifica del tasto "salva" nella barra dei strumenti

[alessandro64]

grazie