Webről kapott kép mentése.

Webről kapott kép mentése.
2020-05-14T21:47:20+02:00
2020-05-14T21:47:24+02:00
2022-12-06T10:35:40+01:00
Papa100
Szíves segítséget kérek.

Excel táblázat adataiból szeretnék QR kódot generáltatni vCard formátumban, és beilleszteni a táblázat egy cellájába. Az adatokat elküldöm, és visszakapom a QR kódot amit látok az Explorerben, de nem tudom, hogy ezt hogyan lehet beilleszteni a táblázatba. (Az alábbi kódban csak egyszerűsített adatot írtam.)

Sub FillInternet() 

Dim ie As Object

Dim qr As String

Dim adat As String

 Set ie = CreateObject("InternetExplorer.Application")

adat = "Teszt Elek"

ie.navigate "https://chart.googleapis.com/chart?cht=qr&choe=UTF-8&chs=200x200&chl=BEGIN%3AVCARD%0AVERSION%3A3.0%0AN%3A" & adat & "%0AEND%3AVCARD"

 

ie.Visible = True

'megnyílik az ie, megjelenik a QR kód, de hogy lehet ezt betenni egy táblázat egy cellájába?

'gr = ie.document.Value

ie.Quit

End Sub
Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd