Qrcode-Qtzint vba code

Alexespo

Hello everybody,
I m an "amateur" of vba and i m tring to build a code to create in automatic a barcode in excel.
Below the code.

Sub QRCode()
Dim strFileTesto As String
Dim strComandoZint As String

strFileTesto = "xxxx\xxxx\temp_qrcode.txt"

strComandoZint = "C:\Programmi\Zint\zint.exe -o qrcode.png " & strFileTesto


Open strFileTesto For Output As #1
Print #1,  strFileTesto
Close #1


Shell strComandoZint


Kill strFileTesto

MsgBox "QR code ok!"

End Sub

I recive an errore message :
Error 778: no input data(segmento 0 empity)

Can you help me?

Thanks all

jsulm

@Alexespo This is Qt forum. Why are you asking about Visual Basic here?