Philips,
Strange, the code works fine on some sample data that I have compiled myself. Are you sure about the line number in error? Can you see (by hovering your cursor over the variables) what the values are at the moment of the error?
or replace the line with
Not as nice, but maybe less sensitive to problems in case for formula errors and so onIf .Cells(pvt_lng_RowNumber, pvt_lng_ColumnNumber).Value <> "" Then
Bookmarks