Excel ファイルを開かずに自動更新する方法 (2 つの簡単な方法)

多くの場合、ユーザーは揮発性関数またはクエリ接続を含む Excel ファイルの自動更新を必要とします。 VBA マクロのみ Excel ファイルを開かずに自動更新します。自動更新のクエリ接続は、閉じたファイルの自動更新をサポートしていません。 Query Connection プロパティは、特定の設定間隔の後に、開いている Excel ファイルのデータのみを自動更新できます。プロセスは、別の xlsm Excel ファイルはマクロを実行して、割り当てられた閉じた Excel ファイルを自動更新します。この記事では、2 つのマクロを適用して Excel ファイルを開かずに自動更新する方法を示します。

Excel ワークブックをダウンロード

ヘルパー マクロ Excel ファイル マクロを実行して、ターゲット ファイルまたはファイルを自動更新します。

開かずに Excel ファイルを自動更新する 2 つの簡単な方法

別の Excel ファイルは、割り当てられた Excel ファイルを開いて閉じるマクロを実行し、開いて自動更新します。 「カウントダウン」以来 ” Excel ファイルには、開いたときに更新される関数が含まれています。

次のセクションに進んで、Excel ファイルを自動的に更新できるようにします。

方法 1:VBA マクロを使用して、開かずに特定の Excel ファイルを自動更新する

カウントダウン Excel ファイルには TODAY() があります と NOW() カウントダウンをリアルタイムでカウントする関数。ファイルを開かずに関数の値を自動更新したい.

手順: 別の Excel ファイルを使用して Visual Basic モジュールを挿入する (Alt+F11 > 挿入>モジュール または開発者 タブ> ビジュアル マクロ> 挿入>モジュール ）。モジュールに、次のマクロを貼り付けます。

Public Sub AutoRefreshClosedFile()
FilePath = "C:\Users\maruf\Desktop\Softeko\Auto Refresh Excel File Without Opening\Countdown"
 With Application
 .DisplayAlerts = False
 .ScreenUpdating = False
 .EnableEvents = False
 .AskToUpdateLinks = False
 End With
Workbooks.Open FilePath
ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources
ActiveWorkbook.Close True
 With Application
 .DisplayAlerts = True
 .ScreenUpdating = True
 .EnableEvents = True
 .AskToUpdateLinks = True
 End With
End Sub 
 

マクロの説明

• ファイル パスを設定する 自動更新用のデバイス内。
• VBA WITH ステートメントは、ファイルを変更しないように複数のコマンドを実行します。

With Application
        .DisplayAlerts = False
        .ScreenUpdating = False
        .EnableEvents = False
        .AskToUpdateLinks = False
 End With

• 開く 割り当てられたファイルを開きます。
• 閉じる 開いているファイルを閉じます。
• 別の VBA WITH 自動更新後にファイルを更新します。

• F5 を押します マクロを実行します。 Excel が Countdown.xlsx を開きます ファイル。ファイルには TODAY() などの揮発性関数が含まれているため と NOW() 、バックグラウンドで開いたときにファイルが自動更新されます。ファイルを再度開くと、結果を確認できます。

⧭ヒント: ユーザーが開いている Excel ファイルを自動的に自動更新する必要がある場合は、次のマクロを使用するか、コマンドでマクロ行のみを使用します。もちろん、 範囲 を変更します (つまり、 A1:D14 ) と自動更新のタイミング (例:"s", 30) ) Application.OnTime を使用

Sub AutoCalculationRange()
Range("A1:D14").Calculate
Application.OnTime DateAdd("s", 30, Now), "AutoCalculationRange"
End Sub

続きを読む: VBA を使用して Excel シートを自動的に更新する方法 (4 つの方法)

類似の読み物

• Excel で VBA を使用せずにピボット テーブルを自動更新する方法 (3 つの賢い方法)
• [修正済み!] ダブルクリックしないと Excel セルが更新されない (5 つの解決策)
• Excel でグラフを更新する方法 (2 つの効果的な方法)
• ソース データが変更されたときにピボット テーブルを自動的に更新する方法

方法 2:フォルダー内のすべての Excel ファイルに対して自動更新を実行する

方法 1 の代替 、ユーザーはフォルダー内のすべての Excel ファイルを自動更新できます。このマクロを実行すると、ユーザーが開くことができるようになり、割り当てられたフォルダー内の Excel ファイルが自動更新されます。

手順: 前のマクロを後者のマクロに置き換えます。

Public Sub AutoRefreshFolder()
Dim mrf As Object
Dim mfolder As Object
Dim mfile As Object
mPath = "C:\Users\maruf\Desktop\Softeko\Auto Refresh Excel File Without Opening\"
Set mrf = CreateObject("Scripting.FileSystemObject")
Set mfolder = mrf.GetFolder(mPath)
 With Application
 .DisplayAlerts = False
 .ScreenUpdating = False
 .EnableEvents = False
 .AskToUpdateLinks = False
 End With
 For Each mfile In mfolder.Files
 If Right(mfile.Name, 4) = "xlsx" Or Right(mfile.Name, 3) = "xlsx" Then
 Workbooks.Open mPath & mfile.Name
 ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources
 ActiveWorkbook.Close True
 End If
 Next
 With Application
 .DisplayAlerts = True
 .ScreenUpdating = True
 .EnableEvents = True
 .AskToUpdateLinks = True
 End With
End Sub

 

マクロの説明

• 変数を オブジェクト として参照します .

Dim mrf As Object
Dim mfolder As Object
Dim mfile As Object

• mPath を設定します 特定のフォルダーを提供します。
• VBA WITH ステートメントは、ファイルを変更せずに複数のコマンドを実行します。
• VBA FOR およびIF 各 xlsx に移動します ファイルをリモートで開いたり閉じたりする

 For Each mfile In mfolder.Files
    If Right(mfile.Name, 4) = "xlsx" Or Right(mfile.Name, 3) = "xlsx" Then
            Workbooks.Open mPath & mfile.Name
            ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources
            ActiveWorkbook.Close True
    End If
 Next

• 最後に、マクロは VBA WITH を使用してファイルを自動更新します .

• 実行に移動> Sub/UserForm F5 を実行 フォルダー内のファイルを自動更新します。ファイルを開くには、F9 を押します アクティブなワークシートを更新します。最後に、方法 1 と同様の結果 達成されます。

続きを読む:Excel で VBA を使用せずにピボット テーブルを自動更新する方法 (3 つの賢い方法)

結論

この記事では、Excel ファイルを開かずに自動更新するマクロ バリアントについて説明します。これを行うには、説明されているマクロのいずれかを使用します。これらのマクロが xlsx を開くことを願っています

私たちの素晴らしいウェブサイト、Exceldemy をチェックしてください。 Excel に関する興味深い記事を見つけることができます。

関連記事

• [解決済み]:保存するまで Excel 数式が更新されない (6 つの解決策)
• Excel でバックグラウンド更新を無効にする方法 (2 つの便利な方法)
• Excel でピボット テーブルを更新する方法 (4 つの効果的な方法)
• Excel でピボット テーブルを更新する VBA (5 つの例)
• Excel で 5 秒間隔で自動更新する方法
• ピボット テーブルが更新されない (5 つの問題と解決策)
• Excel でピボット テーブルを自動更新する方法 (2 つの方法)