Bonjour,
Dans un fichier Excel, j'ai une feuille "heures imputees" dans laquelle j'ai un tableau croisé dynamique avec 6 colonnes :

mois/technicien client/affaire/chapitre/heures.

Je voudrais faire le total des heures par affaire en fonction des techniciens et des chapitres (catégorie de prestation).

1er groupe de techniciens : total pour XXXX et YYYY => BE ( partie électrique).
2eme groupe de techniciens : total pour le reste des techniciens => SOFT (programmation d'automates).

Exemple final :
heures
affaire Chapitre BE SOFT

XX.XX.XXXX A02 54 123

voici mon nouveau code actuel :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Option Explicit
 
Dim N°AFFAIRE As String
 
Dim chapitre As String
Dim nom_technicien As String
Dim HEURES As Integer
 
 
 
Sub Remplir_Bilan()
 
' Définition des variables générales
    Dim A As Integer
 
HEURES = 0
 chapitre = Worksheets("Heures Imputees").Range("B" & A).Value
 nom_technicien = Worksheets("Heures Imputees").Range("E" & A).Value
'Rechercher les heures Imputées sur N°AFFAIRE & CHAPITRE
Worksheets("Heures Imputees").Activate
    For A = 2 To 2600
 
        Worksheets("Heures Imputees").Activate
        If (Worksheets("Heures Imputees").Range("d" & A).Value = N°AFFAIRE) And chapitre = "A02" And nom_technicien = "CHESI Christophe" Or "VINCENT Jean-Claude" Then
            HEURES = Worksheets("Heures Imputees").Cells(A, 8).Value + HEURES
            Else
            HEURES = Worksheets("Heures Imputees").Cells(A, 7).Value + HEURES
        End If
    Next A
 
 
 
End Sub
Merci de bien vouloir m'aider, je débute en VBA et j'ai beau chercher partout sur le Net, je n'y arrive pas.