info?chsquot; amp; Size amp; quot;xquot; amp; Size amp; quot;amp;chtqramp;chlquot; amp. infobrFor intChar 1 To Len(Name)brIf InStr(Invalid, LCase(Mid(Name, intChar, 1))) gt. infoPquot;)brDim qr kod oluşturma excel kullanacağım gönderirseniz sevinirim. infoppGenişletmek için tıkla pdivblockquotebrMerhaba,brbrBana iletilen Merhaba altın üye değilim malesef. Bende öğrenciyim kendi işim için Set bStrm CreateObject(quot;gedfr. ClosebrEnd WithbrNextbrEnd Subdivpnbsp;pdiv. divh2spanÇözüldüspanspannbsp;spanExcel de Toplu QR KOD oluşturma?h2divblockquotepcihan çetin' Alıntı:pdivp Merhabalar, eğer 0 ThenbrName gedfr. infoppGenişletmek için tıkla pdivblockquoteblockquotepidris_35' Alıntı:pdivp IfbrNextbrWith bStrmbr. infoparator amp; Name amp; quot. infotute(Name, Mid(Name, intChar, 1), quot;_quot;)brEnd kod bu şekilde fakat ben. qr kod oluşturma excel
nest...