bellenm
XLDnaute Impliqué
Bonjour à tous,
je suis sur un userform et là je fait une sauvegarde d'image manuscrite.
Cette image devrait ce sauver dans le dossier "Temp" avec comme nom "visite4" avec son ext.
Par la suite cette image devra se placer sur ma feuille en "B107". Cela se fera soit en important l'image depuis le dossier "Temp" soit en collant l'image .
Elle ne devra pas sortir de la cellule donc devra être redimensionné.
Voilà pour cette partie je n'ais pas de code.
Mais voici celui que j'utilise pour copier l'image:
Merci pour votre aide
Marc B
je suis sur un userform et là je fait une sauvegarde d'image manuscrite.
Cette image devrait ce sauver dans le dossier "Temp" avec comme nom "visite4" avec son ext.
Par la suite cette image devra se placer sur ma feuille en "B107". Cela se fera soit en important l'image depuis le dossier "Temp" soit en collant l'image .
Elle ne devra pas sortir de la cellule donc devra être redimensionné.
Voilà pour cette partie je n'ais pas de code.
Mais voici celui que j'utilise pour copier l'image:
VB:
Private Sub sauve4_Click()
ActiveSheet.Unprotect Password:=strSheetPassword
InkPicture4.Ink.ClipboardCopy
ActiveSheet.Paste
Set newImg = Selection
With newImg
.Top = 240
.Left = 575
End With
ActiveSheet.Protect Password:=strSheetPasswordMerci pour votre aide
Marc B