マンガでよめる痔のこと・薬のこと

エクセル2003でバーコードフォントCODE39を導入して =”*P(指定セル)(スペース)(スペース)*” でバーコードを作成したいのですが、入力した名前は正しくありません 等のエラーになってしまいます正しい入力設定方法を分かり易く(PC初心者なので)教えてください

このQ&Aに関連する最新のQ&A

A 回答 (1件)

今日は。


式が違うのでは!
『=”*”&セル番号&”*”』
数値データの前後に「”*”」というスタート・ストップコードが必要です。
趣旨と違っていたらすいません。
    • good
    • 0
この回答へのお礼

ogawa sora さん、ありがとうございます、完璧です、二日間悩んでいましたが、解消されました。本当にありがとうございました。

お礼日時:2012/02/19 17:22

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QExcelの Microsoft バーコードコントロール 14.0

ExcelのVBAを使って、バーコード、下記のようなデータを入れたら、
画面上にバーコードを表示、と同時に印刷をして、バーコードリーダーで
読み取ることを可能にしたいと考えております。

データ: 「123456789012」 12桁の数値

セルに12桁の数値を入れて、適当なボタンを押すと、数値の入ったセルの下方に
バーコード表示させる、といったイメージです。

PCには、Microsoft バーコードコントロール 14.0が入っておりました。
これを選択すると、マウスが+になり、シート上でクリックすると
確かにバーコードが現れるのですが、不明なデータです。
どこをどのように変えれば、データが変わるのかも、よくわかりません。

結局、「Microsoft バーコードコントロール 14.0」の使い方がわかっていないのです。
宜しく、ご教示願います。

Aベストアンサー

Sub macro1()
Dim o As OLEObject
  With Cells(2, 1)
    Set o = ActiveSheet.OLEObjects.Add(ClassType:="BARCODE.BarCodeCtrl.1", _
          Link:=False, DisplayAsIcon:=False, _
          Left:=.Left, Top:=.Top, Width:=.Width, Height:=.Height)
    o.LinkedCell = .Offset(-1).Address
  End With
End Sub

Qフォントのインストールが出来ない

Window7にバーコードフォントをインストールしようとしたのですが、
インストールできませんでした。

インストール方法、エラーメッセージ、etc.詳細は以下の通りです。
順を追って説明しますので、フォントのインストールをした事のある人、説明の上手な方、アドバイスをお願いします。

インストールしたいフォント
https://www.technical.jp/barcode/font/
※ダウンロード後、拡張子は「.ttf」に変更

操作
ダウンロードして拡張子を変更した
「CODE128.ttf」を選択、右クリック、インストール

エラーメッセージ
CODE128.ttfをインストールできません
フォントをインストールしています(1個中1個目のフォント) 停止

以上のような状況でフォントがインストールできません

その他の情報
※管理者でログインしてます
※コントロールパネル、デスクトップのカスタマイズ、フォント、の画面上で貼付、インストールも試してみたのですが、
こちらも出来ませんでした。
※以下のOS環境の2台のパソコンで試してみたのですが、どちらも同じエラーメッセージでインストール出来ませんでした。
Windws7(HomePremium/32bit版)
Windws7(Professional/64bit版)

Window7にバーコードフォントをインストールしようとしたのですが、
インストールできませんでした。

インストール方法、エラーメッセージ、etc.詳細は以下の通りです。
順を追って説明しますので、フォントのインストールをした事のある人、説明の上手な方、アドバイスをお願いします。

インストールしたいフォント
https://www.technical.jp/barcode/font/
※ダウンロード後、拡張子は「.ttf」に変更

操作
ダウンロードして拡張子を変更した
「CODE128.ttf」を選択、右クリック、インストール

エラ...続きを読む

Aベストアンサー

>>ダウンロードして拡張子を変更した
そんな事する必要ないんだけど・・・

https://www.technical.jp/barcode/font/の一番下にある
2.CODE128用を左クリックしてファイル保存ウィーザードで保存。

保存したそのファイルを右クリックしてインストールを選択するだけなんだけれど・・・・。

どこか操作を間違えている。

QエクセルのIF関数で、文字が入力されていたならば~

