Excel一鍵提取工作簿的后綴名（擴展名）技巧
經由過程VBA代碼和節制按鈕手藝實現經由過程一個按鈕開關節制就能獲得工作簿的后綴名。若是您對這方面感樂趣的話，不妨看看本篇教程。若有疑問或看法，隨時接待留言會商。
東西/原料
- Excel
方式/步調
- 1
本教程以新建的Excel文檔為例（肆意Excel文檔操作方式一樣），起首雙擊打開Excel文檔。
PS：打開軟件的其他體例可以參考以下鏈接：
20系統打開一個軟件應用的四種常用方式
- 2
建造一個節制代碼的節制器，本教程以插入一個外形為例。
PS：當然也可以插入圖片或ActiveX控件，具體操作體例可以參考以下鏈接：
34插入控件技巧
- 3
然后按下組合鍵Alt+F11切換到VBA界面。
PS：其他進入VBA界面的體例，可參考以下鏈接：
12打開的三種方式
- 4
進入VBA界面后，點擊菜單欄中的插入，選擇模塊。
- 5
在模塊窗口中復制粘貼以下代碼：
Sub Extension()
Dim m$, n$, k$, g$, s%, i%
k = ActiveWorkbook.Name
s = Len(k)
g = "."
i = 1
Do While m <> g
m = Mid(k, i, 1)
i = i + 1
Loop
n = Right(k, s - i + 1)
MsgBox n
End Sub
- 6
封閉VBA窗口，返回Excel窗口。為步調2中繪制的外形指心猿意馬宏。
- 7
點擊外形，即會彈窗顯示該工作簿的后綴名。
注重事項
- 若是對您有點幫忙，請幫手點個贊再走，感謝！
- 發表于 2018-05-22 00:00
- 閱讀 ( 1266 )
- 分類：其他類型
admin
0 篇文章
作家榜 ?
-
xiaonan123
189 文章
-
湯依妹兒
97 文章
-
luogf229
46 文章
-
jy02406749
45 文章
-
小凡
34 文章
-
Daisy萌
32 文章
-
我的QQ3117863681
24 文章
-
華志健
23 文章