[VBA-E] Renommer la cellule
Bonjour a tous,
J'ai un gros souci et je m'arrache les cheveux:fou:
Je ne suis pas loin de la soluce mais la jen peu plus, voila mon probleme:
J'ai tout d'abord renommer mes cellules en "Test1" , "Test2" , a la place de "A300" , "A301"
et donc je fais une recherche et aprés je voudrais copié a l'interieur de la cellule d' accoté :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
| For a = 1 To 18
If UserForm1.Controls("CB" & a).Value = True Then
For Each C In Range("test1:test12")
MsgBox (C.Name)
If C = "test" & j Then
Sheets("CBTXT").Cells(a + 1, 2).Copy
Sheets("Rapport").Range(C.Offset(1, 0)).PasteSpecial
j = j + 1
End If
Next C
End If
Next a |
le probleme c'est que le msgbox me retourne "A300" et non "test1"
C'est exactement le C.name qui foire (je me souviens plus de la syntaxe :marteau: :ouin: :ouin: )
merci
