rodrigoavf
New Member
- Joined
- Jan 15, 2019
- Messages
- 1
Hi,
I have a file that've working normally for more than 1 year, but now something went wrong, even though I didn't use the file.
This file inserts images by VBA in specific locations, but now all the images seems to have moved to the right.
I've tried:
Me.Pictures.Insert(FullImagePath).Select
.Name = "Photo"
.ShapeRange.ZOrder msoSendToBack
.Top = 0
.Left = ActiveCell.Left
.Height = 100
End With
And the images is not even close to the active cell
I've tried:
Me.Pictures.Insert(FullImagePath).Select
.Name = "Photo"
.ShapeRange.ZOrder msoSendToBack
.Top = 0
.Left = 0
.Height = 100
End With
I've tried:
Me.Pictures.Insert(FullImagePath).Select
.Name = "Photo"
.ShapeRange.ZOrder msoSendToBack
.Top = 0
.Left = 0
.IncrementLeft -300
.Height = 100
End With
An in all of theme the image shows very far from away column A
Thanks in advance for the help
I have a file that've working normally for more than 1 year, but now something went wrong, even though I didn't use the file.
This file inserts images by VBA in specific locations, but now all the images seems to have moved to the right.
I've tried:
Me.Pictures.Insert(FullImagePath).Select
.Name = "Photo"
.ShapeRange.ZOrder msoSendToBack
.Top = 0
.Left = ActiveCell.Left
.Height = 100
End With
And the images is not even close to the active cell
I've tried:
Me.Pictures.Insert(FullImagePath).Select
.Name = "Photo"
.ShapeRange.ZOrder msoSendToBack
.Top = 0
.Left = 0
.Height = 100
End With
I've tried:
Me.Pictures.Insert(FullImagePath).Select
.Name = "Photo"
.ShapeRange.ZOrder msoSendToBack
.Top = 0
.Left = 0
.IncrementLeft -300
.Height = 100
End With
An in all of theme the image shows very far from away column A
Thanks in advance for the help