[Catégorie modifiée VB6 -- VBA] Boucle en VBA

Question

Bonjour,

Merci de me dire comment faire une boucle qui fera la somme de deux  cellules ou plus pour avoir une somme déja sélectionnée dans une autre cellule.

Les cellules à additionner sont sur la même colonne.

cs_Jack · Answer

Salut

Plusieurs solutions :
-1- Faire une boucle, comme tu le souhaites :
Exemple de For-Next qui énumère le contenu des cellules de la colonne B
    Dim maCellule As Range
    For Each maCellule In Range("B:B")
        MsgBox "Valeur de la cellule " & maCellule.Address & _
               " : " & maCellule.Value & vbCrLf & _
               "et de la cellule à sa droite : " & macellule.Offset(0, 1).Value               
    NextJe te laisse faire les additions.

-2- Utiliser les fonctions Excel :
Enregistre une macro pendant que tu insères une fonction SOMME dans ta feuille, puis regarde le code généré.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

cs_Jack · Answer

PS : Ajoute cette ligne avant la MsgBox pour sortir dès qu'un cellule vide est rencontrée :
        If IsEmpty(maCellule) Then Exit For

mostafa59 · Answer

Bonjour,

Merci pour ta réponse.

Je refais ma boucle et je te tiendrai au courant.

Bon courage pour ce que tu fais.

mostafa59 · Answer

Je souhaiterai écrire un programme en vba pour une feuille excel. 

sur la colonne A j'ai des montants en euros. 

Je dois trouver la combinaison (sommation de deux ou plusieures cellules ) sur cette colonne pour avoir une somme déja donné.par exemple 300 dans la cellule F10 que je dois sélectionner. 

J'ai écris le code suivant mais sans succés. 

Sub test() 

Dim client As Integer 
Dim somme As Integer 

client = Range("A3") 


somme = Range("E9") 


If Range("E9").Formula = "SUM(A3:A16)" Then MsgBox "bonjour" 


End Sub 

Merci par avance de votre aide.

cs_Jack · Answer

Nouvelle question --> Nouveau Topic, ne mélangeons pas tout

[Catégorie modifiée VB6 --> VBA] Boucle en VBA

5 réponses

Votre réponse

Discussions similaires