Sub 选择方法() Range("a1:a10").Select '因为没有写工作表名,则默认为活动工作表 End Sub Sub 复制方法() Sheet1.Range("a1:a10") = "王小涛_同學" '将值写入到a1----a10区域 Sheet1.Range("a1:a10").Copy Sheet2.Range("a1") '将表一的a1---a10内容复制到表2 End Sub Sub 删除方法() Sheets(2).Delete End Sub
转载请注明作者与出处:http://blog.csdn.net/u013511642 王小涛_同學
时间: 2024-12-26 07:37:31