學到的第一個VB程序：如何自動創建目錄--

Sub ml()Dim sht As Worksheet,i&,strShtName$Columns(1).ClearContents'清空A列數據Cells(1,1)="目錄"'第一個單元格寫入目錄i=1'將i的處置設為1For Each sht In Worksheets'循環當前工作簿的每個工作表strShtName=sht.NameIf strShtName<>ActiveSheet.Name Then'如果sht的名稱不是當前工作表的工程則開始在當前工作表建立超鏈接i=i+1'累加工作表數量ActiveSheet.Hyperlinks.Add anchor:=Cells(i,1), _Address:="", SubAddress:="'" & strShtName & "'!a1",TextToDisplay:=strShtName'建超鏈接End IfNext End Sub

但是里面有些代碼不是很理解，比如?!a1?是什么意思？VB中不區分大小寫

工作時自己琢磨著玩，還想了一下別的需求

1、采用excel表中的某一單元格中的內容命名該excel表--------猜測可能需要用到Python

2、合并多個excel表在一個文檔中

3、創建目錄

4、按照固定格式分配各個表中的數據

總結

以上是生活随笔為你收集整理的Excel-VB学习的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。