| |
▼レミ さん：
よくはわかりませんが、わかる範囲で。。。(^^;)
>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の A１＝2005/3/1 A２＝2005/3/31
>が mytuki1s=32631 mytuki1e=20578 となってしまうようです
>
>
|
|
popon
- 05/1/29(土) 21:17 -
