Bonjour,
Je rencontre un soucis avec EntireRow. J'ai une feuille excel avec 3 tableaux verticaux. Je dois insérer des lignes dans le premier de ces tableaux, mais l'insertion s'applique à toute la feuille. Je vous mets ci-dessous ma macro test reproduisant le problème.
J'ai cherché sur le net, mais on peut bel et bien affecter EntireRow à une range. Pour le moment, je ne n'avais utilisé cette commande que lors de masquage ou suppression complète, jamais dans une range qui n’était pas la feuille complète.
Merci pour vos éclaircissements.
Je rencontre un soucis avec EntireRow. J'ai une feuille excel avec 3 tableaux verticaux. Je dois insérer des lignes dans le premier de ces tableaux, mais l'insertion s'applique à toute la feuille. Je vous mets ci-dessous ma macro test reproduisant le problème.
J'ai cherché sur le net, mais on peut bel et bien affecter EntireRow à une range. Pour le moment, je ne n'avais utilisé cette commande que lors de masquage ou suppression complète, jamais dans une range qui n’était pas la feuille complète.
VB:
MShk = 332793 'valeur recherchée afin de la dupliquer
Set RiList = ActiveSheet.Columns("A:D") 'premier tableau
Retsu = RiList.Columns("A").Find(MShk, LookAt:=xlWhole).Row
RiList.Rows(Retsu).EntireRow.Copy
RiList.Rows(Retsu).EntireRow.insert Shift:=xlDown
Merci pour vos éclaircissements.