importer une ligne d'une feuille vers feuille active

[stephaneJ]

Bonjour,

je souhaite creer un bouton me permettant d IMPORTER une ligne se trouvant dans un onglet "MACRO" ligne 2, vers la feuille active ( par exemple feuille 4).
MAIS cette ligne doit se positionner AVANT le texte "zz" de la colonne A feuille 4 dont l'emplacement n est jamais identique.


merci d avance

stephaneJ

 

[Pierrot93]

Re : importer une ligne d'une feuille vers feuille active

Bonjour,

peut être qu'un tout petit fichier avec modèle de donnée et résultat attendu nous aiderait à t'aider....

bonne journée
@+

 

[Pierrot93]

Re : importer une ligne d'une feuille vers feuille active

Re,

A noter tout de même, l'enregistreur de macro pourra te donner le code, sans doute à optimiser par la suite...

 

[stephaneJ]

Re : importer une ligne d'une feuille vers feuille active

merci d avance pour votre aide

ci joint fichier

@+

 

[Pierrot93]

Re : importer une ligne d'une feuille vers feuille active

Re,

essaye ceci :

Option Explicit
Sub test()
Sheets("MACRO").Rows("2:2").Copy
Sheets("Feuil4").Rows("12:12").Insert Shift:=xlDown
End Sub

 

[stephaneJ]

Re : importer une ligne d'une feuille vers feuille active

merci

cela fonctionne tres bien

merci

PS: ou dois je cliquer pour pour dire que cette discussion est resolu ( pas trouver le bouton resolu !!)

stephanej

 

[stephaneJ]

Re : importer une ligne d'une feuille vers feuille active

pierrot93,

je reviens sur la macro,

la fonction m insere la ligne toujours en ligne 12, hors j aurais souhaité :

avant la cellule ou je noterais "zz", n importe ou dans la colonne A

stephanej

 

[Pierrot93]

Re : importer une ligne d'une feuille vers feuille active

Re,

modifie comme suit :

Sub test()
Dim x As Range
Set x = Sheets("Feuil4").Columns(1).Find("zz", , xlValues, xlWhole, , , False)
If x Is Nothing Then Exit Sub
Sheets("MACRO").Rows("2:2").Copy
Sheets("Feuil4").Rows(x.Row).Insert Shift:=xlDown
End Sub

bon après midi
@+

 

[stephaneJ]

Re : importer une ligne d'une feuille vers feuille active

merci

"n ayant pas trouver en bas de la page le RESOLU a cliquer je le note par l intitulé"

stephanej

 

[Pierrot93]

Re : importer une ligne d'une feuille vers feuille active

Re,

merci
"n ayant pas trouver en bas de la page le RESOLU a cliquer je le note par l intitulé"
stephanej

il n'y en a pas, tu le dis et c'est très bien ainsi...

bon après midi
@+