Fonction "=" mais en VBA

Bonjour à toutes et à tous,

Je cherche le moyen de retranscrire le contenant des cellules de B2 à B6 de la feuille 1 sur la feuille 2.

Je sais que l'on peut le faire en mettant un "=" par rapport à la cellule concerné, mais mois je veux pouvoir modifier sur la feuille 2 les cellules (B2 à B6) sans casser la fonction.

Merci bien les ami(e)s

Bonjour,

un exemple avec les fonction INDEX et EQUIV

Bonjour,

La proposition d'i20100 avec les données sous forme de tableau structuré.

Depuis Excel 2007 (mais surtout Exel 2010), il est impératif de travailler avec !...

Cdlt.

Merci pour vos retour, mais j'aurais aimé via un bouton retranscrire les informations.

Car une fois les informations retranscrites, je peux les modifier sans problème de casser la fonction calcul.

Je parlais plutôt d'une fonction comme un copier / coller (valeur)

re,

à tester,

Sub test()
Range("B2:B6").Formula = "=INDEX(Feuil1!B:B,MATCH(A2,Feuil1!A:A,0))"
Range("B2:B6") = Range("B2:B6").Value
End Sub

un autre possibilité,

Sub test2()
Dim sh1 As Worksheet, sh2 As Worksheet, rw As Long, i As Long
Set sh1 = Sheets("Feuil1")
Set sh2 = Sheets("Feuil2")
rw = sh2.Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To rw
  sh2.Cells(i, 2) = Application.Index(sh1.Range("B:B"), Application.Match(sh2.Cells(i, 1), sh1.Range("A:A"), 0))
Next i
End Sub

C'est bon, merci mais j'ai trouvé

Sheets("Feuille1").Range("G5:G21").Value =  Sheets("Feuille2").Range("R9:R25").Value