Excel VBA質問箱 IV

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

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


19908 / 76732 ←次へ | 前へ→

【62250】AdvancedFilterがうまくいきません
質問  hiro  - 09/7/4(土) 3:17 -

引用なし
パスワード
   よろしくお願いします。
EXCELは2003です。
AdvancedFilterを使い、指定列の中の重複しないデータを別シートに作成したいのですが、うまくいきません。
具体的には、作業明細シートの日付列(Columns(3))(表示形式:標準)に20090601などの数値が入っています。
どんな日付があるのか知りたくて、重複しない日付を日付集計1シートに取り出したいのですが、うまくいきません。
また、他に気になる点があります。criteriarangeがCriteriaRange、copytorangeがCopyToRangeとならないので、コードとして認識していないのかなと心配しています。
以下にコードを書きます。
Sub 日付抽出1()
Worksheets("作業明細").Range("A3").CurrentRegion.Columns(3). _
AdvancedFilter action:=xlFilterCopy, _
criteriarange:=Empty, _
copytorange:=Worksheets("日付集計1").Range("A3"), _
Unique:=True
End Sub
日付集計1シートは空の状態で実行しています。実行するとエラーにはなりませんが、日付集計1シートには何も表示されません。
また、日付集計1シートのセルA3の名前ボックスはExtractと表示されています。
よろしく、お願いいたします。

994 hits

【62250】AdvancedFilterがうまくいきません hiro 09/7/4(土) 3:17 質問
【62251】Re:AdvancedFilterがうまくいきません かみちゃん 09/7/4(土) 8:13 発言
【62252】Re:AdvancedFilterがうまくいきません hiro 09/7/4(土) 9:34 発言
【62254】Re:AdvancedFilterがうまくいきません かみちゃん 09/7/4(土) 13:47 発言
【62258】Re:AdvancedFilterがうまくいきません hiro 09/7/4(土) 19:09 お礼
【62256】Re:AdvancedFilterがうまくいきません kanabun 09/7/4(土) 15:53 発言
【62259】Re:AdvancedFilterがうまくいきません hiro 09/7/4(土) 19:38 お礼
【62257】Re:AdvancedFilterがうまくいきません kanabun 09/7/4(土) 16:50 発言
【62260】Re:AdvancedFilterがうまくいきません hiro 09/7/4(土) 20:25 お礼

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