Excel VBA質問箱 IV

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

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


59640 / 76732 ←次へ | 前へ→

【21776】Re:97でオートフィルターオプションに...
回答  popon  - 05/1/29(土) 21:17 -

引用なし
パスワード
   ▼レミ さん:
よくはわかりませんが、わかる範囲で。。。(^^;)

>Dim as mytuki1s Range
>Dim as mytuki1e Range

 Dim mytuki1s As Range
 Dim mytuki1e As Range の間違いかな?

でも、日付を入れるなら、
 Dim mytuki1s As Date
 Dim mytuki1e As Date でよいのでは?

したがって
 With Sheet("A")
  mytuki1s = Format(.Range("A1").Value, "yyyy/mm/dd")
  mytuki1e = Format(.Range("A2").Value, "yyyy/mm/dd")
 End With
とすればよいのでは?


>Sheets("B").Select   
 オートフィルターをかける範囲は?Sheets("B")のどの範囲?

>  Selection.AutoFilter Field:=6, Criteria1:=">=" & mytuki1s, Operator:=xlAnd, _
>    Criteria2:="<=" & mytuki1e
>===============================================================
>97で上記を実行するとシートAの A1=2005/3/1 A2=2005/3/31
>が mytuki1s=32631 mytuki1e=20578 となってしまうようです
>
>
2 hits

【21775】97でオートフィルターオプションに日付で絞り込む変数の扱いについて レミ 05/1/29(土) 19:50 質問
【21776】Re:97でオートフィルターオプションに... popon 05/1/29(土) 21:17 回答
【21777】Re:97でオートフィルターオプションに... レミ 05/1/29(土) 22:01 お礼
【21782】Re:97でオートフィルターオプションに... popon 05/1/30(日) 10:10 発言
【21840】Re:97でオートフィルターオプションに... レミ 05/2/1(火) 18:31 発言

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