if（Mid（Cells（I，3），j，1））& gt；如果單元格中的數字大於5，則提取該數字。
！！把2改成1！！
此外:
……
for j = 1 to len（cells（I，3））‘j是第I行第3列單元格的第j個字符。
if（Mid（Cells（I，3），j，2））& gt；如果單元格中的數字大於5，則提取該數字。
行（壹）。“刪除”然後刪除該行。
如果…就會結束
退出為應該加上這句話，否則會有錯誤！！！！
下壹個j
……
========================================
=妳的問題= =我的主題奉獻知識= =輝煌人生=
黑龍江張
========================================