デバッグの助けが必要です。マクロは反復を実行しません。

Question

これは以前のスレッドで既に対処されている場合はまず謝ります。以下のマクロは最初の反復で停止し、私は理由を理解できません。

本質的に、cell（x、2）がtrueの場合はファイルを開き、falseの場合は何もせずに次の繰り返しに移動します。

Sub Stack_Daily() 

Dim x As Integer 

For x = 6 To 12 

If Cells(x, 2).Value = True Then 

Workbooks.Open Filename:=Cells(x, 6).Value 

End If 

Next x 

End Sub 

Answer 1

マクロはすべての繰り返しを実行します。

予想通りこれは動作します：

Sub Stack_Daily() 
    Dim x As Integer 
    For x = 6 To 12 
     Debug.Print Cells(x, 2).Value 
     If Cells(x, 2).Value = True Then 
      Debug.Print "Cell(" & x & ", 2)" & "=" & Cells(x, 6).Value 
     End If 
    Next x 
End Sub 

あなたの問題は、他の場所です。 （あなたのデータはおそらく）