エクセル（Excel）の技。知ってましたか・・・。

┏━[PR]━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓
　WordPressに特化したレンタルサーバー『wpXレンタルサーバー』
　─────────────────────────────────
　・最新の高性能サーバーマシン＆高速ネットワーク
　・大容量30GB、月額1,000円(税抜)〜
　・リバースプロキシによるキャッシュなど、専用の高速システムを採用
　・専用の管理ツールから簡単セットアップ
　・過去14日間のデータの自動バックアップ機能
　・独自ドメイン対応 ＆ 1契約につき10個のWordPress運用が可能
　─────────────────────────────────
　　https://px.a8.net/svt/ejp?a8mat=2NR2G3+DDNP6A+CO4+ZR2VN
┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛




マイクロソフトアクセスの記事はこちら

人気ブログランキングへ




にほんブログ村


Untilを使用する方法


「Until条件式」で「False」である場合に繰り返しが実行されます。

Do　Until　条件式

　条件を満たすまで繰り返す

Loop

例）



Sub 点数3()

Dim i As Integer

i = 2

Do Until Sheets("sheet1").Cells(i, 1) = ""

If Sheets("sheet1").Cells(i, 2) < 50 Then

Cells(i, 3).Value = "不可"

ElseIf Sheets("sheet1").Cells(i, 2) < 75 Then

Cells(i, 3).Value = "良"

ElseIf Sheets("sheet1").Cells(i, 2) < 100 Then

Cells(i, 3).Value = "優"

End If

i = i + 1

Loop

End Sub

今までとほぼ同じです。

条件式が「Do Until Sheets("sheet1").Cells(i, 1) = ""」の<>が＝になっただけです。

このUntilも条件式を後ろに持っていくことが出来ます。



上記のように同じ結果が得られます。




:*:・゜★゜'・:*:.。.:*:・'゜☆.:*:・゜★゜'・:*:・゜
　　★　人気の法人用ガソリンカードを作ろう！ ★　
======================================================
　とにかく人気の法人向けガソリンカードが作れます。
　クレジット機能が付いていないから新会社でもＯＫ！

https://px.a8.net/svt/ejp?a8mat=2NOYJE+1JYT6Q+3EV2+HVNAR