Re : concaténation VBA
Re,
alors voilà :
comme ta colonne D est vide
Sh2.Range("D65536").End(xlup).Row
vaut 1
donc il vaudrait mieux mettre
Sh2.Range("A65536").End(xlup).Row
par exemple
ensuite tu as fait une faute de frappe, tu as tapé XIUP à la place de XLUP, c'est pour ça que ça plantait
enfin tu devrais mettre
Cellule.value = Sh2.cells(Cellule.row,1).value & Sh2.cells(Cellule.row,2).value & Sh2.cells(Cellule.row,3).value
comme je te l'avais proposé plus haut.
Cells attend un numéro de ligne et un numéro de colonne, tu ne peux pas mettre A1, B1, C1 dedans.
Si tu préfères travailler en A, B, C, tu peux également faire
Cellule.value = Sh2.range("A" & Cellule.row).value & Sh2.range("B" & Cellule.row).value & Sh2.range("C" & Cellule.row).value