人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

VBAについての質問です。拡張子名のないブック名を簡単に取得できる方法はないでしょうか?

ブック.name とやると、.xls までついてきます。文字列操作をすればできるのですが、関数一発にちかい方法はないでしょうか?

●質問者: kaiketsu
●カテゴリ:コンピュータ 科学・統計資料
✍キーワード:name VBA xls 拡張子 操作
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● Mook
●35ポイント

文字列で処理する方法もありますが、一応 FSO で拡張子を取得して処理する方法です。

With CreateObject("Scripting.FileSystemObject")
 MsgBox Replace(ThisWorkbook.Name, "." & .GetExtensionName(ThisWorkbook.Name), "")
End With

http://homepage2.nifty.com/pasocon/nyumon/filesystemobject/getex...

◎質問者からの返答

やはりちょっと面倒ですね。


2 ● code_tk
●35ポイント

一応FileSystemObjectのBaseNameを使用すれば一発?で可能ですが関数ではない気もしますし人によってはObject作るのがいやって人もいるので微妙かも

http://msdn.microsoft.com/ja-jp/library/cc428010.aspx

Set objFS = CreateObject("Scripting.FileSystemObject")

strBaseName = objFS.GetBaseName(Application.ThisWorkbook.Name)

MsgBox strBaseName

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