imprime ecran en vba

globinours

XLDnaute Junior
Bonjour à tous et meilleurs voeux pour 2006.

Comment pourrais-je faire un altgr imprimeecran en vba(sans copypicture)?
merci d'avance.
 

MichelXld

XLDnaute Barbatruc
bonjour

tu peux tester

Option Explicit

Private Declare Sub keybd_event Lib 'user32' ( _
ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)

Private Sub CommandButton1_Click()
keybd_event vbKeySnapshot, 1, 0&, 0&
DoEvents
Range('A1').Select
ActiveSheet.Paste
End Sub



bonne journée
MichelXld
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 229
Messages
2 086 426
Membres
103 206
dernier inscrit
diambote