[Excel] Emplacement Userform

Résolu
Alessia -  
CapitainCo Messages postés 127 Statut Membre -
Bonjour,

Après avoir créée un graphique dynamique dans l'onglet "feuille Pivot", j'ai réussie à afficher ce meme graphique dans un UserForm. Toutefois cet UserForm est positionné dans l'onglet "feuille pivot" qui contient déja mon graphique.
Il n'a donc aucun intérêt!!
Je voudrais donc savoir s'il est possible de faire apparaitre l'user form dans un autre onglet que j'ai appelé "QSM Conso" de mon classeur sachant que lorsque l'userform est affiché à l'ecran il m'est impossible de changer de feuille.
Pour info voici le code que j'ai saisie

Sub Bouton36_QuandClic()
Sheets("Feuille Pivot").Select
Set CurrentChart = Sheets("Feuille Pivot").ChartObjects(1).Chart
Sheets("Feuille Pivot").ChartObjects(1).Activate
ActiveChart.ChartArea.Select
ActiveChart.ShowWindow = True
Fname = ThisWorkbook.Path & "\temp2.gif"
CurrentChart.Export Filename:=Fname, FilterName:="GIF"
UserForm1.Image1.Picture = LoadPicture(Fname)
UserForm1.Show
End Sub

D'avance merci

2 réponses

  1. CapitainCo Messages postés 127 Statut Membre 61
     
    Sub Bouton36_QuandClic()
    Sheets("Feuille Pivot").Select
    Set CurrentChart = Sheets("Feuille Pivot").ChartObjects(1).Chart
    Sheets("Feuille Pivot").ChartObjects(1).Activate
    ActiveChart.ChartArea.Select
    ActiveChart.ShowWindow = True
    Fname = ThisWorkbook.Path & "\temp2.gif"
    CurrentChart.Export Filename:=Fname, FilterName:="GIF"
    UserForm1.Image1.Picture = LoadPicture(Fname)
    Worksheets("QSM Conso").Activate
    UserForm1.Show
    End Sub

    test ca
    0
    1. Alessia
       
      Super!! Ca marche

      Merci beaucoup CaptainCo
      0
  2. CapitainCo Messages postés 127 Statut Membre 61
     
    dr
    0