vba - マスター テンプレート ファイルの VBA 編集セル

Question

テンプレート (XLT) に、新しいワークブックをディレクトリに保存するボタンがあります。ファイル名は、以前に使用されたものから自動インクリメントする必要があります。ドキュメントは時間の経過とともに移動/削除される可能性があるため、ディレクトリ検索に頼ることはできません。

新しいワークブックで実行されているコードから、テンプレート ファイルのセルを自動インクリメントすることはできますか?

Answer 1

テンプレートを保存できる限り、名前に値を保存できます (これらは範囲を保存するために最も一般的に使用されますが、定数を保存するために使用できます)。

名前を作成するときは、RefersTo 領域に範囲の代わりに値を入力するだけです。次に、次のようにアクセスできます。

Sub WhatsTheValue()

    Dim intValue As Integer

    intValue = Evaluate(ThisWorkbook.Names("NextValue").RefersTo)
    ThisWorkbook.Names("NextValue").Value = intValue + 1

    MsgBox intValue & vbNewLine & Evaluate(ThisWorkbook.Names("NextValue").RefersTo)

End Sub

このコードは、NextValue Name の現在の値を取得し、それを intValue 変数に割り当て、すぐに Name をインクリメントします。

もちろん、毎回テンプレートを保存する必要があります。複数のユーザーがテンプレートにアクセスしている場合、これにより問題が発生する可能性があります。