PDA

View Full Version : Urgent VBA Debugging help



helpers
08-09-2012, 08:04 AM
I have a script that shows me a runtime error 9.

' Iterates through lookup array
For i = 1 To MAX_NUM_OF_LOOKUP
' Adds sheets
'Worksheets.Add().Name = lookup(1, i)

'For i = 1 To MAX_NUM_OF_LOOKUP
temp = 1
For j = 1 To MAX_NUM_OF_ROWS
If Worksheets(WORKSHEET_NAME).Cells(j, COLUMN_NUMBER).Value = lookup(2, i) Then
For k = 1 To MAX_NUM_OF_COLUMNS
Worksheets(lookup(1, i)).Cells(temp, k).Value = Worksheets(WORKSHEET_NAME).Cells(j, k).Value
Next k
temp = temp + 1
End If
Next j
Next i
End Sub



The red line is highlighted. Can someone help fix this please.

Tinbendr
08-09-2012, 12:42 PM
You don't show where WORKSHEET_NAME or COLUMN_NUMBER is assigned.