Page 1 sur 1

changement taux TVA

MessagePublié: 09 Nov 2009 11:20
par norbu
Bonjour
je suis a l'etranger et je voudrais changer de maniere permanente le taux de TVA. comment faut- il procéder ? merci

Re: changement taux TVA

MessagePublié: 10 Nov 2009 11:48
par Factooor
Bonjour,

Il faut en 1er trouver la macro suivante. Et changer le T1 et T2

Code : Tout sélectionner   AgrandirRéduire
rem Charge la boite de dialogue pour écrire la TVA dans les celules
Sub ChargerDTVA()
Dim bibli As Object, monDialogue As Object
Dim maTVA As integer, T1, T2 As String

DialogLibraries.LoadLibrary( "FactOOor" )
bibli = DialogLibraries.GetByName("FactOOor")
monDialogue = bibli.GetByName("DTva")
Dlg = CreateUnoDialog(monDialogue)
Dlg.Model.Title = " T.V.A "

T1 = "19,60"
T2 = "5,50"

If maTVA <> 0 then
      Dlg.getControl("NumericField1").setText(maTVA)
   Else
      Dlg.getControl("NumericField1").setText(T1)
   End If      
If maTVA <> 0 then      
      Dlg.getControl("NumericField2").setText(maTVA)
   Else
      Dlg.getControl("NumericField2").setText(T2)
   
   End If
Call EcrireTVA
Dlg.Execute
Dlg.Dispose
End Sub


Ensuite, Modifier le formulaire "insereProduits" de la base de données, voire la capture d'écran.
Capture.png

Re: changement taux TVA

MessagePublié: 10 Nov 2009 18:29
par norbu
merci je vais essayer tout de suite

Re: changement taux TVA

MessagePublié: 23 Mars 2010 10:57
par Nevihta
La solution fonctionne très bien, toutefois, quand on fait des requêtes, le logiciel indique toujours les taux a 19.5 et 5.5, mais utilise les bon taux pour le calcul.