Petit souci pour copier des données dans le presse papier
La copie se fait si j'enlève de la macro la ligne
Application.CutCopyMode = False
J'aimerais pouvoir copier des données dans le presse papier sans voir la sélection et les pointillés sur la feuille (en arriere plan)
Une fois les données copié dans le presse papier, une msgbox m'avertissant que les données sont présente dans le presse papier
Sub Copier()
'activer la reference Microsoft Forms 2.0 Object Library
Sheets("Feuil1").Select
Range("G5:G10").Select
Selection.Copy
MsgBox ("Les données ont été copiées dans le presse-papier")
End Sub
mais je ne connais pas de moyen d'empêcher le contour en pointillés
Grand merci pour ton aide
Voila ce que je fais pour palier "les pointillés"
Code:
Sub Copier()
Sheets("Feuil1").Range("G5:G10").Copy
MsgBox ("Les données ont été copiées dans le presse-papier" & vbCrLf & "Si vous cliquez sur OK les données seront perdues.")
Application.CutCopyMode = False
End Sub
C'est sûr les pointillés ne disparaissent pas mais bon
Si quelqu'un a une astuce pour les pointillés, je suis preneur
MsgBox ("Les données ont été copiées dans le presse-papier" & vbCrLf & "Si vous cliquez sur OK les données seront perdues.")
Application.CutCopyMode = False
je ne vois absolument pas l'utilité de tout cela d'autant plus que le message empêche de reprendre le focus sur la feuille et par le fait même , empêche de coller les données à l'endroit voulu
Application.CutCopyMode = False est à supprimer au même titre que le MsgBox("........ il n'y a aucun moyen d'éviter le cadre clignotant