いつもお世話になっています。
エクセルマクロを用いて連番のバーコードを出力しようと考えたのですが、なかなか難しく質問に来ました。
A1~A10にバーコード用の数字(チェックデジット込みの13桁)を準備しました。
これに対応させたバーコードデータを10個作ろうとしたのですが、linkedCellの設定も上手くできませんし、デザインモードの切り替えをしないと表示もできないようで、困っています。
マクロの記録を使っても上手くいかず・・・
アドバイスの程お願いいたします。
できればサンプルマクロをご提示いただくと幸いです。
No.3ベストアンサー
- 回答日時:
まさかそんなお話だとはw,元のご相談からは全く読み取れませんww
デザインモードは当然ww解除しておいて実行しますwww
sub macro1()
dim h, o
for each o in activesheet.oleobjects
o.delete
next
for each h In range("B1:B60")
with activesheet.oleobjects.add(classtype:="BARCODE.BarcodeCtrl.1", left:=h.left + 5, top:=h.top + 4, width:=h.width, height:=h.height - 4)
.linkedcell = h.offset(0, -1).address
.width = .width - 10
end with
next
end sub
質問下手でもうしわけありません^^;
ですが、助かりました!!
linkedcellはaddressで指定すればいけるわけですね!!
なるほどなるほど!
たすかりました!
ありがとうございました!!
No.2
- 回答日時:
そもそもどこまでやれていて何を困っているご相談なのか,なんだかずいぶん不明瞭です。
ご質問:
1)linkedCellの設定も上手くできません
2)デザインモードの切り替えをしないと表示もできないようで、困っています。
まさかと思いますが,「バーコードコントロールを何もないシートにマクロで配置しようとしている,その際にリンクするセルもマクロで設定しようとしていて,それが出来ない」なんてお話じゃないですよね。
10個のバーコードコントロールは事前にシート上に手で配置しておきます。
また配置済みのコントロールにリンクするセルの設定が出来ないというのはかなり致命的に初歩的な出来ない内容ですが,既出回答にもあるように,それぞれ対応するセルとの対応付けも,マクロを使うまでもなくコントロールのプロパティで事前に設定しておきます。
また,コントロールを実際に使用する際には,デザインモードは当然終了しなければいけません。これもアタリマエの操作です。デザインモードを終了することで,バーコードが表示されます。
で,実際にはセルの数字を書き換えた後,次の質問で寄せられていたような問題が待っています。
参考にしてください。
http://oshiete.goo.ne.jp/qa/6743667.html
#このご質問でベストアンサーに選ばれている回答は,質問で聞かれているのとは違う,ずれたことを回答していますので注意して読んでください。
この回答への補足
>まさかと思いますが,「バーコードコントロールを何もないシートにマクロで配置しようとしている,その際にリンクするセルもマクロで設定しようとしていて,それが出来ない」なんてお話じゃないですよね。
そのまさかですw
バーコードをたくさん作りたいので、手作業ではなくマクロで
バーコード作成⇒リンクするセルの設定⇒デザインモードの終了
と行いたいです。
実際、配置まではできるのですが、linkedcellの設定と、デザインモードの切り替えができないので、困っています。
ご提示していただいたページに再描画を誘発させるものがあったので、とりあえず試してみるとして、
当面はlinkedcellの設定ができないことに関してお伺いしたいです!
No.1
- 回答日時:
Excelのバージョンは?
>linkedCellの設定も上手くできませんし
単純に LinkedCellに A1
別のバーコードコントロールで同様に A2
と全部で十回行えばよいのでは?
>A1~A10にバーコード用の数字(チェックデジット込みの13桁)を準備しました
ちなみにチェックデジットは勝手に計算してくれるようです。
>、デザインモードの切り替えをしないと表示もできないようで
デザインモードを終了させれば リンクしたA1:A10セルに対応して変化しませんか?
>マクロの記録を使っても上手くいかず・・・
イマイチ何をしたいかわかりません。
不具合のあるところはなんでしょうか?
(当方OfficeXPPro、普段使用しない機能なので検証不足かも)
この回答への補足
あー失礼しました。
office2003のエクセルです~
バーコードを60個ほど作るのに全部手作業でやっていては面倒ですし、参照値も変わります。
FOR文等を使って設定したいのですが、設定がうまくできないのです。
配置に関しては、なんとかなっているのですが、linkedcellの設定ができない、別の質問でもあった通り、デザインモードをオンオフしないと表示されないという二つの大きな問題があります。
どうしたらよいでしょうか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセル バーコード作成で他のシートを参照するには? 2 2023/05/03 16:57
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 11:27
- Excel(エクセル) 【マクロ】マクロが保存されているエクセルとは、別のエクセルブックの全シートの非表示列を再表示したい 1 2022/12/24 20:48
- Visual Basic(VBA) エクセルのマクロについて教えてください。 5 2023/06/02 08:44
- Visual Basic(VBA) 【マクロ】表への繰り返し転記について 1 2022/11/19 16:30
- Excel(エクセル) 【マクロ】マクロが保存されているエクセルとは、別のエクセルのオートフィルターのしぼりをクリアーしたい 2 2022/12/24 08:36
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/10 09:06
- Excel(エクセル) エクセルでcsvファイルを開いてVBAを使いたい 7 2022/04/28 11:12
- その他(Microsoft Office) ワードのマクロについて教えてください。 1 2023/01/22 11:43
- Excel(エクセル) エクセルのマクロ設定 1 2023/04/05 19:37
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
読み取ったQRコード/バーコード...
-
EXCELでバーコードを作成すると...
-
バーコードコントロールが印刷...
-
差し込み印刷のバーコードを小さく...
-
振込請求書が破れてしまいました
-
エクセル バーコード作成で他の...
-
国内線航空券をJALのアプリにて...
-
Excelでバーコードリーダーで読...
-
レシートにバーコード
-
コンビニ決済の用紙で支払いの...
-
バーコードってダブらない?
-
ケータイで読んだバーコードをP...
-
Access 図書管理システ...
-
Access2016Runtimeをインストー...
-
Excelの Microsoft バーコード...
-
PayPay支払いについて
-
マクロでバーコードのリンクセ...
-
黒い無地のバーコードのみのカ...
-
QRコードとバーコードについて
-
Qoo10のコンビニ受け取りをして...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
読み取ったQRコード/バーコード...
-
国内線航空券をJALのアプリにて...
-
ANAの2次元バーコードがスマホ...
-
EXCELでバーコードを作成すると...
-
バーコードってダブらない?
-
バーコードコントロールが印刷...
-
レシートにバーコード
-
振込請求書が破れてしまいました
-
Excelでバーコードリーダーで読...
-
差し込み印刷のバーコードを小さく...
-
エクセル バーコード作成で他の...
-
コンビニのアルバイトでやらか...
-
コンビニ決済の用紙で支払いの...
-
POVO2.0の128kbpsでPaypayやRPa...
-
Access2016Runtimeをインストー...
-
マクロでバーコードのリンクセ...
-
バーコードの値段の付け方はど...
-
エクセルでCODE128バー...
-
QRコードとバーコードについて
-
コンビニバイトで商品バーコー...
おすすめ情報