REAL-TIME

VBA Projects

Full Access with Source Code

  • Designed and Developed by PNRao

  • Full Access with VBA Source Code

  • Well Commented Codes Lines

  • Creative and Professional Design

120+ PROFESSIONAL

Project Management Templates

120+ PM Templates Includes:
  • 50+ Excel Templates

  • 50+ PowerPoint Templates

  • 25+ Word Templates

Effortlessly Manage Your Projects

Seamlessly manage your projects with our powerful & multi-purpose templates for project management.

Share Post

Image is one of the UserForm control. You can select and drag Image on the UserForm. You can select and drag Image on the UserForm. Image control embeds a picture such as a jpg, jpeg, gif, png, bitmap, etc. It can be used on the UserForm. You can see how it works and more details about Image Control.

VBA Image_Control on the UserForm

Please find more details about VBA ActiveX Image_Control on the UserForm.

    1. Go To Developer Tab and then click Visual Basic from the Code or Press Alt+F11.
    2. Go To Insert Menu, Click UserForm. Please find the screenshot for the same.

Excel VBA UserForm CheckBox

    1. Drag the Image_control on the Userform from the Toolbox. Please find the screenshot for the same.

Image Excel VBA ActiveX Control3

    1. Click on the image_control properties.
    2. On the left side find ‘Picture’ from the available properties of the control.
    3. On the right side click on that, and select image from the source.
    4. On the left side find ‘PictureSizeMode’ from the available properties of the control.
    5. On the right side, select ‘1 – frmPictureSiseModeStretch’ from the available list.
    6. Now, Click ‘F5’ to see the output.
    7. Now, you can see the following output as shown below in the screen shot.

Image Excel VBA ActiveX Control6

Add dynamic Image_Control on the UserForm using VBA

Please find the following steps and example code, it will show you how to add dynamic Image_control on the userform.

    1. Add Image and CommandButton on the userform from the toolbox.
    2. Right click on the CommandButton, click properties
    3. Change the CommandButton caption to ‘Create_Image ’
    4. Double click on the CommandButton
    5. Now, it shows the following code.
Private Sub CommandButton1_Click()
 
End Sub
    1. Call the below procedure named ‘Add_Dynamic_Image ’ and find the below procedure to run.
Private Sub CommandButton1_Click()
    Call Add_Dynamic_Image 
End Sub

Procedure to call in the CommandButton:

Sub Add_Dynamic_Image()
    'Add Dynamic Image and assign it to object 'Img'
    Set Img = UserForm2.Controls.Add("Forms.Image.1")
    
    With Img
        'Load Picture to Image Control
        .Picture = LoadPicture("C:Image  Excel ActiveX Control Object.jpg")  ‘Change Image Path here
        
        'Align the Picture Size
        .PictureSizeMode = fmPictureSizeModeStretch
        
        'Image Position
        .Left = 50
        .Top = 10
    End With
End Sub
    1. Now, click F5 to run the macro, click ‘Create_Image ’ button to see the result.
    2. You can see the created dynamic Image_control which is shown in the following screen shot.

output:

Image Excel VBA ActiveX Control1

Delete Image_Control on the UserForm using VBA

Please find the below code, it will show you how to delete or remove the control on the UserForm. In the below example, its deleting the Image named ‘New Image’ which is on the UserForm named ‘UserForm4’. We can use Remove method to delete the controls which are created during run time. Controls which are created during design time cannot be deleted using this method. Please find the below example and screen shots for better understand.

Code 1: Adding control During Run Time

Private Sub CommandButton1_Click()
    'We can use Add method to add the new controls on run time
    Set lblBtn = Me.Controls.Add("Forms.Image.1")
    With lblBtn
        .Top = 20
        .Left = 40
        .Name = "lblNew1"
    End With
    MsgBox "New Image Control Added"
End Sub

Please find the below screen shot for your reference for the above macro and its output.
When we click on Add Command Button:

Image Excel VBA ActiveX Control7

Code 1: Deleting or Removing Image_control which is created during run time.

Private Sub CommandButton2_Click()
    'We can use Remove method to delete the controls which are created during run time
    'Note: Controls which are created on design time cannot be deleted using this method
    Me.Controls.Remove ("lblNew1")
    MsgBox "Image Control Deleted"
End Sub

Please find the below screen shot for your reference for the above macro and its output.
When we click on Delete Command Button:

Image Excel VBA ActiveX Control8

Effortlessly Manage Your Projects and Resources
120+ Professional Project Management Templates!

A Powerful & Multi-purpose Templates for project management. Now seamlessly manage your projects, tasks, meetings, presentations, teams, customers, stakeholders and time. This page describes all the amazing new features and options that come with our premium templates.

Save Up to 85% LIMITED TIME OFFER
Project Management Templates

All-in-One Pack
120+ Project Management Templates

Essential Pack
50+ PM Templates

Excel Pack
50+ Excel PM Templates

PowerPoint Pack
50+ Excel PM Templates

MS Word Pack
25+ Word PM Templates

Ultimate Project
Management Template
Ultimate Resource
Management Template
Project Portfolio
Management Templates
Last Updated: March 2, 2023