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で質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/01/26 09:50
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/06/04 09:39
- その他(Microsoft Office) エクセルのマクロについて教えてください。 5 2023/01/21 09:39
- Excel(エクセル) Excelの関数について教えてください。 5 2023/07/28 11:27
- Excel(エクセル) 【再度】Excelの関数について教えてください。 4 2023/07/28 13:06
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 11:27
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/07/01 12:54
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/01/27 13:15
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 12:30
- Excel(エクセル) 条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
このQ&Aを見た人はこんなQ&Aも見ています
-
賃貸で可能な古民家風レトロな部屋作りのコツ!改めて知る畳の高い機能性と魅力も紹介
畳の部屋を雰囲気のよい部屋に仕上げたい!賃貸住宅でもできる古民家風のレトロな部屋作りのコツを伺った。
-
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
【Excel VBA】取り込んだファイルのファイル名を取得するには?
Visual Basic(VBA)
-
-
4
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
5
エクセル 複数ファイルの一括セル入力
Excel(エクセル)
-
6
複数ファイルから特定シートのコピー
Excel(エクセル)
-
7
ブックを開かずに、フォルダ内にある複数ブックの、特定セルの値を抽出した
Excel(エクセル)
-
8
エクセル マクロ オートフィルの終点の指定について
Excel(エクセル)
-
9
excelのマクロで該当処理できなければ飛ばして進むにはどうすればよいのでしょうか
Visual Basic(VBA)
-
10
VBAで繰り返しコピーしながら下へ移動させる方法
Excel(エクセル)
-
11
【EXCEL】【VBA】空欄は飛ばして処理する方法を教えて下さい。
Excel(エクセル)
-
12
エクセルVBA 作業後に選択範囲を解除する方法
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
static関数がmapファイルに載ら...
-
合致するシンボル情報は見つか...
-
マウスの動きに合わせて画面を...
-
VBScriptでMsgBoxのYesNoボック...
-
【VB.NET】別Formのボタンが押...
-
C# chart controlの透過について
-
プログラミング、アーキテクチ...
-
ACCESSフォームで、入力から一...
-
Actionscriptでふわふわ感を再...
-
画面の範囲選択
-
アセンブリ言語のcasl2について...
-
'2465'指定した式で参照してい...
-
POIでのテキストボックス作成に...
-
C言語でのマウスを移動とマウス...
-
python ボタンを押すと複数の関...
-
photoshopで書いた四角の枠の中...
-
縦横比率のを変えずに画像のサ...
-
全てのテキストボックスをセル...
-
テキストエリア内の文字列にリ...
-
テキストファイルから読み込ん...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
YOASOBI
-
五芒星は、悪魔崇拝とどういう...
-
【ExcelVBA】ファイル名をセル...
-
シンボル化解除の方法
-
App store のマークってイルミ...
-
合致するシンボル情報は見つか...
-
ActionScriptでプルダウンメニュー
-
Open officeのDrawのシンボル素...
-
ソースファイルを追加すると、...
-
ブレーカーの電気シンボル
-
ESD保護区域等のシンボル入手先
-
static関数がmapファイルに載ら...
-
FLASHにホームページについて
-
Flashでの画像、フェードイン・...
-
共有ライブラリから読み込んで...
-
flashの中心点について
-
ムービークリップの基準点を途...
-
FlashMXで絵の反転を繰り返す動...
-
何故、画像がくっついてるんで...
-
iOSアプリ開発時の画像をFirewo...
おすすめ情報