Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Somme d'une même cellules dans plusieurs feuilles

Chessnocoma

XLDnaute Junior
Bonjour à vous,

Je suis actuellement sur la création d'un fichier, et je souhaiterais réaliser une macro qui m'écrivent la somme de toutes les cellules F18 de mon classeur dans la cellule B2 de la feuille Récap.

Cela est il possible ?

Merci à vous
 

Pierrot93

XLDnaute Barbatruc
Re : Somme d'une même cellules dans plusieurs feuilles

Bonjour,

essaye peut être ainsi :
Code:
Option Explicit
Sub test()
Dim t As Double, ws As Worksheet
For Each ws In Worksheets
    If ws.Name <> "Récap" Then
        If IsNumeric(ws.Range("F18").Value) Then t = t + ws.Range("F18").Value
    End If
Next
Sheets("Récap").Range("B2").Value = t
End Sub

bonne journée
@+
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…