サブを実行する前に、コレクションを使用して変数を0に設定しようとしています。私は別々のサブルーチンとしてすべてのメトリックを持っています。それぞれのサブについて、変数を長く宣言し、それらのすべてを0に設定してから、必要なデータを引き出すようにします。毎回0に設定する必要はありませんが、冒頭や何かでそれらを等しく設定する必要があるので、各サブルーチンに入れる必要はありませんが、どのようにするかは不明ですそれをする。私はこのコードを試みたが、それも遠隔から右であるか、それをどこに置く場合、私は考えている。その後、VBA内の複数のサブルーチンで変数を0に設定する
Dim myVars As Collection
Set myVars = New Collection
Dim j As Variant
myVars.Add a
myVars.Add b
myVars.Add c
myVars.Add d
myVars.Add e
For j = 1 To myVars.Count
myVars(j) = 0
Next j
グローバル変数の場合は、他の各サブファイルの上部で実行する新しいサブセットSetToZero()を作成することができます。 – dashnick
'j'はループカウンターで、' variant'と宣言しないでください!そうすることで、後でコードを見て混乱するだけでなく、わずかなパフォーマンス上のペナルティが発生します。「j」を使うたびに、VBAはそれに含まれるデータの_タイプ_を判断する必要があります。 5項目のループではそれほど大したことではありませんが、コードベースが拡大するにつれて追加が始まります。なぜコードが永久に実行されるのか不思議に思うでしょう。 – FreeMan
jにオブジェクトが必要なエラーがある場合はどうすればいいですか? – beks123