Application defined or Object defined error

[vir]

Hi,

VBA macro which adds hyperlink into the spreadsheet was initially created in Excel 2003. I then saved that spreadsheet as excel 2010. Works perfectly fine for less data (row below 65k) but raises an error for anything greater than that. For instance, I have 70000 records, now macro runs fine and adds hyperlink to all 65532 records but then straight after it gets terminated with "Application defined or Object defined" error (number 1004). Following is the macro code. It would be really helpful if someone can help me



Sub AddHyperlinks()

Dim IDVal As Range
Dim IDQuant As Long
Dim CurrentSelection As Range

Range("A1").Select
Range(Selection, Selection.End(xlDown)).Select
Set CurrentSelection = ActiveWindow.RangeSelection
IDQuant = CurrentSelection.Rows.Count

For rownum = 2 To IDQuant
Set IDVal = Range("A" & rownum)
Range("J" & rownum).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
"http://www.nla-eclips.com/NLAAPI.dll/GetObject?ObjectID=" & IDVal, TextToDisplay:=CStr(IDVal)

Next rownum.

[JosephP]

do you actually mean 65532 exactly because that's actually less than the number of rows you had in 2003?

[Kyle123]

It may be an excel issue, but try this:

Please Login or Register  to view this content.

[vir]

Hi Joseph,

It always stops at row 65532 with stated error. I even deleted that particular row but still get same error

[vir]

Hi Kyle,

This update didn't work either.

[JosephP]

could you post a sheet?
any merged cells?