Excel VBA 質問スレ Part82

**デフォルトの名無しさん** · 2025/01/24(金) 03:31:15.25

ExcelのVBAに関する質問スレ
コード書き込みや作成依頼もOK

次スレは>>980が立てること
無理なら細かく安価指定

関連スレ
Excel VBA 質問スレ Part79(ﾜｯﾁｮｲあり)
https://mevius.5ch.net/test/read.cgi/tech/1674875532/
Excel VBA 質問スレ Part80(ﾜｯﾁｮｲあり)
https://mevius.5ch.net/test/read.cgi/tech/1700826110/

※前スレ
Excel VBA 質問スレ Part79
https://mevius.5ch.net/test/read.cgi/tech/1674874007/
Excel VBA 質問スレ Part80
https://mevius.5ch.net/test/read.cgi/tech/1685489018/
Excel VBA 質問スレ Part81
https://mevius.5ch.net/test/read.cgi/tech/1713416618/

**デフォルトの名無しさん** · 2025/06/08(日) 02:30:07.18

>>975
そやね
たったこれだけでフォルダ階層どこまでも潜れるのかと感動すると思う
（かもしれないw）
フォルダ再帰ができたら各全ファイル名列挙も再帰処理の中に追加しとき
いつか使う時が来る

**デフォルトの名無しさん** · 2025/06/08(日) 03:49:16.50

こんなので偉そうにする馬鹿

**デフォルトの名無しさん** · 2025/06/08(日) 10:13:48.24

>>977
わざわざ「私バカです」って手を挙げて出てきてどうした

**897** · 2025/06/08(日) 10:59:09.81

>>976
昔だったら stack overflowとか心配してたけど今はあまり気にしなくて良さそうだね

**デフォルトの名無しさん** · 2025/06/08(日) 11:01:04.08

.netのAPIラッパー関数もソース見ると大抵泥臭い事やってんのよね

**デフォルトの名無しさん** · 2025/06/08(日) 11:03:50.75

スタック領域は昔からほとんど変わってないから気にする必要はある

**デフォルトの名無しさん** · 2025/06/08(日) 11:07:37.10

Excel VBA 質問スレ Part83
https://mevius.5ch.net/test/read.cgi/tech/1749348402/

**897** · 2025/06/08(日) 11:11:01.02

>>982
乙彼
>>981
共有サーバのアドレス変わった時、全フォルダの奥までショートカット探して書き換えたけど
何ともなかったからそんなもんだと思ってた

**デフォルトの名無しさん** · 2025/06/08(日) 12:43:48.49

>>976
再帰処理のコード自体はわかるのですが、If文で再帰処理をする、しないまでは考えてなかったです

**デフォルトの名無しさん** · 2025/06/08(日) 14:43:09.01

>>984
if?
途中から折り返す時のこと?
それなら必要

**デフォルトの名無しさん** · 2025/06/08(日) 16:28:21.07

2階層しか掘らないのにわざわざ再帰処理にするかなぁ

**デフォルトの名無しさん** · 2025/06/08(日) 16:56:20.91

>>978
構ってもらうのも大変なんだぞ
察してあげなきゃ

**デフォルトの名無しさん** · 2025/06/08(日) 17:17:56.33

>>983
スタックさせたまま全ファイル走査なんてしないだろうから、
ファイルの数何個あろうが同じでは？

**デフォルトの名無しさん** · 2025/06/08(日) 19:19:30.01

ソース的に簡単にするなら全ファイルのフルパス取って正規表現だな

**デフォルトの名無しさん** · 2025/06/09(月) 07:30:24.52

フォルダのショートカットファイルがある場合の動作確認はした方がいいぞ

**デフォルトの名無しさん** · 2025/06/09(月) 08:19:56.01

シンボリックリンクとジャンクションとハードリンクも動作確認した方がいいぞ
パスが255文字超えた場合も動作確認した方がいいぞ

**デフォルトの名無しさん** · 2025/06/10(火) 20:52:05.68

VBAのfor eachやfor nextでif文を使用して条件に合わなかった時にnext するにはどうしたらいいでしょうか？

**デフォルトの名無しさん** · 2025/06/10(火) 21:05:38.20

forの中をDo-Loopで囲んで脱出したい時はExit Doする

**デフォルトの名無しさん** · 2025/06/10(火) 21:05:45.22

>>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
If 条件 Then
' 条件に合った場合の処理をここに書く
End If
Next i

Elseブロックを記述しないことで、条件が合わない場合は自動的に次のループへ進みます。

**デフォルトの名無しさん** · 2025/06/10(火) 21:17:29.25

next の手前にgoto

**デフォルトの名無しさん** · 2025/06/10(火) 21:35:49.89

gotoでnext前のラベルに飛ぶ。ラベルは
CONTINUE_1:
など

**897** · 2025/06/10(火) 21:41:20.79

C言語の呪いから解けずにGoTo使いにくい俺

**デフォルトの名無しさん** · 2025/06/10(火) 21:55:14.34

無理して使うもんじゃない
そもそもifで処理せずにnextさせたいなら、
逆にifで処理させれば条件に当てはまらなければnextになるんだし

**デフォルトの名無しさん** · 2025/06/10(火) 21:57:34.45

馬鹿ばっかで呆れるスレ

**デフォルトの名無しさん** · 2025/06/10(火) 21:58:07.04

馬鹿ばっか

**1001** · Over 1000

このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 137日 18時間 26分 52秒