参考代码
dim t as table = tables("表A")For i As Integer = 0 To t.rows.count Step 3 '间隔3行 msgbox(t.rows(i)("第一列"))Next
加好友 
发短信
Post By：2017/12/12 9:28:00 [显示全部帖子]
