Please add below code to "Ssexcelpivot._droppop" to avoid error :
1. When no cursor selected.
2. When cursor selected but cursor have zero record.
* Ssexcelpivot._droppop
If Empty(This._recordsource) Or Reccount(This._recordsource)=0
Messagebox("Nothing to do",0+64,"SsExcelPivot!")
Return
Endif
Warm regards,
mk.
1. When no cursor selected.
2. When cursor selected but cursor have zero record.
* Ssexcelpivot._droppop
If Empty(This._recordsource) Or Reccount(This._recordsource)=0
Messagebox("Nothing to do",0+64,"SsExcelPivot!")
Return
Endif
Warm regards,
mk.