Fai la tua domanda
0

Riempimento campo form da macro

chiesto il 2019-05-27 16:24:03 +0200

Ciao a tutti,

ho un problema in un form creato in libreoffice Base a cui ho associato alcune macro. La macro riportata qua sotto serve per leggere il valore presente in un campo (frm1.GetByName("fmtcontrovalore")), moltiplicarlo per -1 e inserire il risultato in un altro campo (importo.Text = controvalore) di un differente subform. Entrambi i campi sono di tipo "Formatted field".

Quando premo il bottone a cui è associata la macro vedo apparire il valore corretto nel campo di destinazione.

Questa subform a sua volta deve essere compilata nei suoi altri campi per inserire un record nel database. Quando inserisco il record però il campo riempito dalla macro riporta il valore "0,00", come se fosse vuoi.

Qualcuno ha qualche suggerimento?

Grazie in anticipo

Sub compila_importo_con_totale
Dim frm, frm1, frm2
frm=ThisComponent.Drawpage.Forms.getByName("MainForm")
frm1=frm.getByName("sfrm_fattura")
controvalore = -1 * frm1.GetByName("fmtcontrovalore").getCurrentValue()

frm2 = frm1.getByName("fmr_inserimento_timbro")
importo = 

frm2.getByName("frm_importo")
importo.Text = controvalore
End Sub
modifica retag flag offensive close merge delete

1 Answer

0

risposto il 2019-06-03 03:54:30 +0200

Immagine gravatar per Ratslinger

rovare -

Importo.commit ()

prima di End Sub

modifica flag offensive delete link more
Login/Signup to Answer

Question Tools

1 follower

Stats

Chieste: 2019-05-27 16:24:03 +0200

Seen: 16 times

Last updated: Jun 03