Azione Pulsante "Chiudi e Salva"

Discussioni sull'applicazione di videoscrittura
Rispondi
ultimo57
Messaggi: 4
Iscritto il: lunedì 17 ottobre 2022, 11:50

Azione Pulsante "Chiudi e Salva"

Messaggio da ultimo57 »

Ciao a tutti.
Sono nuovo del Forum, nonostante vi legga spesso in cerca di soluzioni veloci, quindi colgo l'occasione per salutarvi.
Volevo gentilmente chiedervi: dal momento che ho creato un piccolo precompilato, se e come posso configurare il pulsante in modo tale da chiudere e salvare il contenuto compilato in una specifica destinazione.
OpenOffice 4.1.13 windows10
Avatar utente
charlie
Site Admin
Site Admin
Messaggi: 8820
Iscritto il: mercoledì 19 dicembre 2012, 10:50
Contatta:

Re: Azione Pulsante "Chiudi e Salva"

Messaggio da charlie »

Ciao e benvenuto sul forum.
Se intanto ti vuoi presentare, farai cosa gradita. Puoi farlo in questa sezione -> 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 14.4.1 Sonoma: Open Office 4.1.15 - LibreOffice 7.5.7.2
http://www.charlieopenoffice.altervista.org
Gaetanopr
Volontario
Volontario
Messaggi: 3300
Iscritto il: mercoledì 21 novembre 2012, 20:07

Re: Azione Pulsante "Chiudi e Salva"

Messaggio da Gaetanopr »

Codice: Seleziona tutto

Sub Salva_con_nome
Dim URL As String
Dim Dummy()
Dim Doc As Object
Doc = Thiscomponent
   URL =  "file:///C:/Users/Ultimo57/Desktop/prova.odt"
   If (Doc.isModified) Then
      If (Doc.hasLocation And (Not Doc.isReadOnly)) Then
          Doc.store()
      Else
          Doc.storeAsURL(URL, Dummy())
      End If
   End If

   Doc.close(true)
End Sub
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
ultimo57
Messaggi: 4
Iscritto il: lunedì 17 ottobre 2022, 11:50

Re: Azione Pulsante "Chiudi e Salva"

Messaggio da ultimo57 »

Vi prego scusatemi davvero tanto ma mi potreste dire gentilmente la procedura come fare per attivarlo? con word ricordo che mi fa associare direttamente la macro all'oggetto, qui invece devo cliccare sul pulsante poi non capisco come creare la macro e associarla.
scusatemi
OpenOffice 4.1.13 windows10
Gaetanopr
Volontario
Volontario
Messaggi: 3300
Iscritto il: mercoledì 21 novembre 2012, 20:07

Re: Azione Pulsante "Chiudi e Salva"

Messaggio da Gaetanopr »

Sul forum trovi vari esempi su come associare una macro ad un pulsante dipende da cosa ti serve, per prima cosa devi abilitare il programma all'uso delle macro andando su Strumenti > Opzioni > Sicurezza > Sicurezza delle macro, scegli tra le varie opzioni io uso l'opzione medio(la scelta dell'opzione dovrai effettuarla solo la prima volta) successivamente all'apertura del file se avrai scelto medio un messaggio ti avviserà se abilitare le macro o meno.
Il pulsante puoi inserirlo sulla pagina del tuo documento o sulla barra degli strumenti dipende come dicevo prima dalle tue esigenze.
Ad ogni modo leggi il capitolo della guida di libreoffice sull'uso delle macro.
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Rispondi