Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


48873 / 76732 ←次へ | 前へ→

【32788】Re:文字数の決まっていない文字列の選択について
回答  やっちん  - 05/12/22(木) 11:17 -

引用なし
パスワード
   ▼みぽりん さん:
こんにちは。
「InStrRev」を使ってはどうでしょうか?

Sub TEST()
  Dim lngLoc1 As Long
  Dim lngLoc2 As Long
  Const a = "\aaa\bbb\ccc\ファイル名.mpt"
  
  lngLoc1 = InStrRev(a, "\") + 1
  lngLoc2 = InStrRev(a, ".")
  MsgBox Mid(a, lngLoc1, lngLoc2 - lngLoc1)

End Sub
1 hits

【32787】文字数の決まっていない文字列の選択について みぽりん 05/12/22(木) 10:58 質問
【32788】Re:文字数の決まっていない文字列の選択に... やっちん 05/12/22(木) 11:17 回答
【32789】Re:文字数の決まっていない文字列の選択に... ichinose 05/12/22(木) 11:24 発言
【32790】Re:文字数の決まっていない文字列の選択に... こたつねこ 05/12/22(木) 11:24 発言
【32798】Re:文字数の決まっていない文字列の選択に... みぽりん 05/12/22(木) 13:31 お礼
【32804】Re:文字数の決まっていない文字列の選択... わさび 05/12/22(木) 13:58 発言
【32806】Re:文字数の決まっていない文字列の選択... みぽりん 05/12/22(木) 14:54 お礼

48873 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free