Macro Vba Excel

Version imprimable

28/12/2012, 10h56
ldusart

Macro Vba Excel

Bonjour,

Je cherche comment écrire une Macro / VBA pour Excel attachée à un bouton
qui ferait automatiquement un calcul de montant TVA comprise genre

=SOMME([@Montant]+[@[Taux TVA]]*[@Montant]/100)

qui marche parfaitement dans ma feuille Excel

Quel est la syntaxe du code Macro VBA ?

Merci d'avance

Bonjour,

Voici ce que je ferais:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Function MontantAvecTVA() As Double
 
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Worksheets("TaFeuille")   'La feuille contenant le tableau de données
 
    With WorksheetFunction
        'On supose que le tableau s'appelle "data"
        MontantAvecTVA = .Sum(ws.Range("data[Montant]").Value) + .SumProduct(ws.Range("data[Montant]").Value, ws.Range("data[Taux TVA]").Value) / 100
    End With
 
End Function
 
Sub test()
    Debug.Print MontantAvecTVA()
End Sub

Cordialement.

28/12/2012, 16h21
ldusart

Tout d'abord merci de ta réponse.

Cependant, je ne vois pas la difference que tu fais entre ma feuille qui est nommée "Feuil1" et le nom du tableau que tu nommes "data"

Qu'entend tu par "data" ? Je ne vois pas où se trouve le nom de ce tableau.

Merci d'avance
28/12/2012, 16h36
issoram

Étant donné la syntaxe de ta formule, je suppose que les colonnes ("Montant" et "Taux TVA") auxquelles tu fais référence appartiennent à un tableau de données (qui a un nom défini par toi ou par Excel par défaut). Ce tableau de données est contenu dans une feuille qui elle à un autre nom ("Feuil1" chez toi).
Un feuille n'est pas un tableau, elle peut contenir un ou plusieurs tableaux, des graphiques etc.

Pour connaitre le nom de ta table de données, positionne toi sur une des valeurs de ton tableau, tu aurass accès dans le ruban à l'onglet "outils de tableau" et à la propriété "nom de tableau". Plus de détails ici http://silkyroad.developpez.com/excel/tableau/#LIII-A