Discussion :

[feranti]

Bonjour,

J'ai un problème que j'ai isolé mais que je ne comprends pas.
Je veux faire un copier-coller de cellules d'une feuille à l'autre. Pas de problème jusque là sauf que je voudrais vider la feuille destinataire avant de coller les cellules dedans.
Voici le code que j'utilise :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Public Sub copyCells()
 
    Dim wsSource As Worksheet
    Set wsSource = Worksheets("feuille_source")
 
    Dim sourceRange As Range
    Set sourceRange = wsSource.Range("A1:OG14")
    sourceRange.Copy
 
    Dim wsDest As Worksheet
    Set wsDest = Worksheets("feuille_dest")
 
    'sans la ligne suivante, pas de soucis, mais la commande PasteSpecial échoue si je la décommente ?!!
    'wsDest.UsedRange.Delete
 
    Dim destRange As Range
    Set destRange = wsDest.Range("A1:OG14")
    destRange.PasteSpecial Paste:=xlPasteAll
    destRange.PasteSpecial Paste:=xlPasteColumnWidths
 
End Sub

Comme indiqué dans le code, si je supprime les cellules de la feuille avant de coller dedans, la commande PasteSpecial échoue...
Pouvez-vous me dire pourquoi et comment réaliser ça d'une manière qui ne fasse pas planter le PasteSpecial ?

Merci d'avance

[joe.levrai]

Bonjour,

tu copies une source et ensuite tu supprimes une destination .... de ce fait tu annules l'opération de copie et tu fais échouer le collage

inverse l'étape de copie et de suppression ... et tu pourrais même effacer (.Clear) ta plage de destination plutôt que la supprimer

[Menhir]

Le Copy de Range correspond à un Ctrl+C sur Excel.
Tu remarqueras que dans Excel, si tu fais un Ctrl+C puis que tu supprimes une ligne, la référence à coller (les pointillés autour de la cellule) disparait et tu ne peux pas coller.
Copy de Range réagit de la même façon.

[feranti]

Merci beaucoup à vous deux !
J'ignorais (et je ne trouves pas ça très intuitif d'ailleurs) que supprimer des cellules dans une feuille X annulait la copie d'un range dans la feuille Y.
Tout est clair maintenant... que de temps perdu sur ce problème.

[Menhir]

annulait la copie d'un range dans la feuille Y.

La copie n'est pas celle de la feuille Y, c'est celle de TOUTE l'application Excel, voir même de tout Windows, vu que ce système d'exploitation n'a jamais su gérer en standard la mise en batch de copies multiples.

[feranti]

D'accord ! Donc par sécurité, au cas où on ait supprimé des cellules du range copié, Excel invalide la copie pour chaque opération de Delete, Clear, etc. Je comprends l'idée.
Merci pour la précision.