「忠犬もちしば」のAIボットを作ろう!

いつもお世話になります。
Win10 エクセル2016 です。

下記のサイトを参考に、
https://121ware.com/qasearch/1007/app/servlet/re …


操作手順 で
1.アドインを入手しインストール
    から
2.インストールしたアドインを適用する

    まで はうまくできました。



3.「郵便番号変換ウィザード」を実行する
  
  郵便番号から住所へ変換する方法です。
  
現象
  A列のセルの右上に赤い三角マークが出て、
  「郵便番号変換ウィザード:この郵便番号から住所への変換は、できませんでした。」
  というコメントが出ます。

※このサイトの中に 「補足」 で
  郵便番号データに不備があると、郵便番号が入力されているセルにコメントが出力されます。
  と説明されています。

このコメントのように不備があるので変換がうまくゆかないのでインターネットで検索して見てみました。
どれもうまくいきません。


この不備とは何かご指導を願えませんでしょうか。

質問者からの補足コメント

  • どう思う?

    vbaのユーザフォームで住所入力をしたいたので教えていただきたいです

    No.1の回答に寄せられた補足コメントです。 補足日時:2017/06/09 13:46
  • うーん・・・

    ダウンロードした Zip を解凍しようとしましたがあまりにも小さくて見えませんでした
    試してみましたがうまくいきませんでした

      補足日時:2017/06/09 16:29
  • ご回答に感謝します
    ありがとうございます

    私個人の問題かもしれませんが新たにパソコンを買い替えて変換ができないなんてと悔しいです
    というのはほかの方法でできますが

    これで締め切らせていただきます

      補足日時:2017/06/11 06:47

A 回答 (4件)

やはり、郵便番号ウィザードが動いているPCから、該当するプログラムライブラリ・辞書を入れるのが一番早いようです。



後の情報としては、こういうのもありますが、もうすでにお試しだと思います。

https://www.microsoft.com/ja-jp/download/details …
http://okirakurak.exblog.jp/11860226/
    • good
    • 0
この回答へのお礼

WindFallerさんご丁寧な回答をいただき誠にありがとうございました。
何度も繰り返し試しましたがうまくゆきませんでした。

愚痴になりますが買い換えたばかりでこんなに苦労するとは、
だから元に戻りIMEによる変換にします。

お礼日時:2017/06/14 08:53

#2の回答者です。



まず、確認しなければならないことは、

msyubin7.dll と mszip.dic(別名あり)
がProgram Files フォルダーの下にある Microsoft Office のフォルダーに存在しているかどうかです。
#2で書いたログを参照してください。

もう、「msyubin7.dll と mszip.dic」は、office をインストールすると標準で存在しているというそうです。

新たなものは、もう入手できませんから、郵便番号ウィザードが稼働しているPCから抜き出すか、郵便番号CSVを、VLookup を使うか、もしくは、データベースを作るから、後は、市販のものを購入するか、その選択になってしまいます。今は、Excelの性能が上がったので、関数を使ってもよいし、いずれかのデータベース・エンジンで組み込むことも可能だと思います。
    • good
    • 0

こんにちは。



>vbaのユーザフォームで住所入力をしたいたので教えていただきたいです
私の郵便番号ウィザードは、カスタマイズしたものです。ユーザーフォームを使って出すというのは、少し面倒な手続きが必要です。

121ware.comのガイダンスだけでは、プログラムが足りません。

エラーが出ているということは、最初にすべきことは、 msyubin7.dll & mszip.dic の(エンジンと辞書)バージョンの組み合わせが合っているかどうか、合っていなければ、変換されないということが分かりました。

以下を参考にしてください。
https://answers.microsoft.com/ja-jp/msoffice/for …

バージョン・Hotfix情報
https://support.microsoft.com/ja-jp/help/2817324 …

私がBAではありませんが、知らないことは教えるなというという教訓のひとつです。
http://oshiete.goo.ne.jp/qa/9736432.html

Microsoft も、製作者も見捨てたようなアドインをこちらがサポートしてもしきれるものではありませんので、あまり期待をしないでください。できるなら、MSを頼らないで、新たに構築し直したほうが安心できるかもしれません。

なお、以下のようなことが可能です。任意の場所に入れることが可能です。
「郵便変換ウィザードで郵便番号から住所(住」の回答画像2
    • good
    • 0

そんなことしなくともIMEが変換してくれない?

この回答への補足あり
    • good
    • 0
この回答へのお礼

ありがとうございます。

お礼日時:2017/06/14 08:55

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

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

QExcel2016の郵便番号変換ウィザードが機能しない

Excel2016の郵便番号変換ウィザードが機能しません。
住所を選んで、「アドイン」→「ウィザード」→「郵便番号変換」→「住所から郵便番号を生成する」→「次へ」→「郵便番号を出力するセル範囲」を選んで→「完了」
郵便番号は出力されず、「郵便番号変換ウィザード:この住所から郵便番号への変換は、できませんでした」とのエラーが、住所を入力したセルに出ます。

元々Excel2013だったものが、Excel2016にアップデートしました。
Excel2013の時はうまく動いていたのですが、Excel2016になってから、いつからか分かりませんが、機能しなくなりました。

「ファイル」→「オプション」→「アドイン」を見ると、「アクティブなアプリケーションアドイン」に「郵便番号変換ウィザード」が入っています。

Office郵便番号辞書(2013年5月)を再インストールしても改善しませんでした。←以前にダウンロードしておいたもの。

Aベストアンサー

2016 ではないので、検索代行になりますが、

Excel2016で郵便番号検索ウィザードで変換ができない
https://answers.microsoft.com/ja-jp/msoffice/forum/msoffice_excel-mso_winother/excel2016%E3%81%A7%E9%83%B5%E4%BE%BF%E7%95%AA/80b0cf8a-e60b-4896-a372-4a490f6e39f0

QEXCELで集計する数式について

EXCELで集計する最も最適な数式があれば教えてください。

シート①の表を別のシートに集計して反映させる数式があれば教えてください。

現在はイコールを使って別シートに反映させてますが、集計量が多くなり簡単に対応できなくなってしまい、困っています。
よろしくお願いします。

Aベストアンサー

B1セルに 0
C1セルに =COUNTIF($C$3:C8,"<>0")
右へオートフィル

A14セルに
=IF(ROW(A1)>$F$1,"",INDEX($C$2:$F$2,MATCH(ROW(A1)-1,$B$1:$F$1)))
B14セル
=IF(A14="","",INDEX(A:A,SMALL(IF(INDEX($C$3:$F$8,,MATCH(A14,$C$2:$F$2,0))>0,ROW($C$3:$C$8)),COUNTIF($A$14:A14,A14))))
[Ctrl]+[Shift]+[Enter]配列数式、{}で囲まれる。
C14セル
=IF(A14="","",INDEX($B$3:$B$8,MATCH(B14,$A$3:$A$8,0)))
D14セル
=IF(A14="","",INDEX($C$3:$F$8,MATCH(B14,$A$3:$A$8,0),MATCH(A14,$C$2:$F$2,0)))
A14:D14セル 下へオートフィル

Q「年月」ごとにカウント

お世話になっております。

C列には、『初回入会年月日』として入力しております。
E列から右方向へ、「2017年1月」を始めとし「年月」を表記しております。
この「年月」ごとの欄に、C列に列記している「初回入会年月日」を検索して
該当する「年月」の件数を表示させる仕組みです。

例えば、図表から
C列の「初回入会年月日」には、

「2017年1月17日」
「2017年1月19日」
「2017年1月17日」
「2017年1月31日」

1月には4件あり、それをE2に、「4」と表示させるといった感じです。

C列の「初回入会年月日」を検索し、該当する「年月」の件数を表示させる関数式を教えてください。
m(__)m

※補足説明
・C列の表示形式は、「2017/○/○」と打込み、ユーザー定義「yyyy"年"m"月"d"日"」で設定しております。
・「年月」の項目の表示形式は、年頭の「2017/1/1」と入力してユーザー定義で
「yyyy"年"m"月"」と設定し、
 2月以降は、「2017/2/1」と打ち込み、それをユーザー定義「m"月"」で設定
・C列のデータ件数 500件 $C$2:$C$501

お世話になっております。

C列には、『初回入会年月日』として入力しております。
E列から右方向へ、「2017年1月」を始めとし「年月」を表記しております。
この「年月」ごとの欄に、C列に列記している「初回入会年月日」を検索して
該当する「年月」の件数を表示させる仕組みです。

例えば、図表から
C列の「初回入会年月日」には、

「2017年1月17日」
「2017年1月19日」
「2017年1月17日」
「2017年1月31日」

1月には4件あり、それをE2に、「4」と表示させるといった感じです。

C列の「初...続きを読む

Aベストアンサー

No.2・3です。

まずNo.2の方に関して・・・
SUMPRODUCT関数の範囲内に「文字列」が含まれているというコトはないですか?
文字列が含まれている場合はエラーになります。

No.3に関して・・・
C列と1行目の日付はどちらもシリアル値になっているのですよね?
そして1行目の日付はすべて各月の1日のシリアル値だというコトなのであのような数式にしました。

お示しの画像通りの表を手元のExcelで確認し、投稿した数式です。

こちらではE2セルにちゃんと「4」が表示されています。

※ 502行目以降に数値データがあるととんでもない結果が返るコトがあります。
No.3の数式の範囲を501行目までに限定し
=COUNTIFS($C2:$C501,">="&E1,$C2:$C501,"<"&EDATE(E1,1))

としたらどうなりますか?m(_ _)m

Qエクセル SUMPRODUCT関数について

SUMPRODUCT関数を使い、以下の合計を件数を出したいのですが、いろいろ調べてもよくわかりませんのでご教示をお願いいたします。(エクセル2010使用)

【やりたいこと】
以下の表を使用し、「みかん」と「ばなな」を購入した件数を月ごとに合計して表示する関数を作りたい。4月の合計件数はB8セル、5月はB9セル、6月はB10セルに表示できるようにします。

     (A列)  (B列)
(行) 種類  購入日
 1  みかん 4月3日
 2  ばなな 4月15日
 3  りんご 5月6日
 4  りんご 5月30日
 5  ばなな 6月7日
 6  みかん 6月9日
 7
 8 【結果】 4月 2
 9      5月 0
10      6月 2

よろしくお願いします。

Aベストアンサー

こんにちは!

今回の質問の場合は「OR」条件になりますので、足し算にする必要があります。

↓の画像ではA8~A10セルの表示形式をユーザー定義から
0月
とし、単に4とか5という数値のみを入力しています。

B8セルに
=SUMPRODUCT((MONTH(B$1:B$6)=A8)*(A$1:A$6="みかん"))+SUMPRODUCT((MONTH(B$1:B$6)=A8)*(A$1:A$6="ばなな"))

という数式を入れフィルハンドルで下へコピーすると
画像のような感じになります。m(_ _)m

Qexcelで条件に合うよう、複数のセルの合計を求めたい

例えば、次のように並んでいるセルの数値があるとします。

1515
2748
540
5509
2195
680
7142
305
5042
530
667
325
9950
4800

その合計が30000以上で、かつ、最小の数字となるよう、複数のセルを選択したいと思いますが、これを実現できる関数はありますか?

Aベストアンサー

いわゆる「ナップザック問題」と呼ばれる種類の問題になると思います。

14個を選択する/しないなら、総当りしても16384個ですから、力技でも行けるかも。
画像を参考に、
1行目にデータの数値を横並び。
2行目に0~13の固定値を右から
3行目に2の0乗~2の13乗(8192)の固定値を右から
A列に0~16383の固定値
で、

B4:O16387の範囲に、
B4:=MOD(INT($A4/B$3),2)
をコピペして2進数の各桁の値を

P4:P16387の範囲に、
P4:=SUMPRODUCT($B$1:$O$1,B4:O4)
をコピペして、2進数の各桁のビットとデータの数値の積和

で、全16384通りの計算が行われるので、A4:末尾を選択して並べ替えすると、
合計が30002となる、
1515
2748
2195
680
7142
305
667
9950
4800
が確認できるとか。

--
もっと数値の数が増えると、この方法では厳しいので、

ナップザック問題をExcelで解く
http://www.geocities.co.jp/SiliconValley-Oakland/8139/

みたいなプログラムで解くような事になります。


条件が違うのでプログラムはそのまま使えませんが、似た質問。

エクセルで、「袋詰め問題」を解きたい - Excel(エクセル) 解決済 | 教えて!goo
https://oshiete.goo.ne.jp/qa/1255891.html

いわゆる「ナップザック問題」と呼ばれる種類の問題になると思います。

14個を選択する/しないなら、総当りしても16384個ですから、力技でも行けるかも。
画像を参考に、
1行目にデータの数値を横並び。
2行目に0~13の固定値を右から
3行目に2の0乗~2の13乗(8192)の固定値を右から
A列に0~16383の固定値
で、

B4:O16387の範囲に、
B4:=MOD(INT($A4/B$3),2)
をコピペして2進数の各桁の値を

P4:P16387の範囲に、
P4:=SUMPRODUCT($B$1:$O$1,B4:O4)
をコピペして、2進数の各桁のビットとデータの数値の積...続きを読む

QExcel2010 郵便番号変換ウィザードがエラーになる

住所録から郵便番号を降り出したく、郵便番号ウィザードをインストールしましたが
「郵便番号変換エンジンが見つかりません」とでます。
ネットでさまざまな事例を検索してみましたが、原因がわかりません。
どなたかご教授いただけませんでしょうか

・windows7 32ビット版
・office standard 2010 32ビット版
・Excelアドイン郵便番号変換ウィザード
 http://excelzipcode7japan.codeplex.com/releases/view/48005
・Microsoftのホームページから最新の郵便番号辞書へ更新(2014年11月版)

宜しくお願いします。

Aベストアンサー

アドインを使用するために
こちらから32bit用の zd201305.exe をダウンロードします。
http://web.archive.org/web/20140209020157/http://www.microsoft.com/ja-jp/download/details.aspx?id=973
ダブルクリックするとインストールが行われます。
アドインの zipcode7.xla がC:\Program Files (x86)\Microsoft Office2010\Office14\Library
にあることを確認。
アドインが使用する郵便番号辞書とIME2010の郵便番号辞書とは別物です。
http://www.h3.dion.ne.jp/~sakatsu/TelPost.htm#IME_ZIP
白里市は出てきましたが2013年から更新は行われていないので・・・。

QExcelについて教えて頂きたいのですが。縦に1~10行あり、名前あり、例えば5番目の方が休みの時に

Excelについて教えて頂きたいのですが。縦に1~10行あり、名前あり、例えば5番目の方が休みの時に自動的に5番目の行の所に下から詰める方法はありますか?

Aベストアンサー

配列の確定をしない場合、こんなふうにできます。

=IFERROR(INDEX($A$1:$B$11,SUMPRODUCT(SMALL(ROW($A$1:$A$11)+($B$1:$B$11<>"")*100,ROW(A1))),1),"")

注意点
=IFERROR(INDEX($A$1:$B$11,
  $A$1:$B$11 ←全体の範囲/1行目から始まる
  
SUMPRODUCT(SMALL(
ROW($A$1:$A$11)+($B$1:$B$11<>"")*100,
  $A$1:$A$11 ,$B$1:$B$11 ←1行目から始まる

ROW(A1))),1),"")

つまり、計算上で出てくる「0値」の追い出しですね。

QIF、AND関数について

EXCEⅬの超初心者です。下記の表はA社の「支払い表」見本と、銀行の「振り込み料金表」です。この支払表に送料を表示させたくて、IF関数やAND関数で計算式を作りたいのですが、エラーばかり! どなたか助けていただけませんか!!

◇支払い表 ◇
支払先(口座名) 振込先   銀行番号/支店番号 口座番号 振込金額     送料
川田敦男    三菱東京UFJ/室町   0005/430 4683231 \60016  ?
小野田美奈子 三井住友/新宿西   0009/259 4030041 \27000  ?
田口たつ    みずほ/横浜駅前   0001/292 1207310 \9000  ?
株式会社テレパ みずほ/青山   0001/211 5675505 \31680   ?



◆当行同一支店内宛
3万円未満 216円
   3万円以上 432円

◆当行本支店宛
3万円未満 324円
   3万円以上 540円

◆他行宛(電信)
3万円未満 648円
  3万円以上 864円

EXCEⅬの超初心者です。下記の表はA社の「支払い表」見本と、銀行の「振り込み料金表」です。この支払表に送料を表示させたくて、IF関数やAND関数で計算式を作りたいのですが、エラーばかり! どなたか助けていただけませんか!!

◇支払い表 ◇
支払先(口座名) 振込先   銀行番号/支店番号 口座番号 振込金額     送料
川田敦男    三菱東京UFJ/室町   0005/430 4683231 \60016  ?
小野田美奈子 三井住友/新宿西   0009/259 4030041 \27000  ?
田口たつ    みず...続きを読む

Aベストアンサー

No4の続きです。
I2を順次下にコピペすると I3,I4と自動的に変わりまり、
    右にコピペすると J2,K2と自動的に変わります。
I2 は 相対セルの形式だから。
$I$2 の絶対セルの形式にすれば、どこにコピペしても$I$2は固定のまま変わりません。
詳しくは、参考書で相対セルと絶対セルの違いを確認してください。
G2に入力する式はI2,J2ではなく、$I$2,$J$2の絶対セルで回答してあります。

また
>小生は、IF(C2=100,IF(D2=1,・・・つまりCとDを振り出し銀行ナンバー、支店のナンバーを” ”で囲って(文字認識化)、この双方の文字に当てはまるもの、一つに当てはまるもの、すべてに当てはまらないもの、として選択しようとしていました。

この考え方で概ねよいですが、「一つに当てはまるもの」については
もしも他行の支店番号が貴方のみずほ銀行の支店番号と同じになることがあり得るなら
他行とみずほの判別を追加する必要があると思います。

Qエクセルで、すべての品が記載してある一覧表から個別の表を一度に印刷する方法が知りたい

エクセルで、すべての品が記載してある一覧表から個別の表を一度に印刷する方法が知りたいです。
画像の表1は、元のデータの例です。(実際には、200種類の品があります。)
画像の表2は、表1の「番号1、あい」だけを選択ペーストして作成した、「番号1、あい」のみの結果を示した表です。
画像の右半分のところには、マクロを示しています。このマクロだと、選択した品だけの印刷しかできません。
マクロは、

Sub Macro8()
'
' Macro8 Macro
' 表1の中で、希望する品がある行を選択し、マクロを実行すると、表2の形で印刷する。
'

'
Selection.Copy
Rows("13:13").Select
ActiveSheet.Paste
Range("A12:D14").Select
Selection.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
End Sub

です。
私は、番号1から番号5まで、個別の表を自動で一度に印刷したいです。これを実現する方法を教えてください。
どうぞよろしくお願いいたします。

エクセルで、すべての品が記載してある一覧表から個別の表を一度に印刷する方法が知りたいです。
画像の表1は、元のデータの例です。(実際には、200種類の品があります。)
画像の表2は、表1の「番号1、あい」だけを選択ペーストして作成した、「番号1、あい」のみの結果を示した表です。
画像の右半分のところには、マクロを示しています。このマクロだと、選択した品だけの印刷しかできません。
マクロは、

Sub Macro8()
'
' Macro8 Macro
' 表1の中で、希望する品がある行を選択し、マクロを実行す...続きを読む

Aベストアンサー

こんにちは

>私は、番号1から番号5まで、個別の表を自動で一度に印刷したいです
必要な行数分繰り返して処理をするようにすれば良いです。
繰り返しの、代表的な構文はfor~~nextですね

番号1~5の行分を繰り返す例
(行全体で処理するようにしてありますので、必要なら列を限定してください)
※ 番号1~5はエクセルの全体の3~7行に該当していますので、ループの制御は3~7にしてあります。

For rw = 3 To 7
 Rows(13).Value = Rows(rw).Value
 Rows("12:14").PrintOut
Next rw


>。(実際には、200種類の品があります。)
たった1行のデータを抽出して、200枚の出力を行うことの意味が不明ですが、
https://oshiete.goo.ne.jp/qa/9780519.html
の質問の部分質問のおつもりでしたら、出力範囲の指定をグラフを含めた範囲にしておくことが必要となるでしょう。

Qエクセル 数式を教えてください!

エクセルの数式を教えてください!

エクセルでタイムカードを作成しているのですが、休憩時間が2枠ある場合(①通常時間帯②深夜時間帯)の各時間(拘束時間・労働時間・日勤時間・通常残業・深夜
時間・深夜残業)の算出数式が分かりません。

画像のように、休憩時間は①通常時間帯と②深夜時間帯(22:00~5:00)の2枠あり、それぞれ合計時間を数値で入力します。
各時間帯の休憩時間がそれぞれ、
・拘束時間・労働時間・日勤時間・通常残業・深夜時間・深夜残業に反映させるようにしたいのですが、休憩が2枠あるため数式がうまくいきません。。

深夜帯(深夜時間・深夜残業)は22:00~5:00で、1日の労働時間が8時間を超えた場合に残業となります。

画像のように、【拘束時間・労働時間・日勤時間・通常残業・深夜時間・深夜残業】に適切な数値(出勤退勤はh:mmで入力し、その他は15分=0.25単位の数値)で計算されるようにしたいです!

賢者の皆様、どうか宜しくお願い致します!

Aベストアンサー

ANo3です。

>15分を0.25と数値で計算させる方法がわからないので
シリアル値は1日が1.0となるように計算しています。

シリアル値の時間をTとするなら
 =HOUR(T)+MINUTE(T)/60
とすることで、時間単位(15分は0.25時間)に該当する値を得られます。
例えば、3:15 → 3.25 となります。

上記の1日=1.0(1日=24時間)を利用すれば、もっと簡単に
 =T*24
とすることでも、同様の結果を得ることができます。

※どちらの場合も、表示書式は「数値」や「標準」としておく必要があります。


人気Q&Aランキング