在布局选项内为图表添加表头(标题),具体 *** 作步骤如下:
所需材料:Excel。
一、选中需要插入图表的单元格,插入一个需要的图表。
二、插入图表后,工具栏会添加设计、布局、格式三个选项,在这里点击“布局”。
三、进入布局选项后,点击“图表标题”,下拉菜单内点击“图表上方”。
四、这时就可以在插入的图表内添加一个标题,最后只需把标题文字改为自己需要的即可。
不知道楼主的表头具体指什么,模拟了一个例子,楼主看看有没有启发。
Sub 复制表头()Dim i%
i = Worksheets.Count
Do
If i = 1 Then Exit Do
Sheet1.[a1:e2].Copy Sheets(i).[a1] 'Sheet1中[a1:e2]的紫色区域为表头,复制到每个Sheet页里
i = i - 1
Loop
End Sub
代码的效果如下图:
For s = 1 To 4Sheets("Sheet" & s).Range("A1") = 姓名
Sheets("Sheet" & s).Range("B1") = 学号
Sheets("Sheet" & s).Range("C1") = 成绩
Next
或者
For Each s In Sheetss.Range("A1") = 姓名
s.Range("B1") = 学号
s.Range("C1") = 成绩
Next
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)