
No.3ベストアンサー
- 回答日時:
>InStrRev(ThisWorkbook.Name, "分") - 1) とすれば、
【決定稿】5月 になるのは分かるのですが前方を削る場合もあるので
できたら知りたいです。
Left(ThisWorkbook.Name, _
InStrRev(ThisWorkbook.Name, ".") - 2) でも【決定稿】5月となりますね
参考サイトは広告があり少し分かり難いかも知れませんでしたが読まれましたでしょうか
4パターンサンプルを書きます。意味は確認しながら試してください。
おいおいと言う感じのものもありますが参考まで
ちなみに期待する値を取得するやり方は他にもあると思います
strName = ThisWorkbook.Name
= Replace(Left(strName, InStrRev(strName, ".") - 2), "【決定稿】", "")
= Mid(Left(strName, InStrRev(strName, ".") - 2), Len("【決定稿】") + 1, 2)
= Left(Mid(strName, InStr(strName, "】") + 1), InStr(Mid(strName, InStr(strName, "】") + 1), "分") - 1)
= Split(Left(strName, InStrRev(strName, ".") - 2), "】")(1)
ありがとうございます!教えて頂いたリンク先も拝見しました。
Excel関数でいう、left,right,mid等を応用すれば色んな抽出ができますよね。
Excelで比較的自由に扱えるのですが、VBAになった途端、よく分からなくなってしまいます・・・
サンプルまで教えて頂いてありがとうございます。
やりたいことができました。すごいです。
No.2
- 回答日時:
#1です
文字列の操作は文字数などやシンボルを探して演算する事が出来ます。
足し算引き算です。全体を右からシンボルまでを引けば左からシンボルまでが残ります。逆もしかりですね
文字列を操作できる関数は色々ありますので
申し訳ないのですが、参考サイトリンクを貼ります。
初めは分かり難いかも知れませんが
じっくり色々試して覚えるのが早道です。
http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/f …
No.1
- 回答日時:
こんばんは
With Range("A1")
.Value = Left(ThisWorkbook.Name, _
InStrRev(ThisWorkbook.Name, ".") - 1)
.Font.Name = "Meiryo UI"
.Font.Size = 18
End With
ありがとうございます!
試してみたら質問通りの結果が得られました。
InStrRevで実現できるのですね。勉強になります。
ですがまだ使いこなせてません・・・
もし可能ならお願いします。
【決定稿】5月分.xls というファイル名だった時、
5月 を抽出するにはどうすれば良いですか?
InStrRev(ThisWorkbook.Name, "分") - 1) とすれば、
【決定稿】5月 になるのは分かるのですが前方を削る場合もあるので
できたら知りたいです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【ExcelVBA】ファイル名をセル...
-
VB6.0で、フォームから、別のフ...
-
外部swfとして読み込ませると動...
-
別のアプリケーションのテキス...
-
VBScriptでMsgBoxのYesNoボック...
-
ホームぺージ制作で間違って重...
-
UWSCのBTN関数について。
-
Simulinkのサブシステムの完全...
-
VS2008 C# ボタンのテキストを...
-
RPG(AS400)の本、サイトってあ...
-
VBSでMid関数を使ったらエラー...
-
FLASHで使用するマスクやイラス...
-
テキストボックスの中身をリセ...
-
VB.NET2005 DataGridViewでレコ...
-
JavaScriptを利用して
-
VBAからPDFのテキストフィールド
-
ランダムな動きのスピード制御...
-
FLASHで脱出ゲームを作る時の、...
-
Pythonを使ってせん断応力図、...
-
透過pngの下に配置したボタンの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【ExcelVBA】ファイル名をセル...
-
static関数がmapファイルに載ら...
-
画像のズームアウト処理を行う...
-
マスクが表示されてしまう
-
flash MXで、画像を切り替える...
-
flashの中心点について
-
[MacOSX] 複数フレームワークを...
-
アクションスクリプトに画像を...
-
デバッグを行うと
-
PNG24を読み込むと色合いが薄く...
-
flashのシンボルの再利用方法は?
-
シンボル化解除の方法
-
不思議な水晶玉
-
Vistaの環境でMacromedia Flash...
-
五芒星は、悪魔崇拝とどういう...
-
Visual C++ システムシンボルセ...
-
シンボルの存在意義
-
FLASH上でのビットマップ画像の...
-
何故、画像がくっついてるんで...
-
Open officeのDrawのシンボル素...
おすすめ情報