Hello Experts

Just found a temporal solution to my question above however, i wish to have
some modification, i managed to get the code below but i modified it with
 Dim x As Integer where
    x = Sheet1.Range("P6").Value, however when i select ion it an option
for the chart to chart ie eg i select LOS from the listbox, it doesnt
change so unless the chart reloads, so i added unload me pic.show, is there
a way to go around this instead. thanks


Private Sub ListBox1_Click()
Sheet1.Range("p5").Value = ListBox1.Value
Pic.Caption = ListBox1.Value
Unload Me
Pic.Show
End Sub


Private Sub UserForm_Initialize()

    Dim strFile As String
    Dim x As Integer
    x = Sheet1.Range("P6").Value
     ' export picture
    With Sheet2
        strFile = .Parent.Path & "x1temp.gif"
        .ChartObjects(x).Chart.Export strFile
    End With

     ' load picture
    Image1.PictureSizeMode = fmPictureSizeModeStretch
    Image1.Picture = LoadPicture(strFile)

     ' remove picture from disk
    Kill strFile

End Sub



On Mon, Sep 1, 2014 at 4:19 PM, Hilary Lomotey <[email protected]> wrote:

>  [image: Boxbe] <https://www.boxbe.com/overview> This message is eligible
> for Automatic Cleanup! ([email protected]) Add cleanup rule
> <https://www.boxbe.com/popup?url=https%3A%2F%2Fwww.boxbe.com%2Fcleanup%3Ftoken%3DBPP2sNpZ8l37nvqp%252B%252FIJpzOHs%252FBDBmrd5u351F7NQkC5GtspdoLbATK359fSxj1bSFyjFTQMKDoCr86HG78V2Rz1L49fcrlL%252FT7OVA%252FPMk9mmnLK0foMyOPT%252FVGqoLGMtUvLEsW2Fck%253D%26key%3Dh4aSOyI%252FduxY4MZmnHTUgIzDZWrBFEQR3i35g3cTQEk%253D&tc_serial=18439678443&tc_rand=749486360&utm_source=stf&utm_medium=email&utm_campaign=ANNO_CLEANUP_ADD&utm_content=001>
> | More info
> <http://blog.boxbe.com/general/boxbe-automatic-cleanup?tc_serial=18439678443&tc_rand=749486360&utm_source=stf&utm_medium=email&utm_campaign=ANNO_CLEANUP_ADD&utm_content=001>
>
> Hello Experts,
>
> i want to load graphs in the userform, i got some codes but its not
> working, can some please assist with the file attached,  the objective is
> to load the graph in the graph sheet in the userform on the dashboard by
> selecting the required option. thanks
>
> --
> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
> =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
> https://www.facebook.com/discussexcel
>
> FORUM RULES
>
> 1) Use concise, accurate thread titles. Poor thread titles, like Please
> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
> will not get quick attention or may not be answered.
> 2) Don't post a question in the thread of another member.
> 3) Don't post questions regarding breaking or bypassing any security
> measure.
> 4) Acknowledge the responses you receive, good or bad.
> 5) Jobs posting is not allowed.
> 6) Sharing copyrighted material and their links is not allowed.
>
> NOTE : Don't ever post confidential data in a workbook. Forum owners and
> members are not responsible for any loss.
> ---
> You received this message because you are subscribed to the Google Groups
> "MS EXCEL AND VBA MACROS" group.
> To unsubscribe from this group and stop receiving emails from it, send an
> email to [email protected].
> To post to this group, send email to [email protected].
> Visit this group at http://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>
>

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
To post to this group, send email to [email protected].
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.

Attachment: Load Chart in Userform.xlsb
Description: application/vnd.ms-excel.sheet.binary.macroenabled.12

Reply via email to