| |
こういう書き方を誰に教わったの?と聞く前に
>Selection.AutoFilter Field:=1, _
> Criteria1:=InputBox(Prompt:="適当に文字や数値を入力してみてください", _
> Title:="Let's Excel VBA", _
> Default:="ここに入力します", _
> XPos:=200, YPos:=100).Value, Operator:=xlAnd
↑
なんで、こんなの(.Value)がついているのでしょうか?
ずれていたので修正
1度、InputBoxの内容を変数に入れて、中身の判定をしないとエラーになりますよ。
キャンセルされたり、空だったりとか考えないのでしょうか?
また、オートフィルタに無いものだったりとか....。
InputBoxで検査すれば、使用例が見つかるんじゃないかと思います。
因みに
>Range("A1").Select
>Selection.AutoFilter
>Selection.AutoFilter Field:=1,
↓
>Range("A1").AutoFilter Field:=1,
|
|