Duplicate and empty record both condition are check and a not error this program

Journal_Number Base_Rate Memo_Amount Transaction_Reference Description
156700 1 0 OPERATB 1000 Room RF
156703 1 0 OPERAMKTSEG 3RD 3rd Party
156738 1 0 OPERAMGR PHYSICAL ROOMS
156749 1 0 OPERAMKTSEG BAR Best Available Rate
156754 1 0 OPERA AR AGING Opera Aging Summary

transaction reference duplicate data table available and excel data are not available but excel data are not available then error not shown both condition check and not error in then program

only check transaction reference check data table

assign (From d In dtData
Group d By k=d(“Transaction_Reference”).toString.Trim Into grp=Group
Where grp.Count >1
Select grp.toList).SelectMany(Function (x) x).CopyToDatatable

how to solution duplicate record check and excel are empty one program both condition how to satify plz

Duplicate record also find only excel is empty how its possible to second condition
to this program