发布日期:2025-06-28 15:24 点击次数:104
6/7的磨砺题目,就剩下生成目次、将使命表调养成使命簿2个问题。
1.生成目次
最粗浅的才智还是借助手段。
图片
选拔沿途翰墨,复制到Excel,使命表称号就索求出来了。图片
如若需要超归并到分表,在近邻列开导公式即可。=HYPERLINK("#"&A2&"!a1","掀开")图片
还不错借助VBA。在最前边插入一个使命表,定名为目次。点开发用具,VB,插入模块,将代码粘贴进去,驱动。
图片
Sub 目次() Dim i As Integer For i = 1 To Sheets.Count '将表格的称号索求到a列 Range("a" & i) = Sheets(i).Name '创建超归并 Range("a" & i).Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _"'" & Sheets(i).Name & "'!a1", TextToDisplay:=Sheets(i).Name NextEnd Sub
2.将使命表调养成使命簿
女同做爱使用底下的代码就不错调养。
Sub 拆单干作表() Dim b As Worksheet Excel.Application.ScreenUpdating = False For Each b In Sheets b.Copy Excel.ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & b.Name & ".xlsx" Excel.ActiveWorkbook.Close Next Excel.Application.ScreenUpdating = TrueEnd Sub
VBA代码惟有学会怎样驱动就行,没必要太真切去沟通。
陪你学Excel,一世够不够?
一次报名成为VIP会员,通盘课程恒久免费学,恒久答疑,仅需 1500 元,待你加入。
报名后加卢子微信chenxilu2019,发送报名截图邀请进群。
推选:不骗你!VBA初学其实很粗浅
上篇:最佳用的统计神器,拖、拉几下全处理!
图片
作家:卢子在线av miss,清华畅销书作家,《Excel效果手册 早作念完,不加班》系列丛书首创东说念主,个东说念主公众号:Excel不加班(ID:Excelbujiaban)
本站仅提供存储办事,通盘施行均由用户发布,如发现存害或侵权施行,请点击举报。