Bonjour à tous,

Je vous expose mon problème:
Je travaille sur un fichier excel partagé qui est situé sur un serveur protégé en écriture:
J'utilise le bout de code ci-dessous pour copier une image graphique dans un userform:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub ComboBox1_Change()
    Set f = Sheets("exportpdf")
  Set s = f.Shapes(CStr(Me.ComboBox1))
  s.CopyPicture
  f.ChartObjects.Add(0, 0, s.Width, s.Height).Chart.Paste
  f.ChartObjects(1).Chart.Export Filename:="c:\monimage.jpg"
  f.Shapes(f.Shapes.Count).Delete
  Me.Image1.PictureSizeMode = fmPictureSizeModeZoom
  UserForm3.Image1.Picture = PastePicture
  Kill "monimage.jpg"
End Sub
Un code erreur 70 permission refusée est généré: normal car le disque du serveur est protégé en écriture.

Est-il possible de lui indiquer de réaliser ce bout de code sur le disque Local ?
Comment ?
Peut-être existe t-il d'autre solution ?

Merci d'avance pour votre aide