1

私は通常、複数のワークブック (5、6、7 以上) を同時に作業しており、これが通常、コンピューターを再起動するのを思いとどまらせています。最近行ったワークブックを保存して閉じてから再度開くという面倒な作業はしたくありません。取りかかっている。Excel が、プログラムを終了する前に開いていたブック (すべてのブックを一度に) を記憶し、次に Excel を起動したときにそれらのブックをすべて開くオプションがあるかどうか疑問に思っています。基本的に、これは「セッションの復元」になります。一番上にチェリーを追加するには、すべてのワークブックを開きたくない場合に備えて、起動時にどのワークブックを開くかを選択するように促すチェックリストがあると便利です。どんな助けでも大歓迎です！

4

3 に答える 3

0

あなたができることは、別のワークブックを作成することです。これは、オープン クローズ ワークブックになります。次に、次の行に沿っていくつかのコードを使用できます

Dim wb as Workbook
Dim TotalNum as Long
For Each wb in Application.Workbooks
    TotalNum = TotalNum + 1
    Range("A" & TotalNum) = wb.FullName
    If wb.Name <> ActiveWorkbook.Name Then
        wb.close
    End If
Next wb

このコードは、ブックで開いている各ファイルの場所を書き出します。開いているすべてのワークブックも閉じられることに注意してください。そうしたくない場合は、そのwb.close行を削除してください。

次のコードは、前のコードによってシートに書き込まれたすべてのワークブックを開きます。

Dim wb as Workbook
For i = 1 to Range("A" & Rows.Count).End(xlUp).Row
    Set wb = Workbooks.Open(Range("A" & i))
Next i

これをどのように使用するかは、空のブックを作成し、2 つのコマンド ボタンを配置することです。1 つは [開いているワークブックを保存] ボタンで、もう 1 つは [保存したワークブックを開く] ボタンです。次に、[開いているワークブックを保存] ボタンをクリックし、現在のワークブックを保存し、コンピューターを再起動して、2 つのボタンを配置したワークブックを開き、[開く] ボタンをクリックします。これでうまくいくはずです。

于 2015-04-27T20:56:14.663 に答える