
VBA初心者ですが、ブックを開いた際に、別のフォルダにあるエクセルファイル全てをバックグラウンドで開きたいと思い、下記のようなコードを書いたのですが、どこにApplication.ScreenUpdating = Falseを入力しても、別のフォルダにあるエクセルファイルが普通に開いてしまいます。
Sub Auto_open()
Const DIR_PATH = "\\あいうえお\"
Dim fl_name As String
fl_name = Dir(DIR_PATH & "\*.xls*")
If fl_name = "" Then
MsgBox "Excelファイルがありません。"
Exit Sub
End If
Do
Workbooks.Open _
Filename:=DIR_PATH & "\" & fl_name
fl_name = Dir
Loop Until fl_name = ""
End Sub
コードを理解していないと言われればそれまでですが、どうしたら上記のようなことができるようになるか、どなたかご教授いただけますか。
No.1ベストアンサー
- 回答日時:
こんにちは
Visible属性をFalseに設定することで、非表示にできます。
でも、一瞬は見えるみたいなので、ちらつきのもとになるようです。
http://www.itlab51.com/?p=5346

No.2
- 回答日時:
Application.ScreenUpdating = False とファイルを開くと言う事と何の関係があります??
「開くけ」とプログラムしてるから開くんです。
例えば、セルに値を代入するプログラムが有った場合、実行すると、セルに値が入って行くのが見えます。
セルを画面で描画するから・・・。
それを止めるのがApplication.ScreenUpdating = False。
セルが更新され値が描画されるのをストップする命令コードがApplication.ScreenUpdating = False。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) 集めたシートのシート名を変更したい。 下記のコードでサブフォルダにあるファイルのSheet3を集めて 6 2022/08/23 10:38
- Visual Basic(VBA) シートをコピーする下記記述でダイアログを用いた記述がわかりません?( A = Dir(ThisWor 4 2022/08/22 12:26
- Visual Basic(VBA) あるフォルダーのファイルを違う親フォルダーのサブフォルダーに移したい 11 2023/02/15 19:00
- Excel(エクセル) フォルダ内の全ブックのシート名を変更したい 7 2022/09/22 21:34
- Visual Basic(VBA) 入力ボックスが繰り返しポップアップして止まらない。 下記コードでファイル名の変更をしたいのですが、変 1 2022/09/08 11:27
- Visual Basic(VBA) ファイル名の右側を変更したい ファイル名:「1001日別売上」の左側へ「2022」を追加し、「202 6 2022/10/14 10:03
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/10 09:06
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
このQ&Aを見た人はこんなQ&Aも見ています
-
screenupdatingが機能しなくて困ってます
Visual Basic(VBA)
-
エクセル VBA実行中のApplication.ScreenUpdatingについて
Excel(エクセル)
-
Application.ScreenUpdatingがならなくなった
Visual Basic(VBA)
-
-
4
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
5
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
6
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
7
Application.ScreenUpdating=Falseを使うと・・・。
Access(アクセス)
-
8
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
9
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
10
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
11
Excelでマクロ実行中に画面を固定する方法
Visual Basic(VBA)
-
12
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
13
VBAでループ内で使う変数名を可変にできないか。
Visual Basic(VBA)
-
14
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
15
UserForm1.Showでエラーになります。
工学
-
16
マクロ実行後に別シートの残像が残り、オブジェクトが見えなくなる
Visual Basic(VBA)
-
17
エクセルVBA 作業後に選択範囲を解除する方法
Excel(エクセル)
-
18
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
19
ExcelのVBA。public変数の値が消える
Visual Basic(VBA)
-
20
VBAでワークシートを引数としてサンプル関数に渡したい
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Application.ScreenUpdating = ...
-
C言語でテキストを抽出
-
2つのpythonがあって、一方で...
-
pythonで実体参照文字を直す方法
-
VBAでPDFのコピーとリネームを...
-
VBAで特殊文字を出力したい
-
構造体の変数の値を、動的に取...
-
構造体の各データの表示につい...
-
文字列を1つの要素とした配列...
-
[python] 文字列を変数名として...
-
C言語 家系図
-
文字列の連結について
-
VBA他のブックから値のみ貼付す...
-
2次元配列定義後の、個々の要...
-
PHP+SQLiteでmax(id)が使えない?
-
[C#] string name = new ..
-
vscode 文字化け
-
Rubyによる大規模データ加工プ...
-
実行時エラー 3020の対策
-
Ruby : 引数にデフォルト地を指定
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Application.ScreenUpdating = ...
-
[python] 文字列を変数名として...
-
VBAでPDFのコピーとリネームを...
-
実行時エラー 3020の対策
-
パイソンプログラミング
-
ACCESS テキストボックスを隙...
-
コンボボックスのtag情報の取得...
-
構造体の変数の値を、動的に取...
-
vbaでxmlからNodeListでデータ...
-
UWSC:ポップアップウインドウ...
-
FindFirst を複数条件で検索
-
構造体の各データの表示につい...
-
エクセルVBA シート名の部分一...
-
【メモリ不足で落ちる(python)】
-
バッチファイル 戻り値
-
VB6のLSETをVB2005で実現するに...
-
C++ コマンドプロンプトでの入...
-
python、継承を確認するための...
-
PHP+SQLiteでmax(id)が使えない?
-
「*:*」って何を意味するのでし...
おすすめ情報