[過去ﾛｸﾞ] Excel VBA 質問スレ Part82 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
973: 06/07(土)18:21 ID:QQtzQfGp(6/6) AAS
>>967
ShiteiNoMojiretsu = "指定の文字列"
Shitei = "指定"
Path = "C:\フォルダ1"
Path = Path & "\" & Dir(Path & "\*" & ShiteiNoMojiretsu & "*", vbDirectory)
Path = Path & "\" & Dir(Path & "\*" & ShiteiNoMojiretsu & "*", vbDirectory)
If Dir(Path & "\" & Shitei, vbDirectory) = "" Then
MkDir Path & "\" & Shitei
End If
974: 06/07(土)18:49 ID:NHsDgqoS(4/4) AAS
>>971
んー
でも、C#ではちゃんと動くので、VBA側の問題な気が…
クラスが変わってるのも知ってる。
975(1): 06/07(土)22:19 ID:I++ihMYF(2/2) AAS
>>970
やっぱりそうですよね
再帰処理を頑張って覚えます
976(2): 06/08(日)02:30 ID:bVJzS0fI(1/2) AAS
>>975
そやね
たったこれだけでフォルダ階層どこまでも潜れるのかと感動すると思う
（かもしれないw）
フォルダ再帰ができたら各全ファイル名列挙も再帰処理の中に追加しとき
いつか使う時が来る
977(1): 06/08(日)03:49 ID:kACuu3za(1) AAS
こんなので偉そうにする馬鹿
978(1): 06/08(日)10:13 ID:szoadHGe(1) AAS
>>977
わざわざ「私バカです」って手を挙げて出てきてどうした
979: 897 06/08(日)10:59 ID:BE7fUg1L(1/2) AAS
>>976
昔だったら stack overflowとか心配してたけど今はあまり気にしなくて良さそうだね
980(1): 06/08(日)11:01 ID:j4jIPbHU(1/2) AAS
.netのAPIラッパー関数もソース見ると大抵泥臭い事やってんのよね
981(1): 06/08(日)11:03 ID:4qkaLQIW(1) AAS
スタック領域は昔からほとんど変わってないから気にする必要はある
982(1): 06/08(日)11:07 ID:j4jIPbHU(2/2) AAS
Excel VBA 質問スレ Part83
2chｽﾚ:tech
983(1): 897 06/08(日)11:11 ID:BE7fUg1L(2/2) AAS
>>982
乙彼
>>981
共有サーバのアドレス変わった時、全フォルダの奥までショートカット探して書き換えたけど
何ともなかったからそんなもんだと思ってた
984(1): 06/08(日)12:43 ID:gXHyLlYW(1) AAS
>>976
再帰処理のコード自体はわかるのですが、If文で再帰処理をする、しないまでは考えてなかったです
985: 06/08(日)14:43 ID:bVJzS0fI(2/2) AAS
>>984
if?
途中から折り返す時のこと?
それなら必要
986: 06/08(日)16:28 ID:46RFXcFD(1) AAS
2階層しか掘らないのにわざわざ再帰処理にするかなぁ
987: 06/08(日)16:56 ID:DI4VVn6/(1) AAS
>>978
構ってもらうのも大変なんだぞ
察してあげなきゃ
988: 06/08(日)17:17 ID:8915HtnW(1) AAS
>>983
スタックさせたまま全ファイル走査なんてしないだろうから、
ファイルの数何個あろうが同じでは？
989: 06/08(日)19:19 ID:4BwIalv3(1) AAS
ソース的に簡単にするなら全ファイルのフルパス取って正規表現だな
990: 06/09(月)07:30 ID:UIpY0QNU(1) AAS
フォルダのショートカットファイルがある場合の動作確認はした方がいいぞ
991: 06/09(月)08:19 ID:EHQrQQev(1) AAS
シンボリックリンクとジャンクションとハードリンクも動作確認した方がいいぞ
パスが255文字超えた場合も動作確認した方がいいぞ
992(1): 06/10(火)20:52 ID:RKOrDLCJ(1) AAS
VBAのfor eachやfor nextでif文を使用して条件に合わなかった時にnext するにはどうしたらいいでしょうか？
993: 06/10(火)21:05 ID:94f6xD2K(1) AAS
forの中をDo-Loopで囲んで脱出したい時はExit Doする
994: 06/10(火)21:05 ID:zK5HBYNC(1) AAS
>>992
VBAでFor EachやFor Nextループ中に条件に合わない場合に次のループに進むには、If文を使い、条件が合致した場合のみ処理を記述します。
' For Each の例
For Each item In collection
If 条件 Then
' 条件に合った場合の処理をここに書く
End If
Next item
' For Next の例
For i = 1 To 10
省5
995: 06/10(火)21:17 ID:KLsW+s5l(1) AAS
next の手前にgoto
996: 06/10(火)21:35 ID:chtn5cci(1) AAS
gotoでnext前のラベルに飛ぶ。ラベルは
CONTINUE_1:
など
997: 897 06/10(火)21:41 ID:4RtejL7X(1) AAS
C言語の呪いから解けずにGoTo使いにくい俺
998: 06/10(火)21:55 ID:qJv58WHL(1) AAS
無理して使うもんじゃない
そもそもifで処理せずにnextさせたいなら、
逆にifで処理させれば条件に当てはまらなければnextになるんだし
999: 06/10(火)21:57 ID:YNq6kTxr(1/2) AAS
馬鹿ばっかで呆れるスレ
1000: 06/10(火)21:58 ID:YNq6kTxr(2/2) AAS
馬鹿ばっか
1001(1): 1001 ID:Thread(1/2) AAS
このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 137日 18時間 26分 52秒
1002(1): 1002 ID:Thread(2/2) AAS
5ちゃんねるの運営はUPLIFT会員の皆さまに支えられています。
運営にご協力お願いいたします。
───────────────────
《UPLIFT会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────
会員登録には個人情報は一切必要ありません。
4 USD/mon. から匿名でご購入いただけます。
省4
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.312s*