VBA insertion ligne

Résolu
Bonjour,

Débutant en VBA

Je recherche comment inserer une ligne dont le Row est égal à la valeur d'une cellule.

Exemple Cellule A8= 15

Row(A15:A15).select

Cellule A8=19

Row(A19:A19).select

Merci d'avance
Configuration: Windows XP / Internet Explorer 6.0

1 réponse

  1. Bonjour,

    sub x
    a= cells(8,1)
    rows(a).select
    Selection.Insert Shift:=xlDown

    end sub
    1. Merci beaucoup sa marche niquel, je suis étonné de la simplicité de la manipulation et surtt de l'avoir vu nulle part.