selection.insert ...

[B52]

Bonsoir le forum !

Je saisie des données grace à un userform que j'ouvre avec une commande de type :

Sub Acceuil_Bouton2_QuandClic()
Worksheets("feuil1").Select
Rows(3).Select
Selection.Insert
userform1.show
End Sub

j'ai besoin de récuperer la valeur de la cellule A3 de la feuil1 dans une cellule de la feuil2.
J'ai donc mis dans la cellule de la feuil2 une formule du type : = feuil1!$a$3
Mais lorsque je fais une nouvelle saisie ma formule se transforme en :=feuil1!$a$4 (ce qui me semble logique...)

Comment puis-je "forcer" cette formule à garder la valeur de la cellule A3 malgrés mes différentes saisies.

Par avance merci

Stéphane

 

[Yeahou]

Bonjour B52, le forum

l'exemple ci joint te mettra la bonne formule dans la cellule A1 de la feuille 2

Cordialement, A+

Sub Acceuil_Bouton2_QuandClic()
Worksheets("feuil1").Rows(3).Insert
Worksheets("feuil2").Range("A1").FormulaR1C1 = "=Feuil1!R3C1"
userform1.show
End Sub

 

[B52]

Bonsoir Yeahou !

Merci beaucoup pour ton coup de main, ça marche parfaitement !
au plaisir de te croiser sur le forum !

encore merci ! @+

Stéphane