• ベストアンサー

vbsのfor文に対する質問です。

vbsのfor文に対する質問です。 Javaでいうところのbreak文と同様の処理はどのようにすれば良いのでしょうか？ 例） For i=1 to 10 step 1 　　If str = "" Then 　　　// for文を抜ける処理 　　End If next

質問者が選んだベストアンサー

  • ベストアンサー
noname#116741
noname#116741
回答No.1

http://www.mhl.janis.or.jp/~winarrow/vbscript/htm/vbs575.htm exit for

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • foｒ文の使い方

    for文の中にif文を入れて使いたいのですが「Nextに対するforがありません」となりエラーが出てしまいます。どうしたらよいのでしょうか？ If Option1.Value = True Then For i = 2 To 10 　If xlSheet.Cells(i, 2).Value > 10 Then Form2.List1.AddItem xlSheet.Cells(i, 1) Next i End If End If

  • VB　For-Next文でのExitではなく中断は可能？

    初歩的な質問で申し訳ありません・・・ ループで処理しているものがあるのですが、ExitForでループを抜けることはできますが、途中で処理を中断して次のカウンタの処理へ移ることはできるのでしょうか？ 例えば For i = 1 to 10 　　if 関数１() = False then 　　　　■ループ処理を終了するのではなく次のカウンタ[i]に移りたい■ 　　else 　　　　Call 関数２() 　　end if Next i という事をしたいと思っています。 今は For i = 1 to 10 　　ret = 関数１() 　　if ret = True then 　　　　Call 関数２() 　　end if Next i という方法で記述していますが、上記のような条件文が10や20もあると、IF文の入れ子入れ子でかなりコードが見にくいです・・・。 どなたかよろしくお願いします！

  • vbsの文字列比較について

    vbsプログラムでInstr()を使用して文字列を比較しているのですがうまくいきません。何か知っている方がいましたら教えてください。 Dim index Dim str Dim result　'結果の保存 'sheetnameにはシート名(aaaテスト)が保存されています。 str = Array("テスト","test") For i=0 to UBound(str) step 1 index = InStr(str(i),sheetname) If index > 0 Then result = i next

  • EXCEL VBA のFor～Next文で質問です。

    お世話になります。ＶＢＡ初心者です。 環境はＷＩＮ２０００，ＥＸＣＥＬ２０００です。 下記のようなマクロを組んだらＮｅｘｔに対するＦｏｒがありませんと、エラーが出てしまいました。 申し訳ありませんが、手直しお願いします。 やりたいことは、Ｄ９７へコピーが終わったら、次はＭ７からコピーをし、Ｍ９７へのコピーが終わったらＶ７からコピーを始めたいのです。 With sheetGR For ii = 7 To 97 Step 10（行の指定） For iii = 4 To 31 Step 9（列の指定） If .Cells(ii, iii) = "" Then .Range(.Cells(ii, iii), .Cells(ii + 4, iii + 2)).Value _ = Sheets("Result").Range("G20：I24").Value End If Exit For If Cells(97, iii) <> "" Then Next iii End If Next ii End With

  • vbsのif文について

    vbsでプログラムを作成しているのですが、if文の使い方が良くわからないので教えてください。以下のような構造のものを作成したいです。 例)JAVA if(i==0){ 　　if(i==1){ 　　} }else{ }

  • For ～ Next の使い方

    for ～ next 構文の途中でカウンターを進めることはできますか。 For I=1 to 10 処理 if ～ then next 処理 next このようにすると、エラーになります。 仕方なく次のようにしていますが、もっと良い方法はありますか。 For I=1 to 10 処理 if ～ then goto 次の行へ 処理 次の行へ: next

  • Do whileとFor文の脱出処理について

    はじめまして。 VBについて素朴な質問なのですが For…Nextから抜けるにはExit for を使いDo…Loopから抜けるにはExit Doを使用しますが以下の場合はFor文の中でExit doを使用するのは可能なのでしょうか？ Do while(条件) for i=1 to 12 if 条件　then exit do end if 処理１ next i 処理２ loop 本来ならfor文の中ではExit forを使用しますがfor文はDo while文 の中に含まれていますのでExit doでも出れると思ったのですがそうではないのでしょうか？ご回答よろしくお願いします。

  • ACCESS VBA のFor文のStepについて

    ACCESS VBAでFor文を使った構文を作っているのですが、Stepについて+、-は使えたのですが、乗算、割り算は使えないのでしょうか？ For i = 10 to 10000 step *10 ～処理 Next i にすると"*"でコンパイルエラーが出ます。 10、100、1000、10000の処理がしたいのです。 Forでは無理なのでしょうか？

  • [VBA] For文の使い分けについての疑問

    こちらの識者の方々にはいつもお世話になっています。 VBAの質問です。 環境は下記になります。 OS=windows7 pro 64bit Office=Excel2010(14.0.7128.5000) ・疑問点 For each nextもFor nextも、最下行まで処理をしたいときに使用することが多いのですが、 単列の場合はFor each next、複数列の場合はFor nextというような使い方をしています。 例：For each next Sub test() 　Dim ws As Worksheet 　Dim r As Range 　Dim endRow As Long 　Set ws = ThisWorkbook.Sheets(1) 　endRow = ws.Cells(Rows.Count, 1).End(xlUp).Row 　For Each r In ws.Range("A1:A" & endRow) 　　If r.Value Mod 2 = 0 Then r.Font.Bold = True 　Next r End Sub 例：For next Sub test2() 　Dim ws As Worksheet 　Dim i As Long 　Dim endRow As Long 　Set ws = ThisWorkbook.Sheets(1) 　endRow = ws.Cells(Rows.Count, 1).End(xlUp).Row 　For i = 1 To endRow 　　If ws.Cells(i, 1).Value Mod 2 = 0 Then ws.Cells(i, 1).Font.Bold = True 　　If ws.Cells(i, 2).Value Mod 3 = 0 Then ws.Cells(i, 2).Font.Bold = True 　Next i End Sub 単純に、複数列での処理をする場合にはFor each next文を2つ書かないといけないと思い（込み）、 上記のような運用にしていますが、そもそもこの考え方は合っていますでしょうか？ 単列の処理であってももちろんFor next文で問題なく使用できますし、 複数列の処理の場合もFor each next文で処理することはできます（冗長ですが）が、 VBA的に正しいというか、合理的な考えであるのかどうかが疑問です。 みなさんはFor each nextとFor nextをどのように使い分けていますか？ 質問に不備不足等ございましたらご指摘ください。 ご面倒お掛けしますがよろしくお願いします。

  • 「for next」文と「if then else」文

    両方とも「くり返し」をさせるものですけど、 for nextにできてif then elseにできないことって ありますでしょうか？ 僕は無いと思うのです。 その理由は for next文は等差数列に関係したくり返しをさせるものであり if then else文は等差数列とは関係の無い繰り返しもできるし、等差数列に関係あるくり返しもできるからです。 for nextの「等差数列に関係のあるくり返し」とは 例えば for i=1 to 100 step 2 のような場合、 これは、初項１、公差２、末項１００ の等差数列を用意したことを意味しますよね？ つまりfor next文では「等差数列を使ったくり返し」しか出来ないのに対し、 if then else文は等差数列に関係なく、「一般的なくり返し」が出来るものだと思うのです。 つまり、for next文は存在理由が無いと思うのです。 こういう理解であっていますでしょうか？ よろしくおねがいします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する