[Risolto] Salva file con nome di una cella
Inviato: domenica 5 marzo 2023, 20:53
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
Ho provato alcuni esempi, ma non saprei proprio come fare, vorrei imparare, ma sono incapace totale.grazie
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