
いつもお世話になっています。
エクセルマクロを用いて連番のバーコードを出力しようと考えたのですが、なかなか難しく質問に来ました。
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で質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELでバーコードを作成すると...
-
エクセル バーコード作成で他の...
-
バーコードコントロールが印刷...
-
バーコードってダブらない?
-
差し込み印刷のバーコードを小さく...
-
国内線航空券をJALのアプリにて...
-
JANコード(バーコード)を間違...
-
振込請求書が破れてしまいました
-
Excelでバーコードリーダーで読...
-
バーコードを使って在庫管理をa...
-
マクロでバーコードのリンクセ...
-
EXCELで作成したバーコードの更...
-
読み取ったQRコード/バーコード...
-
コンビニのアルバイトでやらか...
-
スマホに写真としてバーコード...
-
PayPay でバーコード支払いを行...
-
コンビニ決済の用紙で支払いの...
-
テプラ PRO SR530 バーコード...
-
ジェットスターのeチケット
-
バーコード(NW-7)の読み取りに...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELでバーコードを作成すると...
-
バーコードコントロールが印刷...
-
エクセル バーコード作成で他の...
-
バーコードってダブらない?
-
読み取ったQRコード/バーコード...
-
コンビニ決済の用紙で支払いの...
-
差し込み印刷のバーコードを小さく...
-
振込請求書が破れてしまいました
-
Excelでバーコードリーダーで読...
-
EXCELで作成したバーコードの更...
-
レシートにバーコード
-
コンビニバイトで商品バーコー...
-
Excelの Microsoft バーコード...
-
国内線航空券をJALのアプリにて...
-
Access2016Runtimeをインストー...
-
テプラ PRO SR530 バーコード...
-
ACCESS2013でバーコードリーダ...
-
レジでピッとするやつ
-
黒い無地のバーコードのみのカ...
-
PayPay でバーコード支払いを行...
おすすめ情報