~ 上傳‧分享‧網賺 ~
~ 免費上傳空間‧請即申請 Freak Share ~
~ 進入後請點選左上角 注冊 ! ~
~ 声明事项 ~
如各位想把以下本文章转贴 , 请记得要注明出处.
本文章之内容为本人之经验所写, 绝无抄袭成份, 特此声明.
由于图片制作需时, 所以更新会比较慢.
存放图片的 SHARE A PIC SERVER 可能读取速度较慢, 请耐心等待.
又是先看程序代码时间 ~
==================
Rows("1:1").Select
Selection.Delete Shift:=xlUp
Columns("A:A").Select
Selection.Delete Shift:=xlToLeft
==================
这是删除行或列的方法 , 很简单 , 只是跟增加的差一点点 , 不过 , 如果你用的是增加 , 那么程序代码就会是 XL DOWN 而不是 XL UP , 是 XL TO RIGHT 而不是 XL TO LEFT
==================
Rows("A1").Select
Selection.Delete Shift:=xlUp
Rows("A1").Select
Selection.Delete Shift:=xlToLeft
==================
情况一样 , 又是 XL UP 和 XL TO LEFT , 就是这样了 ~
( 对 , 我又在骗页面显示量 ~ 哈哈哈哈 ~ )
0 留言:
發佈留言