Bonjour,
(je suis débutante en VBA)
Je vous explique mon problème :
Dans la feuille 2 de excel, j'ai un tableau croisé dynamique et je souhaite rechercher les cellules de A4 à "(vide)" exclu dans la feuille graphique, dans le but de copier l'alcolémie en vis à vis des heures dans la feuille graphique.
Pour cela je veux faire une boucle
Je ne sais pas si je suis claire
Voilà mon code
Je vous remercie par avance
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 Dim taux As Integer Dim H As String Dim i As Long Dim j As Long For i = 4 To 10 H = ActiveCell.Value Cells(i, j).Offset(0, 1).Select taux = ActiveCell.Value Sheets("Graphique").Select Cells.Find(what:=H).Activate i = ActiveCell.Row j = ActiveCell.Column Cells(i, j).Offset(0, 1).Select ActiveCell.Value = taux Next i
Partager