Copier coller spécial

[Denis]

Salut les Cracks en VB

Petit prob avec copier coller sur des cellules non discontinue
A savoir copier cellule C7;D7;E7;H7;J7;K7;M7 = Plage" SAISIE1" sur Feuil1
Et coller dans cellule B9;H9;M9;O9;Q9;Y9;AF9 = Plage"SAISIE2 sur Feuil2
Avec décalage d'une ligne à chaque nouvelle saisie sur Feuil2
Et comment supprimer la dernière ligne saisie en cas d'erreur

Merci d'avance

Et vive le Forum

@+

 

[Robert]

Salut le forum, Salut Denis,

Pas de bol t'es pas tombé sur un crack! Ce que je te propose c'est vraiment du décomposé "pas à pas" mais j'ai pas mieux.
Le module1 contient les deux macros "Copier" et "Effacer". J'ai mis un bouton sur chaque feuille mais tu peux t'en passer.
Pour coller, comme tu n'avais pas précisé, j'ai coller tout (valeur, format, etc). De même pour effacer. Adapte-le si ça ne va pas.

À la fin de la macro "Copier" les cellules de la dernière ligne restent sélectionnées et tu peux donc les effacer de suite en cas d'erreur de saisie, Sinon tu as le bouton "Effacer".

Robert