Impossible de coller la selection en cliquant sur l'appareil photo lors de
l'enregistrement automatique d'une macro.
Est-ce possible en entrant une ligne de codes manuellement ?
Merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour Michele,
Essaie ceci en adaptant le nom de la feuille et de la plage de cellule.
Pour plus d'information, place ton curseur sur l'expression CopyPicture et appuie sur la touche F1 ...il y a possibilité de modifier certains paramètres.
'-------------------------- Sub CopierImageDeCellules()
With Worksheets("Feuil1") .Range("A1:D4").CopyPicture xlScreen, xlBitmap .Paste _ Destination:=Worksheets("feuil1").Range("E6") End With
End Sub '--------------------------
Salutations!
"michele" a écrit dans le message de news: Bonjour,
Impossible de coller la selection en cliquant sur l'appareil photo lors de l'enregistrement automatique d'une macro. Est-ce possible en entrant une ligne de codes manuellement ? Merci
Michèle
Bonjour Michele,
Essaie ceci en adaptant le nom de la feuille et de la plage de cellule.
Pour plus d'information, place ton curseur sur l'expression CopyPicture et appuie sur la touche F1 ...il y a possibilité
de modifier certains paramètres.
'--------------------------
Sub CopierImageDeCellules()
With Worksheets("Feuil1")
.Range("A1:D4").CopyPicture xlScreen, xlBitmap
.Paste _
Destination:=Worksheets("feuil1").Range("E6")
End With
End Sub
'--------------------------
Salutations!
"michele" <cetourdie@afpa-nice.com> a écrit dans le message de news:OgzwbfAOEHA.620@TK2MSFTNGP10.phx.gbl...
Bonjour,
Impossible de coller la selection en cliquant sur l'appareil photo lors de
l'enregistrement automatique d'une macro.
Est-ce possible en entrant une ligne de codes manuellement ?
Merci
Essaie ceci en adaptant le nom de la feuille et de la plage de cellule.
Pour plus d'information, place ton curseur sur l'expression CopyPicture et appuie sur la touche F1 ...il y a possibilité de modifier certains paramètres.
'-------------------------- Sub CopierImageDeCellules()
With Worksheets("Feuil1") .Range("A1:D4").CopyPicture xlScreen, xlBitmap .Paste _ Destination:=Worksheets("feuil1").Range("E6") End With
End Sub '--------------------------
Salutations!
"michele" a écrit dans le message de news: Bonjour,
Impossible de coller la selection en cliquant sur l'appareil photo lors de l'enregistrement automatique d'une macro. Est-ce possible en entrant une ligne de codes manuellement ? Merci
