J'ai fait une "analyse" de ce que j'aimerais obtenir mais comme je n'y connais pas grand chose en VBA... Quelqu'un pourrait-il "traduire" ceci???
Merci d'avance
Formules
Nt= Nombre de titres détenus provient d'une requête
Nst= Nombre de strips détenus provient d'une requête
Bru= Dividende brut unitaire provient d'une requête
Txp= Taux plein constante (=25%)
Txr= Taux réduit constante (=15%)
Avu= Avantage fiscal unitaire variable calculée
Net= Dividende net total variable calculée
Avt= Avantage fiscal total variable calculée
Tot= Total à payer variable calculée
Cas où l'actionnaire est exonéré si "exonéré" = OUI alors (Nt*Bru)=Tot
Détermination du net sans tenir compte de l'avantage fiscal(Nt*Bru)-(Nt*Txp)=Net
Détermination de l'avantage fiscal unitaire (Bru*Txp)-(Bru*Txr)=Avu
Cas où il y a autant de strips que de titres si (Nst = Nt) alors (Nst * Avu)=Avt
Cas où il y a des strips en surnombre si (Nst > Nt) alors (Nt * Avu)=Avt
Cas où il y a moins de strips que de titres si (Nst < Nt) alors (Nst * Avu)=Avt
Cas où il n'y a pas de strips si (Nst = 0) alors Avt = 0
Total à payer à l'actionnaire (ou obligataire) (Net + Avt) = Tot
Partager