Excel VBA質問箱 IV

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

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


55748 / 76736 ←次へ | 前へ→

【25755】Re:3つのコード合致の応用
回答  Hirofumi  - 05/6/13(月) 18:59 -

引用なし
パスワード
   >ご指摘とおりに修正し、
>実行したところ「Keyが重複しています」と表示されたので
>
>取得したいデータの入ったSheetに重複検索をかけると、
>数件の重複データが出力されました。
>
>出力されたデータを確認すると、
>Sheetには存在しないデータが重複行に表示されています。
>
>うまく説明できなくて、申し訳ありません。
>ご指導よろしくお願いいたします。

此れだけでは、何とも答え様が無いのですが?

1、コードのTable(dicIndex)を作成するのに、データを配列に取得しますが
 この取得列位置が、合っていますか?
 提示されたコードでは、

  'Sheet2のList先頭セルを指定(列見出しの左上隅)
  With Worksheets("Sheet2").Cells(1, "A")
    'データ行数を取得
    lngRows = .Offset(65536 - .Row).End(xlUp).Row - .Row
    If lngRows <= 0 Then
      strProm = "データが有りません"
      GoTo Wayout
    End If
    'データを配列に取得
    vntData = .Offset(1).Resize(lngRows, 3).Value
  End With

 と、成っていますので、Sheet2のA列、B列、C列を取得し
 Keyは、A列、B列で、前の「Dコード」に相当する所がC列と成ります

2、「取得したいデータの入ったSheetに重複検索をかけると、
 数件の重複データが出力されました。」と有りますが?
 重複検索とは、何を使って行いましたか?
 また、「出力されたデータを確認すると、Sheetには存在しないデータが
 重複行に表示されています。」と有りますが?
 「存在」とは、全然別の列のデータでか?、
 其れともA列、B列に有っても不思議では無いデータですか?

0 hits

【25723】3つのコード合致の応用 Lee 05/6/12(日) 0:22 質問
【25724】Re:3つのコード合致の応用 Hirofumi 05/6/12(日) 7:39 回答
【25733】Re:3つのコード合致の応用 Lee 05/6/13(月) 10:24 質問
【25755】Re:3つのコード合致の応用 Hirofumi 05/6/13(月) 18:59 回答
【25767】Re:3つのコード合致の応用 Lee 05/6/13(月) 23:47 質問
【25786】Re:3つのコード合致の応用 Hirofumi 05/6/14(火) 18:44 回答
【25787】Re:3つのコード合致の応用 Hirofumi 05/6/14(火) 18:58 回答
【25793】Re:3つのコード合致の応用 Lee 05/6/14(火) 22:15 お礼

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