[ツリー表示へ] [ワード検索] [Home]
タイトル ： 解決）ビットマップ内のバーコードデータが更新されない 投稿日 ： 2009/04/06(Mon) 12:24 投稿者 ： ゆき
| 申し訳ございません。花さん、私のボンミスでした。 QR_BarCode.exe：フォルダ名 mkqrimg.exe ：ファイル名（フリーで使えるQR用バーコードソフトです） Dim COUNT As Long: COUNT = 0 Do Until COUNT = 20 LABELDATA = "ABCDE" + COUNT ’’’バーコードデータの作成 Call Shell("C:\QR_BarCode.exe\mkqrimg.exe /O""C:\QR_BarCode.exe\QR.bmp"" /T" & LABELDATA & "") BMPPATH = GetObject("Scripting.FileSystemObject").GetAbsolutePathName("C:\QR_BarCode.exe\QR.bmp") BMPPATH = GetObject("C:\QR_BarCode.exe\QR.bmp")’こちらでもＯＫです クリップボードへ貼り付け エクセル貼り付け エクセルクローズ COUNT = COUNT + 1 Loop |
をクリックするとツリー全体を一括表示します） - ビットマップ内のバーコードデータが更新されない - ゆき 09/04/05-17:51No.13567