エクセルのIF関数で文字が入力されていたならば~、という論理式を組み立てたいと思っています。

=IF(A1="『どんな文字でも』","",+B1-C1)

A1セルに『どんな文字でも』入っていたならば、空白に。
文字が入っていなければB1セルからC1セルを引く、という状態です。

この『どんな文字でも』の部分に何を入れればいいのか教えてください。

またIF関数以外でも同様のことができれば構いません。

宜しくお願いします。

Aベストアンサー

=IF(ISTEXT(A1),"",B1-C1)

でどうでしょうか?

Qエクセルで重複しているデータの抽出のしかたを教えてください。

エクセルで重複しているデータを抽出したいのですが・・。なにぶん初心者なもので簡単な方法があればよいのですが・・。
A列に日付 B列に企業名このデータが300件ほどあります。

 Å列      B列
1月 1日    AAAA社
1月 4日   BBBB社
1月 8日   CCCC社
2月 1日   BBBB社
2月20日    DDDD社
3月 2日   AAAA社

と、あるとしてB列の企業名が重複しているものを抽出したいのですが・・・。この場合 AAAA社とBBBB社ですが。
これを簡単に抽出する方法はないでしょうか?
教えてください お願いいたします。

Aベストアンサー

企業名がセルB2からセルB300まで入力されていると仮定します。
セルC2に IF(COUNTIF($B$2:B2,B2)>1,"*","") を入力し、セルC300までコピーして下さい。すると重複したデータの二番目以降に "*" のマークが付きます。
(注) 数式を下のセルまでコピーするため、COUNTIF($B$2 は絶対参照にして下さい。

Qある範囲のセルから任意の値を検索して、その隣のセルの値を取得するという関数はありますか?

Excelの関数について質問します。
ある範囲のせるを検索して、その隣のセルの値を取得するという関数を探しています。
なければユーザー定義で作りたいと思っています。
VLOOKUP関数では一番左端が検索されますが、
それをある範囲まで拡張して、
その右隣の値を取得できるようにしたいのです。
どうかお知恵をお貸しください。

Aベストアンサー

●X1セルの値を範囲A1:F200の中から探して、その右隣のセルの値を返す

 =OFFSET(A1,SUMPRODUCT(ROW(A1:F200)*(A1:F200=X1))-1,SUMPRODUCT(COLUMN(A1:F200)*(A1:F200=X1)))

※最初のA1はワークシートの左上隅を示すものなので、検索範囲に関わらずA1固定
※SUMPRODUCT(ROW(A1:F200)*(A1:F200=X1)) ⇒ A1:F200で値がX1と一致するセルの行番号

>その「ある範囲」の中には検索したい値が入っているセルは1つしかありません。
というのが前提です。複数のセルがHITすると関係ないセルの値が返るので、
場合によっては、IFをかぶせてCOUNTIFで確認した方が良いかもしれません。
 ex. =IF(COUNTIF(A1:F200,X1)=1,【上記数式】,"えらー")

ちなみに、VBAでやるならこんな感じになるかと。

動作の概要
 【検査範囲】から【検査値】を探し、
 最初にHITしたセルについて、右隣のセルの値を返す。
 ex. =Sample(X1,A1:F200)

'--------------------------↓ココカラ↓--------------------------
Function Sample(ByVal 検査値 As Variant,ByVal 検査範囲 As Range)
 For Each セル In 検査範囲
  If セル = 検査値 Then Exit For
 Next セル
 Sample = セル.Offset(0, 1)
End Function
'--------------------------↑ココマデ↑--------------------------

いずれもExcel2003で動作確認済。
以上ご参考まで。

●X1セルの値を範囲A1:F200の中から探して、その右隣のセルの値を返す

 =OFFSET(A1,SUMPRODUCT(ROW(A1:F200)*(A1:F200=X1))-1,SUMPRODUCT(COLUMN(A1:F200)*(A1:F200=X1)))

※最初のA1はワークシートの左上隅を示すものなので、検索範囲に関わらずA1固定
※SUMPRODUCT(ROW(A1:F200)*(A1:F200=X1)) ⇒ A1:F200で値がX1と一致するセルの行番号

>その「ある範囲」の中には検索したい値が入っているセルは1つしかありません。
というのが前提です。複数のセルがHITすると関係ないセルの値が返るので、
場...続きを読む

Qバーコードコントロール

ACCESS2007でバーコードコントロールを使用したいのですが、
ActiveXコントロールには「バーコードコントロール」が表示されません。
これはなぜなのでしょうか?

参照先のエラーという画面がACCESSを起動したときに出るのでそれが何か関係しているとは
思うのですが。。。
調べてみらのですが分かりませんでした。どなたかご教授お願いします。

Aベストアンサー

まず、念のためですが、ActiveXの一覧では、バーコードコントロールは
「Microsoft バーコード コントロール 9.0」として表示されますので、
確認してみてください。
(カレンダーコントロールだと、先頭に「Microsoft」が入らないのですが(汗))
http://office.microsoft.com/ja-jp/access-help/HA010201925.aspx


> 参照先のエラーという画面がACCESSを起動したときに出る

Access2003以前のバージョンで作成したMDBファイルを、Access2007で
開こうとした、ということでよろしいでしょうか。

原因としては、
 a)Access2007にバーコードコントロールがインストールされていない
 b)(インストールはされているが)参照設定が正しくなっていない
  (参照先が、以前のバージョンのもののままになっている)
