déplacer des cellules

Question

Bonjour, 
J'aimerai déplacer des lignes d'une feuille (avec leur contenu)
quand je fais tourner le code suivant, j'ai une erreur (apparament au niveau du worsheet) que je ne comprends pas.

Worksheets("Soins intensif Néonato").Cells(5, 2) = compt  'compt est le chiffre correspondant au déplacement voulu
Worksheets("Soins intensif Néonato").Range(Cells(12, 1), Cells(13, 4)).Select  'les cellules à déplacer, c'est cette ligne qui ne marche pas
Selection.Offset(-compt + 1, 0) = Range(Cells(12, 1), Cells(13, 4)).Value

Si quelqu'un peut m'expliquer...

Merci d'avance,

Livet

spidag · Answer

Bonjour, 
a ta place je ferais le deplacement à la main une fois, avec l'editeur de macro integrée à Excel.
TU sais avec le boutton enregistrement.
Ensuite, je modifierai le contenu du script, pour le faire à ma sauce ...

Livet · Answer

Merci pour ta réponse,
je vais essayer ça,


Livet

Livet · Answer

Je viens d'essayer (c'est trés pratique!), en fait, le soucis vient du worksheet, j'ai plusieurs feuille dans mon classeur et je dois en sélectionner une.
Est ce que la répétition du worksheet pose pb en vba? parce que la première fois, cela marche trés bien

Livet

Déplacer des cellules

3 réponses

Discussions similaires

Newsletters