Format image background transparent

[alexg7828]

I have an existing code to get an image inserted and now i am trying to get the white background transparent.

This is what i have so far but i get a bug at .PictureFormat

Any ideas ?

VBA Code:
Public Sub LoadOCMSignature()

LookupOCMSignature

If Dir(OCMSignaturePath) <> vbNullString Then

With ActiveSheet.Pictures.Insert(OCMSignaturePath)
If .Width / .Height < 1.575 Then
.Top = Range("OCMSignature").Top
.Left = Range("OCMSignature").Left
Else
.Top = Range("OCMSignature").Top
.Left = Range("OCMSignature").Left
End If
With .PictureFormat
.TransparentBackground = True
.TransparencyColor = RGB(255, 255, 255)
End With
.Fill.Visible = False
End With


Else
If dispMsgBox = True Then
MsgBox DemImage3Path & vbCrLf

 

[Fluff]

Duplicate to: VBA Format picture transparent background

In future, please do not post the same question multiple times. Per Forum Rules (#12), posts of a duplicate nature will be locked or deleted.

In relation to your question here, I have closed this thread so please continue in the linked thread. If you do not receive a response, you can "bump" it by replying to it yourself, though we advise you to wait 24 hours before doing so, and not to bump a thread more than once a day.