Discussion :

[grisan29]

bonjour a vous tous

lorsque que je lance l'impression d'un devis a 7 % ou s'il y a les 2 taux et pas à 19.6% seul, comment puis je faire pour qu'un message de demande si je veux imprimer une attestation apparaisse et si ok que l'impression se lance en 2 exemplaire en sachant que la feuille attestation se trouve dans le meme classeur
merci d'avance pour vos solutions

Pascal

[Daranc]

Tu as compris ce que tu voulais.... moi pas
pourrais tu éclaircir

[grisan29]

bonjour daranc
merci, pour essayer d'éclaircir ma demande:

le taux de tva se trouve dans une combobox de choix de tvaoubli de précision

donc quand je lance l'impression d'un devis ,si tva 7% est affiché
-je voudrais qu'un message s'affiche en meme temps me demandant si je veux imprimer 2 attestations de tva réduite
-si tva 19.6% est affiché pas d'impression
-mais les 2 tva 7%et 19.6% sont possible d'etre sur la meme feuille comment faire sinon repérer la liste sur la feuille????

voila si le nuage est passé tant mieux

Pascal

[Daranc]

bon continuons dans la précision (et la bonne humeur)
donc si j'ai bien compris
tu as une colonne de choix sur une facture ( ou devis )
ces cellules de choix sont remplies avec un taux de TVA 7% ou 19%

mettons que cette plage s' étende sur les cellules de G8 à G20 ( sans rapport avec la mondialisation)
en z1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=NB.SI(G8:G20;"=7%")

ceci permet de mettre une cellule avec le texte d'alerte en format conditionnelle

ou par une macro événementielle sur la valeur de cette cellule (>0) tu ouvre un msgbox avec bouton oui non et un traitement pour l'impression
autrement si tu as un bouton imprimer tu met le teste de la cellule dans le code du bouton

[grisan29]

bonjour daranc
pour l'instant il n'y a pas de bouton pour imprimer, le mieux que je puisse faire est de joindre un fichier exemple a ce post
de toute facon avant impression il faut que je résolve un autre problème concernant les taux de tva
donc le calcul se fait tout seul au fur et a mesure des données dans la listview, mais je voudrais également pouvoir inscrire la valeur des tva en textbox adéquat afin de pouvoir faire le calcul tva global apres et le total ensuite, car le bouton valider envoi les données de la listview sur la feuil1 qui sera plus tard la feuille facture

cordialement

Pascal

[Daranc]

Vu !
ce que je te proposes c'est d'ajouter un optionbutton
avec propriété visible à false
et de modifier la commande ajouter comme suit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub ajout_Click()
Dim t
'juste ça la dessous
If cbotva.Value = 7 Then OptionButton1.Visible = True
'après le programme reprends
With UserForm1.ListView1
    .listitems.Add , , UserForm1.TextBox2.Value

pas grand chose en fait
la valeur de l'optionbutton et donc soit à zéro soit à un ce qui te permet de récupéré un oui ou un non pour l'impression
la propriété optionbutton.visible est initialisée à False le bouton est donc caché
dés qu'une entrée TVA est validé à 7 la propriété passe à True et le reste durant tout le traitement