Excel中進(jìn)行獲取工作表名稱(chēng)的操作技巧

Excel中進(jìn)行獲取工作表名稱(chēng)的操作技巧

　　使用Excel內(nèi)置的VBA工具來(lái)獲取工作表名稱(chēng)是怎么進(jìn)行的呢?具體該怎么就去操作?今天，學(xué)習(xí)啦小編就教大家在Excel中進(jìn)行獲取工作表名稱(chēng)的操作技巧。

　　Excel中進(jìn)行獲取工作表名稱(chēng)的操作方法一

　　vba自定義函數(shù)獲取工作表名稱(chēng)

　　打開(kāi)Excel工作簿文檔，按ALT+F11組合鍵進(jìn)入VBA編輯器窗口。

　　單擊“插入”菜單中的“模塊”命令。

　　復(fù)制下面的代碼，粘貼到模塊框中。

　　Function gname(x As Integer)

　　If x = 0 Then

　　gname = ActiveSheet.Name

　　ElseIf x > 0 And x <= Sheets.Count Then

　　gname = Sheets(x).Name

　　ElseIf x > Sheets.Count Then

　　MsgBox "超出范圍"

　　End If

　　Application.Volatile

　　End Function

　　然后關(guān)閉VBA編輯器，返回到Excel工作表界面，在A1單元格鍵入公式“=gname(ROW(A1))”，向下拖動(dòng)復(fù)制，直到出現(xiàn)0錯(cuò)誤為止。

　　Excel中進(jìn)行獲取工作表名稱(chēng)的操作方法二

　　vba獲取工作表名稱(chēng)

　　打開(kāi)Excel工作簿文檔，按下ALT+F11組合鍵，打開(kāi)VBA編輯器窗口。

　　單擊菜單欄上的“插入”——“模塊”。

　　將下面的代碼拷貝到模塊文本框中。

　　Sub vba獲取工作表名稱(chēng)()

　　For x = 1 To Sheets.Count

　　Cells(x, 1) = Sheets(x).Name

　　Next x

　　End Sub

　　按F5鍵或單擊工具欄的“運(yùn)行”按鈕即可實(shí)現(xiàn)用vba獲取工作表名稱(chēng)的效果。

　　關(guān)閉VBA編輯器窗口，返回Excel工作表界面，在A列我們就可以看到獲取到的工作表名稱(chēng)。