ﾚｽ書き込み

ｽﾚへ戻る 写 ﾚｽ栞 ﾚｽ消

---

Excel VBA 質問スレ Part83

PC,ｽﾏﾎ,PHSは ULA べっかんこ 公式(ｽﾏﾎ) 公式(PC) で書き込んでください｡

名前
ﾒｰﾙ
引用切替：ﾚｽｱﾝｶｰのみ
>>417 > >>410 > Dirでワイルドカードが使えるので、こんな感じに仕上げてみた > ※ヒットするパスの例 → C:\Documents\A001\B000X1\Excel\20250717\FileABC001.xlsx > > HomePath = "C:\Documents" > SearchPath = "A???\B*\Excel\2025????\File*.xlsx" > > ResultPath = HomePath > SearchPathList = Split(SearchPath, "\") > For I = 0 To UBound(SearchPathList) > 　If Dir(ResultPath) <> "" Then > 　　ResultPath = "ファイルの下は何もないよ！" > 　　Exit For > 　End If > 　FolderName = Dir(ResultPath & "\" & SearchPathList(I), vbDirectory) > 　If FolderName = "" Then > 　　ResultPath = "そんなパスはないよ！" > 　　Exit For > 　End If > 　ResultPath = ResultPath & "\" & FolderName > Next > MsgBox "これかな？" & vbCrLf & ResultPath
ﾛｰｶﾙﾙｰﾙ SETTING.TXT

---

他の携帯ﾌﾞﾗｳｻﾞのﾚｽ書き込みﾌｫｰﾑはこちら｡書き込み設定で書き込みｻｲﾄの設定ができます｡
・ULA
・べっかんこ(身代わりの術)
・べっかんこ(通常)
・公式(ｽﾏﾎ)
・公式(PC)[PC,ｽﾏﾎ,PHS可]

---

書き込み設定(板別)で板別の名前とﾒｰﾙを設定できます｡

---

ﾒﾓ帳

(0/65535文字)

---

上下板覧索設栞歴

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.011s