の可能性が考えられるかと思います。
(ActiveXの一覧に表示されないなら「a」が、表示されるなら「b」が、
 それぞれ推測されます)

対処法としては、以下のようになります。

【a・インストールの場合】
1)Windowsのコントロールパネルから、『プログラムの追加と削除』を起動
2)「Microsoft Office ○○ 2007」を選択し、『変更』ボタンをクリック
3)新たに開いた画面で、「機能の追加/削除(A)」を選択し、『次へ』ボタン
 をクリック
4)『インストールオプション』タブのツリーで、「Microsoft Office Access」の
 『+』ボタンをクリックして、ツリーを展開
5)『バーコード コントロール』の項目があるので、『▼』ボタンをクリックして
 「マイ コンピュータから実行(R)」を選択し、右下の『次へ』ボタンをクリック
※インストール済みだった場合は、『次へ』にせず、右上の『×』ボタンで
 そのまま閉じてOkです。
6)「Microsoft Office ○○ 2007の構成が正常に完了しました。」の
 メッセージが出たら、『閉じる(C)』をクリックして終了

【b・参照設定の場合】
1)当該MDBファイル(2007版に変換済みならaccdbファイル)を開く
2)Alt+F11キーの同時押し等で、Visual Basic Editor(VBE)を開く
3)メニューで「ツール(T)→参照設定(R)」を選択し、『参照設定』ダイアログ
 を開く
4)「Microsoft BarCode Control」のチェックがオフの場合はオンに設定
5-1)上記チェックがオンで「参照不可」となっていた場合は、一旦オフにした後、
 右側にある『参照』ボタンをクリック
5-2)『ファイルの参照』ダイアログで以下のファイルを指定し、『開く(O)』ボタンを
 クリック
 C:\Program Files\Microsoft Office\Office12\MSBCODE9.OCX
 (Officeのインストール先が「C:\Program Files\」だった場合)
6)『参照設定』ダイアログの『Ok』ボタンをクリックして終了


・・・以上です。

まず、念のためですが、ActiveXの一覧では、バーコードコントロールは
「Microsoft バーコード コントロール 9.0」として表示されますので、
確認してみてください。
(カレンダーコントロールだと、先頭に「Microsoft」が入らないのですが(汗))
http://office.microsoft.com/ja-jp/access-help/HA010201925.aspx


> 参照先のエラーという画面がACCESSを起動したときに出る

Access2003以前のバージョンで作成したMDBファイルを、Access2007で
開こうとした、ということでよろしいでしょうか。

原因としては、
 ...続きを読む

Qバーコードコントロールが印刷時に反映されない

いつもご丁寧な回答をくださりありがとうございます

エクセルにバーコードを埋めて書類を作っているのですが
(主に上紙に使用)

バーコードのリンクセルで指定したセルに新しい番号を入れ
デザインモードを終了すると

