Macro casella di controllo

4 risposte [Ultimo post]
biagiodellabella
Offline
Last seen: 2 anni 8 settimane fa
Titolo:
Iscritto: 28 Mar 2014
Messaggi: 5
Salve, ho un problema nella creazione di una macro. Ho una casella di controllo “Richiesta nuovo pc” vorrei che se non è spuntata si abiliti e visualizzi un capo di testo “pc da abilitare”, sono un neofita e vorrei un aiuto.grazie a tutti
domike
Offline
Last seen: 10 settimane 2 giorni fa
Titolo: ★★★★★
Iscritto: 4 Mar 2014
Messaggi: 109
Crea una macro con questo
Crea una macro con questo codice

Sub Evento(oEv)
  Dim oForm : oForm = oEv.Source.Model.Parent
  Dim oCheckBox1 : oCheckBox1 = oForm.getByName("CheckBox1")
  Dim oTextBox1 : oTextBox1 = oForm.getByName("TextBox1")

  oTextBox1.Enabled = oCheckBox1.State
End Sub

Imposta la proprieta’ Abilitato del campo di testo al valore Falso (fai clic destro sul controllo, clicca su “Campo di controllo” e apri la scheda Generale).

Assegna la macro di sopra all’evento “Stato modificato” della casella di controllo, in questo modo: fai clic destro sul controllo, clicca su “Campo di controllo” e apri la scheda Eventi, clicca sui puntini accanto a “Stato modificato”, seleziona la macro e dai Ok. La macro sara’ eseguita ogni volta che la casella e’ spuntata o svuotata.

Nella macro sostituisci rispettivamente “CheckBox1” e “TextBox1” con il nome della casella di controllo e del campo di testo, come appaiono nella scheda Generale.

Riferimenti
LO v3.4 Basic Programmers Guide (elenca anche i campi dei controlli accessibili da macro)
Altri documenti sulle macro e sulle API di LibreOffice e di UNO

Se il problema e’ risolto, aggiungi [RISOLTO] al titolo del primo post, grazie.

Un file di esempio vale piu’ di mille parole e screenshot. Ricordate di aggiungere [RISOLTO]
biagiodellabella
Offline
Last seen: 2 anni 8 settimane fa
Titolo:
Iscritto: 28 Mar 2014
Messaggi: 5
errore proprietà o metodo
Grazie prima di tutto per l’interessamento. non riesco a mettere abilitato al valore falso al campo testo, attraverso le proprietà posso solo mettere abilitato, si o no! e poi la macro mi da l’errore….errore di runtime basic….Proprietà o metodo non trovate:State. Infinite grazie per l’aiuto.
domike
Offline
Last seen: 10 settimane 2 giorni fa
Titolo: ★★★★★
Iscritto: 4 Mar 2014
Messaggi: 109
Metti il valore no. Per
Metti il valore no.

Per l’errore della macro, non so come aiutarti, sul mio computer funziona. Quale sistema operativo e quale versione di LibreOffice usi? Quale programma (Writer, Base, Calc)?

Un file di esempio vale piu’ di mille parole e screenshot. Ricordate di aggiungere [RISOLTO]
biagiodellabella
Offline
Last seen: 2 anni 8 settimane fa
Titolo:
Iscritto: 28 Mar 2014
Messaggi: 5
aiutoooo
non ho risolto,mi da sempre lo stesso errore. uso libreoffice 3.5 e sto facendo un formulario con writ. la check box l’ho chiamata richiestanuovopc, la casella di testo txtpostazione, a questo punto la macro l’ho scritta così: Sub Evento(oEv) Dim oForm : oForm = oEv.Source.Model.Parent Dim orichiestanuovopc : orichiestanuovopc = oForm.getByName(“richiestanuovopc”) Dim otxtpostazione : otxtpostazione = oForm.getByName(“txtpostazione”) otxtpostazione.Enabled = orichiestanuovopc.State End Sub

mi da l’errore runtime basic.Proprietà o metodo non trovati:state

Opzioni visualizzazione commenti

Seleziona il tuo modo preferito per visualizzare i commenti e premi "Salva impostazioni" per attivare i cambiamenti.