Appel macro

Bonjour,
Étant autodidacte en la matière, VBA me réserve bien des surprises.
J'ai un classeur qui via une macro m'ouvre une photo dans une nouvelle feuille. Je voudrais qu'en cliquant sur cette photo, fermer cette feuille (sans macro) et me positionner sur une cellule déterminée comportant le nom d'une autre photo de façon à créer une boucle de visualisation.

Code essayé :

Workbooks.Add Template:=xlWorksheet
NomFe = ActiveWorkbook.Name
Workbooks(NomProg).Sheets("Feuil2").Range("i1") = NomFe
ActiveSheet.Pictures.Insert(Rep + Fic).Select
With Selection
    .Top = Range("A1")
    .Left = Range("A1")
    .onaction = Application.Run "'nomprog'!Module5.suivant"    ← ne fonctionne pas !
End With
ActiveWindow.Zoom = True


Pouvez-vous m'aider?

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Contributeur
    bonjour, "ne fonctionne pas"=? message d'erreur, comportement inattendu, ?
    1. Bonjour,
      sur la ligne :
      .onaction=Application.Run "'nomprog'!Module5.suivant"
      j'ai le message «Erreur de compilation
      Erreur de syntaxe»
      la variable NomProg récupérant le nom du classeur principal...
      précision : si je remplace ma variable par le nom du classeur, ça ne change rien, j'ai le même message d'erreur.
  2. Contributeur
    je pense que tu dois mettre le nom d'une macro dans .onaction
    exemple:
    .onaction = "lenomdemamacro"