User Posts: Rafiul Haq
0
How to Create a Training Matrix in Excel (3 Easy Methods)
0

In this article, we will show you 3 methods of how to create a training Matrix in Excel. We’ll make the Matrix from a dataset for the first 2 methods. To ...

0
How to Remove Decimals in Excel with Rounding (10 Easy Methods)
0

We’re going to show you 10 methods of how to remove decimals in Excel with rounding. To demonstrate our methods, we’ve picked a dataset with 3 columns: ...

0
Macro to Send Email from Excel (5 Suitable Examples)
0

In this article, we’ll show you 5 Macro to send email from Excel. To demonstrate our methods, we’ve selected a dataset with 3 columns: “Name”, “Email”, and ...

0
How to Make MIS Report in Excel for Sales (with Easy Steps)
0

In this article, we’re going to show you the quick steps of how to make an MIS report in Excel for sales. To demonstrate our method, we’ve picked a dataset ...

0
How to Send Email If Conditions Met in Excel (3 Easy Methods)
0

Often, we need to send emails to our customers when a condition is fulfilled. This article will show you 3 methods to send an email if conditions are met in ...

0
How to Share Excel File Online (2 Easy Methods)
0

We often need to Share Excel files Online. In this article, we will show you 2 quick methods of how to Share Excel file Online. To demonstrate our methods ...

0
Cannot Edit Excel File in Protected View (3 Reasons with Solutions)
0

In this article, we’re going to show you the top 3 reasons along with solutions for cannot edit Excel file in Protected View. This is an Excel feature to open ...

0
Excel VBA: Unprotect Workbook without Password (2 Examples)
0

In this article, we will show you 2 examples of how to Unprotect Excel Workbook without a Password using VBA. We have got a Protected Workbook with a Password. ...

0
How to Automate Goal Seek in Excel (2 Easy Methods)
0

In this article, we’re going to show you how to Automate Goal Seek in Excel. To demonstrate our methods, we’ve selected a dataset with 4 rows: “Base Price”, ...

0
[Solved!] Flash Fill Not Working in Excel (5 Reasons with Solutions)
0

In this article, we’re going to show you the top 5 reasons along with solutions for Flash Fill not working in Excel. To describe our methods to you, we’ve ...

0
How to Calculate Difference Between Two Dates in Days in Excel
0

We’ll show you 7 quick methods of how to calculate the difference between two dates in days in Excel. To demonstrate our methods, we’ve picked a dataset with 3 ...

0
How to Make a Correlation Scatter Plot in Excel (2 Quick Methods)
0

When we want to establish a mathematical relationship between two variables, we use Correlation. Here, we’ll show you 2 methods of how to make and format a ...

0
How to Use VLOOKUP If Condition Lies Between Multiple Ranges in Excel
0

We’re going to show you 5 quick methods of using VLOOKUP if a condition is between multiple ranges in Excel. For this purpose, we’ve taken a dataset with 2 ...

0
How to Convert CSV to XLSX without Opening (5 Easy Methods)
0

Often, we get our files in CSV format. That file format is not very user-friendly. In this article, we’re going to show 6 methods to convert CSV to XLSX ...

0
How to Export PDF Comments into an Excel Spreadsheet (3 Quick Tricks)
0

Often, we need to work with comments within a PDF file. We’ll show you 3 easy methods of how to export PDF comments into an Excel Spreadsheet. To demonstrate ...

Browsing All Comments By: Rafiul Haq
  1. According to your example, Set cRange = Range(“C5, C8, C11”)
    Then, you’ll need to change the height & width to MergeArea
    .Width = cItem.MergeArea.Width
    .Height = cItem.MergeArea.Height

    Full Code >

    Sub URLPhotoInsert2()
    Dim cPhoto As String
    Dim cPicture As Picture
    Dim cRange As Range
    Dim cItem As Range
    Set cRange = Range(“C5, C8, C11”)
    For Each cItem In cRange
    cPhoto = cItem.Offset(0, -1)
    If cPhoto = “” Then Exit Sub
    Set cPicture = ActiveSheet.Pictures.Insert(cPhoto)
    With cPicture
    .ShapeRange.LockAspectRatio = msoFalse
    .Width = cItem.MergeArea.Width
    .Height = cItem.MergeArea.Height
    .Top = Rows(cItem.Row).Top
    .Left = Columns(cItem.Column).Left
    .Placement = xlMoveAndSize
    End With
    Next
    End Sub

    The output will be this: https://ibb.co/KXHVzSC

  2. Thank You.

ExcelDemy
Logo