Ecrire le contenu de 2 cellules dans une seule cellule

Bonjour à tous,

Après de nombreuses recherches la semaine dernière, je ne parviens toujours pas à "concaténer" le contenu de 2 cellules dans une seule.

Les cellules utilisées sont d'ailleurs variables.

Voici mon bout de code :

Sub HELP()

Dim Reference As String
Dim Valeurtheorique As String
Range("B2:AAA10000").NumberFormat = "0,00" 'cette ligne est elle utile pour la suite ?

Range("H7").Select

For p = 1 To NbEchantillons

ref = NbUtilisateur + 2
Reference = Range(2, ref).Value
Valeurtheorique = Range(3, ref).Value
ActiveCell.Value = Reference & "_" & Valeurtheorique

ActiveCell.Offset(1, 0).Select

Next p

End Sub

Je pense qu'il s'agi d'une erreur de syntaxe, mais je n'arrive pas à la trouver.

Merci infiniment d'avance à ceux ou celles qui pourraient m'aider.

Bonne journée à tous !

Bonjour,

Ta variable NbEchantillons sort d'où ? Est-ce qu'elle a une valeur ?

Range(2, ref).Value

la syntaxe ci-dessus est incorrecte.

Tu peux essayer :

cells(2, ref).Value

Bonjour,

En effet ma variable a une valeur définie précédemment.

Ca a marché en utilisant Cells. Merci beaucoup :)