Discussion :

[SOTUMA]

bonjour tout le monde,

j'ai deux variables de type range R1 et R2 chacune contient une colonne je souhaite concaténer les deux ranges dans un range R3
est ce possible et comment

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Set R1 = Range(Cells(2, "A"), Cells(10, "A"))
Set R2 = Range(Cells(2, "C"), Cells(10, "C"))
R3=

sinon j'ai pense au tableau mais le problème comment affecter un tableau dans une variable de type range R3
merci d'avance pour votre aide

[mercatog]

je souhaite concaténer les deux ranges dans un range R3

Bonjour

Pour plus de précision, que veux tu dire par concaténer. Est ce que concaténer chaque élément de R1 et R2 et les placer en R3?

[SOTUMA]

Bonjour

Pour plus de précision, que veux tu dire par concaténer. Est ce que concaténer chaque élément de R1 et R2 et les placer en R3?

merci pour l'aide
effectivement
cad si jai A dans R1 et B dans R2 je veux avoir AB dans R3

[mercatog]

Bonjour

En passant par un tableau intermediaire

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
Sub Macro2()
Dim R1 As Range, R2 As Range, R3 As Range
Dim N As Long, i As Long
Dim Tb() As String
 
With Feuil1
    Set R1 = .Range(.Cells(2, "A"), .Cells(10, "A"))
    Set R2 = .Range(.Cells(2, "C"), .Cells(10, "C"))
 
    N = R1.Rows.Count
    ReDim Tb(1 To N, 1 To 2)
    For i = 1 To N
        Tb(i, 1) = R1(i) & R2(i)
    Next i
 
    .Range("G2").Resize(N) = Tb
End With
End Sub

Sinon directement par formule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub macro3()
 
With Feuil1.Range("G2").Resize(9)
    .Formula = "=A2&C2"
    .Value = .Value
End With

[SOTUMA]

merci pour cette réponse le problème la c'est que je n'ai rien dans le R3 par contre la concaténation ce fait dans la colonne G ce n'est pas ce que je cherche je veux concaténer tous les valeurs de R1 avec R2 directement dans R3 sans passer par une colonne de la feuille puis de la colonne vers R3

[mercatog]

R3 ne peut être un range abstrait.

Par contre Tb contient tes éléments