画面上は新しいバーコードが表示されるのですが
印刷プレビューと印刷そのものにうまく反映してくれません

なにか設定的なものが間違えているのでしょうか

文章が稚拙で申し訳ありませんが回答のほどよろしくお願いします。

Aベストアンサー

エクセルにおいてはバーコード画像は、「セルの値」ではないという認識が質問者にはありますか。
いわゆる「オブジェクト」扱いです。セルの値とは別世界のものです。
エクセルは「セルの値」を中心に処理するソフトです(エクセルの進歩の沿革からも)。これはエクセルの基礎的なことです。
ですからエクセルに画像を印刷する機能があるにしても、特別な指定をしないとをしないとだめと考えるべきです。
画像で右クリクー図の書式設定ープロパティーオブジェクトを印刷するーOK です。
この後、印刷プレビューをだすー印刷するでどうなりますか。これで解決しますか。
http://pc.z-kikaku.jp/excel/logs/2007/04/post-7.php
など。
ーーー
>バーコードのリンクセルで指定したセルに新しい番号を入れ
の意味を、実例を出して、説明しておいたほうが良いのでは。

Qバーコードが読み取れない原因について(エクセル)

お世話になります。

大変困っておりまして、
ご教授頂ければ幸いです。

エクセル内でバーコード(JAN)を一斉に作成したいと思い、
下記サイトのJANCODE-nicotanのアドインをインストールして
バーコードを作成する事には成功したのですが、

試しにプリントアウトしてみたところバーコードリーダーで
読み取れない事が分かりました
(同じJANをバーコード画像作成ソフトで作成すればちゃんと読み取れます。)

フォントサイズを変えてみたり、違うJANでも色々試してみましたが
全く読み取る事が出来ません。

読み取れない理由などが
お分かりになる方はいらっしゃいましたら
ご教授のほど宜しくお願い致します。

http://nicotan.at-ninja.jp/blog/newWindow/conversion_Excel_JANCODE-nicotan.html

Aベストアンサー

JANコードの場合、13桁の最初の4の後に 縦線2本 || が下まで長く伸び、6桁の後も下まで伸び、最後の6桁の後も 縦線2本 || が下まで長く伸びて、バーコードの左右端を明示する役目をしているような気がします。

それがないので、読み取り範囲やピッチなどの基準点検知をセンサ側が解析できないのではないでしょうか。

商品のコード設定│JANコード登録│ 一般財団法人流通システム開発センター
http://www.dsri.jp/jan/order_02.htm

バーコード JAN 規格 - Google 検索
http://www.google.co.jp/search?q=%E3%83%90%E3%83%BC%E3%82%B3%E3%83%BC%E3%83%89+JAN+%E8%A6%8F%E6%A0%BC

Qエクセルで条件に一致したセルの隣のセルを取得したい

下のような「得点」という名前のシートがあります。
(「田中」のセルがA1です。)

 [ 田中 ][ 10 ][ 200 ]
 [ 山田 ][ 21 ][ 150 ]
 [ 佐藤 ][ 76 ][ 250 ]
 [ 鈴木 ][ 53 ][ 350 ]

別のシートのA1セルに、「佐藤」と入力すると、

 [ 佐藤 ]

「得点」シートから「佐藤」の列を見つけて、B1、C1に

 [ 佐藤 ][ 76 ][ 250 ]

のように表示させたいのですが、B1、C1にはどのような式を書けば良いのでしょうか。
「得点」シートでは氏名が重複する事はありません。
IF文を使うと思うのですが、いまいち良く分かりませんでした。

よろしくおねがい致します。

Aベストアンサー

こんにちは!
VLOOKUP関数で対応できます。
IF関数と併用すればエラー処理が可能です。

Excel2007以降のバージョンであれば
B1セルに
=IFERROR(VLOOKUP($A1,得点!$A:$C,COLUMN(B1),0),"")
としてC1セルまでオートフィルでコピー!
そのまま下へコピーすると行が2行目以降でも対応できます。

Excel2003までの場合は
=IF($A1="","",VLOOKUP($A1,得点!$A:$C,COLUMN(B1),0))

としてみてください、m(_ _)m


人気Q&Aランキング