Solved

Run time error '424'

Posted on 2009-04-02
6
410 Views
Last Modified: 2012-05-06
I am getting run time error after trying to paste picture on commandbutton surface


Private Sub CommandButton1_Click()

 

MsgBox "You selected " & GetImportFileName

CommandButton1.Picture = GetImportFileName    '<--RUN TIME ERROR '424' 

End Sub

 

Function GetImportFileName() As Variant

    Dim Filt As String

    Dim FilterIndex As Integer

    Dim FileName As Variant

    Dim Title As String

    

'   Set up list of file filters

    Filt = "Text Files (*.txt),*.txt," & _

           "Lotus Files (*.prn),*.prn," & _

           "Comma Separated Files (*.csv),*.csv," & _

           "ASCII Files (*.asc),*.asc," & _

           "All Files (*.*),*.*"

 

'   Display *.* by default

    FilterIndex = 5

 

'   Set the dialog box caption

    Title = "Select a File to Import"

 

'   Get the file name

    FileName = Application.GetOpenFilename _

        (FileFilter:=Filt, _

         FilterIndex:=FilterIndex, _

         Title:=Title)

 

'   Exit if dialog box canceled

    If FileName = False Then

        MsgBox "No file was selected."

        Exit Function

    End If

   

'   Display full path and name of the file

    

    GetImportFileName = FileName

    

End Function

Open in new window

0
Comment
Question by:TITO2009
  • 4
6 Comments
 
LVL 142

Accepted Solution

by:
Guy Hengel [angelIII / a3] earned 500 total points
ID: 24047276
CommandButton1.Picture  does not accept a string with the filename, but needs to get assigned the picture object.
0
 

Author Comment

by:TITO2009
ID: 24047840
Hi, May i know how to assign picture object. Thanks
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 24047862
And none of your file types are image files anyway! :)
0
Complete VMware vSphere® ESX(i) & Hyper-V Backup

Capture your entire system, including the host, with patented disk imaging integrated with VMware VADP / Microsoft VSS and RCT. RTOs is as low as 15 seconds with Acronis Active Restore™. You can enjoy unlimited P2V/V2V migrations from any source (even from a different hypervisor)

 

Author Comment

by:TITO2009
ID: 24056178
I am sorry,  could get the meaning. How to do that.
0
 

Author Comment

by:TITO2009
ID: 24056189
My objective is by click command button, I must able to select picture on paste on button surface.
0
 

Author Comment

by:TITO2009
ID: 24056304
Thank you, i did manage to over come the problem. Cheers
0

Featured Post

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

The System Center Operations Manager 2012, known as SCOM, is a part of the Microsoft system center product that provides the user with infrastructure monitoring and application performance monitoring. SCOM monitors:   Windows or UNIX/LinuxNetwo…
This article descibes how to create a connection between Excel and SAP and how to move data from Excel to SAP or the other way around.
This Micro Tutorial demonstrates how to create Excel charts: column, area, line, bar, and scatter charts. Formatting tips are provided as well.
This Micro Tutorial will demonstrate on a Mac how to change the sort order for chart legend values and decrpyt the intimidating chart menu.

758 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

19 Experts available now in Live!

Get 1:1 Help Now