excel中用vb批量修改工作表?

一个工作簿内有33个工作表。其中第一个工作表命名为:100。后面工作表命名从1-32依次命名。第一个工作表100为台账,现在想把台账中的每一个依次按纵向排列的不同数据,放入后面32个表中相同位置。应该怎么编写代码,求大神指点。

excel中用vb批量修改工作表,根据你的补充描述和图片信息来看,可以直接使用Excel自带的VBA功能来完成,只有你简单的懂一点就可以了。
首先第一张表为总表,第二张表做一个模板表,如图一:
具体操作步骤如下:
1、按Alt+F11组合键进入VBA编辑器;
2、依次单击“插入”--“模块”,在模块中进行书写代码,写完了之后按F5执行代码即可。代码如下:
Sub 宏1()
Dim i
For i=1 to 32
Sheets(2).Copy After:=Sheets.Count
Sheets(i+2).Name=i
Sheets(i+2).Range(“B4”)=Sheets(1).Range(“A3”)
继续添加代码
Next
End Sub
图一如下:



代码及代码解释图如下:

温馨提示:答案为网友推荐,仅供参考
第1个回答  2020-03-24
需要定制的,可以建立新的沟通渠道上传文件。私信我或评论后我私信你。不免费。
相似回答