I am using this code in a very large vb project, but I isolated the problem area:
Sub Test()
Dim CondCount1 As Integer
Dim CondCount2 As Integer
Dim vCondCount As String
Dim AssignCount As Integer
CondCount1 = 26
CondCount2 = 30
For i = 1 To Worksheets.Count -...