【已解决】高手看下这个excel问题。。。

tcphong

一个100个工作表的EXCEL工作簿，现在想把每个工作表的A列数据用我已经准备好的其他数据进行覆盖，如何快速实现？谢谢！在线等答案

[ 本帖最后由 tcphong 于 2008-7-1 23:36 编辑 ]

pureshadow

Sub M()
Dim x As Long
For x = 1 To Sheets.Count
    Columns("F:F").Copy Destination:=Sheets("sheet" & x).Range("A1")
Next
End Sub

tcphong

谢谢你，牛人啊！学习了

liwen

不用代码：
全选所有工作表，然后在A列粘贴复制的数据即可。

pureshadow

LIWEN高啊......
我怎么把这最基础的操作方法给忘了......