Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

33032 / 76734

←次へ　｜　前へ→


	【48928】Re:マクロを実行させない方法

福神漬 - 07/5/16(水) 12:04 -


	引用なし

	パスワード

▼Jaka さん：
>>下記のコードがvisualBasicのウィンドウ上に出てきてしまいます
>意味がよく解ってないけど、多分。
>
>>　　If Dir(strFileName) <> "" Then
>　　 Application.EnableEvents = False
>>　　Set WB = Workbooks.Open(strFileName)　'←ステップインしていくとここでウィンドウが切り替わってしまいます。

ありがとうございました。無事、回避できました。

立て続けの質問で申し訳ないのですが、教えて下さい。。
その後のWBの取得ができません。。
コードの書き方が違っているでしょうか？
"アプリケーション定義またはオブジェクト定義のエラーです"
となってしまいます。

　　Application.EnableEvents = False
　　Set WB = Workbooks.Open(strFileName)
　　　　r2 = Range("J65536").End(xlUp).Row
　　　　If AutoFilter = False Then
　　　　With WB.Worksheets("EX").Range("B:AC" & r2)"←この行でエラーになってしまいます。
　　　　.AutoFilter field:=1, Criteria1:="ユーザー"
　　　　End With

宜しくお願い致します。

6 hits

▼

【48925】マクロを実行させない方法 福神漬 07/5/16(水) 11:42