Good day to all of you..
I'm trying to change the name of the image of a QR Code obtained, when I try to use a variable to assign the name.
When I do it using a direct text it works fine.
By sure it's something simple I'm missing.
Thanks for your help
Happy Holidays!
Please Login or Register to view this content.
Vicho
Last edited by vichopalacios; 12-19-2022 at 04:19 PM.
Barriers are there for those who don't want to dream
Try:
Please Login or Register to view this content.
If things don't change they stay the same
Thank for your answer, @CheeseSandwich
but still the same problem.
I'm attaching a sample book
Use "," instead of "." in Cells(2.1) part of the the following line;
That is, it should be;Please Login or Register to view this content.
Please Login or Register to view this content.
Hi, try this !
According to the attachment a starter VBA demonstration :
PHP Code:Sub Demo1()
Dim N$, oPic As Picture, P#
With Hoja1
N = .[A2]
For Each oPic In .Pictures
If oPic.Name = N Then oPic.Delete: Set oPic = Nothing: Exit For
Next
P = Application.InchesToPoints(.[A3])
.Shapes.AddPicture("https://chart.googleapis.com/chart?cht=qr&chs=" & P & "x" & _
P & "& chl=" & .[A1], 0, -1, .[C3].Left, .[C3].Top, P, P).Name = N
End With
End Sub
► Do you like it ? ► ► So thanks to click on bottom left star icon « ★ Add Reputation » ! ◄ ◄
did not see this typo, I was blindUse "," instead of "." in Cells(2.1) part of the the following line;
Thank you Haluk.
@ Marc
Thanks for this Sub Demo()
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks