Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


10635 / 13644 ツリー ←次へ | 前へ→

【20683】重複データを検索 初心者 04/12/15(水) 1:03 質問[未読]
【20685】Re:重複データを検索 かみちゃん 04/12/15(水) 6:34 発言[未読]
【20686】Re:重複データを検索 初心者 04/12/15(水) 8:16 お礼[未読]
【20690】Re:重複データを検索 初心者 04/12/15(水) 11:13 発言[未読]
【20691】Re:重複データを検索 かみちゃん 04/12/15(水) 13:07 発言[未読]
【20694】Re:重複データを検索 Jaka 04/12/15(水) 14:06 回答[未読]
【20701】Re:重複データを検索 [名前なし] 04/12/15(水) 21:51 回答[未読]

【20683】重複データを検索
質問  初心者 E-MAIL  - 04/12/15(水) 1:03 -

引用なし
パスワード
   こんにちは、初心者です。
  A   B       C          D        E     F
1客番号 漢字名前  フリガナ      振込フリガナ   金額   個
2 1  鈴木太郎  スズキタロウ    アキヤマヤヨイ   2980   1
3 2  山本次郎  ヤマモトジロウ   タナカ イチロウ  5960   2
4 3  田中一郎  タナカイチロウ   マツイ ヒロキ   2980   1
5 4  秋山弥生  アキヤマヤヨイ   カコヒロフミ    8940   3
6 5  松井弘樹  マツイヒロキ    ヤマモトジロウ   11920   4
7 6  加古博文  カコ ヒロフミ   サトウヨシミツ   5960   2
8 7  佐藤義光  サトウ ヨシミツ  スズキ タロウ   2980   1


のようにABCはデータベースDEFは振込みのデータ、Fは一個2980円なので
注文個数を表しています。
私は初心者なので、プリントアウトし、マジックでチェックして入力を
しています。ABCの列は移動せず、Cのデータの横にC、Dが一致するようDEFを移動し(スペースがあったり、無かったりします。)
Bのセル(漢字名前)内にFの個数を自動で記入したいのですが無理でしょうか?
どなたか教えてください。
よろしくお願いいたします。

【20685】Re:重複データを検索
発言  かみちゃん  - 04/12/15(水) 6:34 -

引用なし
パスワード
   こんにちは。かみちゃん です。

> ABCの列は移動せず、Cのデータの横にC、Dが一致するようDEFを移動し(スペー
> スがあったり、無かったりします。)

結果としては、このようにしたいということですか?
客番号 漢字名前 フリガナ     振込フリガナ   金額 個
1   鈴木太郎 スズキタロウ   スズキ タロウ  2980  1
2   山本次郎 ヤマモトジロウ  ヤマモトジロウ  11920  4
3   田中一郎 タナカイチロウ  タナカ イチロウ 5960  2
4   秋山弥生 アキヤマヤヨイ  アキヤマヤヨイ  2980  1
5   松井弘樹 マツイヒロキ   マツイ ヒロキ  2980  1
6   加古博文 カコ ヒロフミ  カコヒロフミ   8940  3
7   佐藤義光 サトウ ヨシミツ サトウヨシミツ  5960  2

このときに、「フリガナ」と「振込フリガナ」のスペースを除去して一致するかど
うかの検索をすることでもいいのでしょうか?
ただし、この方法をとると、「スズキ タロウ」と「スズ キタロウ」は一致する
ものと判断してしまいますが、いいのでしょうか?

それであれば、一般操作でできます。
まず「フリガナ」と「振込フリガナ」のセルから、スペースを「長さ0の文字列」
に置換して、VLOOKUP関数で参照するという方法でできると思います。

>Bのセル(漢字名前)内にFの個数を自動で記入したいのですが無理でしょうか?

できると思いますが、必要性がわかりません。

【20686】Re:重複データを検索
お礼  初心者 E-MAIL  - 04/12/15(水) 8:16 -

引用なし
パスワード
   かみちゃん さん、おはよう御座います。
書き込み有難う御座います。下記の並び替えでOKですが、
説明が一つ不十分でした、振込フリガナの頭に(振込 スズキタロウとか
フリコミ スズキタロウ)と振込 フリコミ が記入されています。
>
>結果としては、このようにしたいということですか?
>客番号 漢字名前 フリガナ     振込フリガナ   金額 個
> 1   鈴木太郎 スズキタロウ   スズキ タロウ  2980  1
> 2   山本次郎 ヤマモトジロウ  ヤマモトジロウ  11920  4
> 3   田中一郎 タナカイチロウ  タナカ イチロウ 5960  2
> 4   秋山弥生 アキヤマヤヨイ  アキヤマヤヨイ  2980  1
> 5   松井弘樹 マツイヒロキ   マツイ ヒロキ  2980  1
> 6   加古博文 カコ ヒロフミ  カコヒロフミ   8940  3
> 7   佐藤義光 サトウ ヨシミツ サトウヨシミツ  5960  2
>
>このときに、「フリガナ」と「振込フリガナ」のスペースを除去して一致するかど
>うかの検索をすることでもいいのでしょうか?
>ただし、この方法をとると、「スズキ タロウ」と「スズ キタロウ」は一致する
>ものと判断してしまいますが、いいのでしょうか?

いいですー。出来るんですか?

>それであれば、一般操作でできます。
>まず「フリガナ」と「振込フリガナ」のセルから、スペースを「長さ0の文字列」
>に置換して、VLOOKUP関数で参照するという方法でできると思います。
>
>>Bのセル(漢字名前)内にFの個数を自動で記入したいのですが無理でしょうか?
>
>できると思いますが、必要性がわかりません。

の件ですが、一日100件近く発送するので名前の後ろに数量を
書き込み、1は一つの袋、2は二つの袋と住所のシールを張っています。
正直、私は初心者なので、このような高度な場所に投稿するのは場違い
と思いましたが、投稿いたしました、ど素人の私に操作の仕方を
教えていただけませんか?よろしくお願いいたします。

【20690】Re:重複データを検索
発言  初心者 E-MAIL  - 04/12/15(水) 11:13 -

引用なし
パスワード
   何度もスイマセンVLOOKUPはカタカナは使えないんでしょうか?

【20691】Re:重複データを検索
発言  かみちゃん  - 04/12/15(水) 13:07 -

引用なし
パスワード
   こんにちは。かみちゃん です。

> VLOOKUPはカタカナは使えないんでしょうか?

できます。
VBAは特に必要ではありません。一般操作関数です。
どのようにして、「カタカナは使えないのか」とおっしゃっているのでしょうか?

ちなみに、「スズキ タロウ」と「スズキタロウ」では一致しません。
なぜだかわかりますか?

「振込」と「フリコミ」がフリガナの前についているとのことですが、これも「長
さ0の文字列」に置き換えればいいです。
これも、一般操作関数SUBSTITUTE関数でできます。

名前あとに、個数を付けたいなら、一般操作関数CONCATENATE関数でできます。
また、A1に名前、B1に個数が入力してあれば、=A1&B1でもできます。

> 書き込み、1は一つの袋、2は二つの袋と住所のシールを張っています。

個数が2の場合は、2行にしたいということであるならば、VBAを使う必要が出てく
ると思います。

※今、出先なので、これくらいしか、コメントできません。すみません。

【20694】Re:重複データを検索
回答  Jaka  - 04/12/15(水) 14:06 -

引用なし
パスワード
   こんにちは。
こんなんでいいのか解りませんけど...。

まず、「置換え」にて
置換え文字 全角スペール、置換え後の文字 何も無し
置換え文字 半角スペール、置換え後の文字 何も無し

で、全角半角スペースを取って、下のようにしてください。

Sheet1として、
 A    B     C       D       E   F
客番号 漢字名前 フリガナ    振込フリガナ   金額  個
1    鈴木太郎 スズキタロウ  アキヤマヤヨイ  2980  1
2    山本次郎 ヤマモトジロウ タナカイチロウ  5960  2
3    田中一郎 タナカイチロウ マツイヒロキ   2980  1
4    秋山弥生 アキヤマヤヨイ カコヒロフミ   8940  3
5    松井弘樹 マツイヒロキ  ヤマモトジロウ  11920  4
6    加古博文 カコヒロフミ  サトウヨシミツ  5960  2
7    佐藤義光 サトウヨシミツ スズキタロウ   2980  1


Sheet2をこんな感じにして
 A    B     C       D       E   F
客番号 漢字名前 フリガナ    振込フリガナ   金額  個
1    鈴木太郎 スズキタロウ
2    山本次郎 ヤマモトジロウ
3    田中一郎 タナカイチロウ
4    秋山弥生 アキヤマヤヨイ
5    松井弘樹 マツイヒロキ
6    加古博文 カコヒロフミ
7    佐藤義光 サトウヨシミツ

D2に =C2
E2に =VLOOKUP($D2,Sheet1!$D$1:$F$8,2,0)
F2に =VLOOKUP($D2,Sheet1!$D$1:$F$8,3,0)
を入れ、D2:F2を選択して必要な所まで下にフィル。

【20701】Re:重複データを検索
回答  [名前なし]  - 04/12/15(水) 21:51 -

引用なし
パスワード
   >まず、「置換え」にて
>置換え文字 全角スペール、置換え後の文字 何も無し
>置換え文字 半角スペール、置換え後の文字 何も無し
>
>で、全角半角スペースを取って、下のようにしてください。
>
>Sheet1として、
> A    B     C       D       E   F
>客番号 漢字名前 フリガナ    振込フリガナ   金額  個
>1    鈴木太郎 スズキタロウ  アキヤマヤヨイ  2980  1
>2    山本次郎 ヤマモトジロウ タナカイチロウ  5960  2
>3    田中一郎 タナカイチロウ マツイヒロキ   2980  1
>4    秋山弥生 アキヤマヤヨイ カコヒロフミ   8940  3
>5    松井弘樹 マツイヒロキ  ヤマモトジロウ  11920  4
>6    加古博文 カコヒロフミ  サトウヨシミツ  5960  2
>7    佐藤義光 サトウヨシミツ スズキタロウ   2980  1

ここまでの手順はJakaさんと同じで、ここから

1)D〜F列を選択し、D列(振込フリガナ)を最優先キーにして昇順で並べ替えします。
2)A〜C列を選択し、C列(フリガナ)を最優先キーにして昇順で並べ替えします。
3)A〜F列を選択し、A列(客番号)を最優先キーにして昇順で並べ替えします。
4)C〜E列を選択し、非表示にします。

これじゃだめですかね?
これでいいのであれば、上の作業をマクロの記録で記録して自動化してしまうとか。

10635 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free