Pannello di Controllo Moderatore ]

[Risolto] Salvataggio con nome preimpostato a data

Discussioni sull'applicazione di videoscrittura

[Risolto] Salvataggio con nome preimpostato a data

Messaggioda gabgab » venerdì 19 febbraio 2021, 17:17

Salve a tutti, chiedo aiuto:

Ho windows 10 e il mio salvataggio di file è il seguente:

aammgg-hhmm.nomefile.osd (dove aammgg è la data partendo dall'anno a 2 cifre 2 per mese 2 giorno ora e minuti)
per esempio: 210219-1357.prova.odt

E' possibile far comparire in modo automatico la stringa della data, già composta, quando si fa salva con nome? E non il solito "Senza nome.odt" ?
Ringrazio tanto per l'aiuto
Gabriele
Ultima modifica di gabgab il mercoledì 24 febbraio 2021, 9:24, modificato 4 volte in totale.
win 10 OpenOffice 4.1.3
gabgab
 
Messaggi: 2
Iscritto il: lunedì 5 marzo 2018, 13:33

Re: Salvataggio con nome preimpostato a data

Messaggioda charlie » venerdì 19 febbraio 2021, 17:21

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/viewforum.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.
charlie
macOS 10.12 Sierra: Open Office 4.1.9 - LibreOffice 6.4.6.2
http://www.charlieopenoffice.altervista.org
Avatar utente
charlie
Site Admin
Site Admin
 
Messaggi: 7294
Iscritto il: mercoledì 19 dicembre 2012, 10:50

Re: Salvataggio con nome preimpostato a data

Messaggioda lucky63 » sabato 20 febbraio 2021, 21:14

.
Una possibile soluzione alternativa.
Inserire apposita macro nelle macro personali che simuli tue esigenze.
Aggiungere un “Pulsante/Sigla” alla barra strumenti “Standard” di Writer che richiami la macro.

01.png

Ad esigenza cliccare su quella nuova voce per attivare la macro.
La macro apre una InputBox ove inserire il solo nome.

02.png

quando confermato lo rimodula anteponendovi DataOraGiorno-OreMinuti. come da esigenza rappresentata.
Un avviso finale segnala l'avvenuto salvataggio.

03.png

Codice: Seleziona tutto   Espandi visualeStringi visuale
Sub SalvaComeAAMMGGHHMM
Dim Dummy()
Doc = ThisComponent
Rem Acquisisci il nome file cui aggiungere il suffisso iniziale DATA e ORA nel formato AAMMGG-HHMM.
NomeFile = InputBox ("Inserire il NOME di salvataggio al quale dovrà essere anteposta" & CHR$(10) & "DATA e ORA nel formato AAMMGG-hhmm." , "ATTENZIONE:")
Rem Se quanto acquisito è una stringa nulla allora esci
If NomeFile = "" Then Exit sub

Rem Anno AA
AA = Right(Year(Now()),2) 'Nel caso AA sia <10 verrà rappresentato automaticamente come "0A"
Rem Mese MM
MM = Month(Now())
If Len(MM) <2 Then
MM = "0" & CStr(MM)
End if
Rem Giorno GG
GG = Day(Now())
If Len(GG) <2 Then
GG = "0" & CStr(GG)
End if
Rem Ore HH
HH = Hour(Now())
If HH = 0 Then
HH = "00"
End If
If Len(HH) <2 Then
HH = "0" & CStr(HH)
End if
Rem Minuti
Minuti = Minute(Now())
If Minuti = 0 Then
Minuti = "00"
End if
If Len(Minuti) <2 Then
Minuti = "0" & CStr(Minuti)
End if
GruppoDataOra = AA & MM & GG & "-" & HH & Minuti & "."
Rem Salvataggio (adeguare percorso in base al proprio sistema operativo)
PercorsoSalvataggio = "file:///home/NomeUtente/Scrivania/" ' esempio linux
'PercorsoSalvataggio = "file:///C:/Percorso/Completo/di/Salvataggio/" 'Esempio Windows (la barra è / come si usa per Linux)
Doc.StoreAsUrl(PercorsoSalvataggio & GruppoDataOra & NomeFile & ".odt" , Dummy() )
Rem Avviso di fine operazione
MsgBox ("Salvataggio eseguito con nome:" & Chr$(10) & GruppoDataOra & NomeFile & ".odt" , 0 , "AVVVISO")
End sub
Avatar utente
lucky63
Volontario assiduo
Volontario assiduo
 
Messaggi: 2440
Iscritto il: martedì 18 maggio 2010, 16:01

Re: Salvataggio con nome preimpostato a data

Messaggioda lucky63 » martedì 23 febbraio 2021, 21:16

.
Correggi l'inserimento del [Risolto].
... hai dimenticato il punto 3 ...

Vedi questo link.
.
Avatar utente
lucky63
Volontario assiduo
Volontario assiduo
 
Messaggi: 2440
Iscritto il: martedì 18 maggio 2010, 16:01


Torna a Writer

Chi c’è in linea

Visitano il forum: Nessuno e 9 ospiti