Insérer ligne sous ligne du dessus et en incrémentant indice

Bonjour à tous,

j'aimerais créer une macro permettant, en cliquant sur une cellule de la ligne i, de dupliquer celle ligne i et l'insérer en dessous.

- la ligne i doit se retrouver barrée et la case en cellule A vidée.

- la ligne i+1 doit voir son indice augmenté de +1 (en alphabétique), et la case date sera vidée et saisi manuellement par l'utilisateur.il faut ajouter la valeur x dans la cellule A.

voir ci-joint ce que j'ai entrepris, mais je n'arrive déjà pas à insérer la ligne en dessous...ça l'insère au dessus.

merci à tous!

macro
8monter-indice.zip (99.62 Ko)

Bonjour,

Ci-joint ton fichier test ...

En espèrant que cela t'aide

Merci pour ton retour, par contre cela ne recopie pas les cases B, C et E, comment faire cela?

bonne journée

Bonjour,

Ci-joint ta version 2 ...

En espèrant que cela réponde à ton attente

merci JAMES007.

Quelle syntaxe dois-je utiliser si je souhaite effacer les cellules de la plage F à AZ + cellule A ?

Range("F" & x & ":AZ" & x).ClearContents, comment introduire la cellule A dans cette syntaxe? (ligne x)

puis quelle syntaxe dois-je utiliser pour ajouter la valeur"x" dans la colonne A lors d'une montée d'indice (ligne x+1)?

merci pour tout

Bonjour,

Content que ta macro fonctionne ...

Merci pour tes remerciements

Concernant tes deux dernières questions :

1.

Range("A" & x, "F" & x & ":AZ" & x).ClearContents

2.

Cells(x + 1) = "x"

si j'ai bien compris ...

malheureusement j'avais testé la syntaxe 1 que tu me proposes mais cela ne fonctionne pas:

Range("A" & x, "F" & x & ":AZ" & x).ClearContents

ça efface tout

ok pour le x dans case "A"

et merci pour la formation très utile!

Re,

Allons au plus simple pour effacer le contenu des cellules ...

Range("A" & x).ClearContents
Range("F" & x & ":AZ" & x).ClearContents
Rechercher des sujets similaires à "inserer ligne dessus incrementant indice"