那你可以套用狐爸的代码，改一下啊
For Each r As Row in CurrentTable.Rows r("选择行") = FalseNext
虽然用CurrentTable不太严谨，但在特殊情况下还是能用
别忘了判断一下 列是否存在
加好友 
发短信
Post By：2015/3/24 12:01:00 [显示全部帖子]
