synthaxe de "range"

[aurel_pbl]

Bonjour à tous, de la même manière que dans cette discussion, VB me refuse cette syntaxe :

Code :

Worksheets("market control").Paste Destination:=Worksheets("market control").Range(Table_Market(j, 3) & Table_Market(i, 2))

=> j'ai enregistré ces 2 tableaux comme "string"

par avance merci...

[gFZT82]

Bonjour,

A priori, il s'agit plus d'un problème de contenu que de syntaxe.

Pour exemple, le code suivant fonctionne correctement

Code :

1
2
3
4
5
6
7
Sub Test()
Dim Table_Market(1 To 2) As String
    Table_Market(1) = "A"
    Table_Market(2) = "10"
    Worksheets("market control").Range("A1").Copy
    Worksheets("market control").Paste Destination:=Worksheets("market control").Range(Table_Market(1) & Table_Market(2))
End Sub

Vérifies le contenu de Table_Market(j, 3) et de Table_Market(i, 2))

Cordialement.