http://w.atwiki.jp/wasururu/ 私が良く使うexcel vba ja 2009-05-14T23:32:23+09:00 1242311543 https://w.atwiki.jp/wasururu/pages/15.html ○見つけた！ ○ 2009-05-14T23:32:23+09:00 1242311543 https://w.atwiki.jp/wasururu/pages/14.html Do～Loopステートメント 条件により処理を繰り返したい場合はDo～Loopステートメントを使用します。また、Do～Loopステートメントには条件を指定する方法としてWhile と Untilを使用する方法があります。 >>Whileを使用する場合 While～には"While 条件式"の形式で条件を指定します。条件式がtrueの間、処理が実行されます。従って、通常は処理の中でWhile文の条件式がfalseになるようにしたり、繰り返しを中断するような文を記述します。そうでないとwhile文は処理を永遠にし続けてしまうからです。 "While 条件式"は記述位置には2つの形式があり、記述位置により処理内容が異なってきます。 Whileの位置を前にした場合、条件式を満たしているのかを判断してから繰り返す処理を実行します。 Do While 条件式 条件式を満たすまで繰り返す処理 Loop 下記の例では、まず初期値として変数 i に 1 が代入しておき、次に i が11以下かどうかを評価し、セルに値を代入し、次に i の値を1つ加算し、もう一度 i が11以下かどうかを評価し、セルに値を代入します。この処理を i が10以上になるまで繰り返します。 Sub test() 'セルのA1～A10に1～10を入力する i = 1 Do While i < 11 Worksheets("Sheet1").Cells(i, 1).Value = i i = i + 1 Loop End Sub これに対してWhileの位置を後ろにした場合、繰り返す処理を実行してから条件式を満たしているか判断します。つまりどのような条件でも1回は繰り返す処理を実行します。 Do 条件式を満たすまで繰り返す処理 Loop While 条件式 下記の例では、まず初期値として変数 i に 10 が代入しておき、セルに値を代入し、次に i の値を1つ加算し、 i が11以下かどうかを評価します。つまりWhile 条件式を評価する前に処理を 1回実行しています。i　の値は11なので繰り返す処理を実行せずに終了します。 Sub test( 2009-01-06T00:11:19+09:00 1231168279 https://w.atwiki.jp/wasururu/pages/13.html Excel　VBA 2009-01-05T23:25:59+09:00 1231165559 https://w.atwiki.jp/wasururu/pages/12.html -文字列内のスペースを削除 11:57 スペースを "" に置き換えればスペースの削除が出来ます。 下記コードはシート1のセルA1:B5のスペースを削除しています。 Sub Test() Worksheets("Sheet1").Range("A1:B5").Replace What:=" ", Replacement:="", Matchbyte:=False End Sub ※Matchbyte:=False　とすれば全角・半角とも削除します。 出展：http://hinekure.vba-soft.com/?eid=253853 2009-01-05T23:24:38+09:00 1231165478 https://w.atwiki.jp/wasururu/pages/11.html * コメントプラグイン @wikiのwikiモードでは #comment() と入力することでコメントフォームを簡単に作成することができます。 詳しくはこちらをご覧ください。 ＝＞http://atwiki.jp/guide/17_60_ja.html ----- たとえば、#comment() と入力すると以下のように表示されます。 #comment 2009-01-05T23:04:23+09:00 1231164263 https://w.atwiki.jp/wasururu/pages/10.html * 関連ブログ @wikiのwikiモードでは #bf(興味のある単語) と入力することで、あるキーワードに関連するブログ一覧を表示することができます 詳しくはこちらをご覧ください。 ＝＞http://atwiki.jp/guide/17_161_ja.html ----- たとえば、#bf(ゲーム)と入力すると以下のように表示されます。 #bf(ゲーム) 2009-01-05T23:04:23+09:00 1231164263 https://w.atwiki.jp/wasururu/pages/9.html @wikiにはいくつかの便利なプラグインがあります。 ----- #ls ----- これ以外のプラグインについては@wikiガイドをご覧ください =>http://atwiki.jp/guide/ 2009-01-05T23:04:23+09:00 1231164263 https://w.atwiki.jp/wasururu/pages/8.html * 動画(youtube) @wikiのwikiモードでは #video(動画のURL) と入力することで、動画を貼り付けることが出来ます。 詳しくはこちらをご覧ください。 ＝＞http://atwiki.jp/guide/17_209_ja.html また動画のURLはYoutubeのURLをご利用ください。 ＝＞http://www.youtube.com/ ----- たとえば、#video(http://youtube.com/watch?v=kTV1CcS53JQ)と入力すると以下のように表示されます。 #video(http://youtube.com/watch?v=kTV1CcS53JQ) 2009-01-05T23:04:23+09:00 1231164263 https://w.atwiki.jp/wasururu/pages/7.html * アーカイブ @wikiのwikiモードでは #archive_log() と入力することで、特定のウェブページを保存しておくことができます。 詳しくはこちらをご覧ください。 ＝＞http://atwiki.jp/guide/25_171_ja.html ----- たとえば、#archive_log()と入力すると以下のように表示されます。 保存したいURLとサイト名を入力して"アーカイブログ"をクリックしてみよう #archive_log() 2009-01-05T23:04:23+09:00 1231164263 https://w.atwiki.jp/wasururu/pages/6.html * 更新履歴 @wikiのwikiモードでは #recent(数字) と入力することで、wikiのページ更新履歴を表示することができます。 詳しくはこちらをご覧ください。 ＝＞http://atwiki.jp/guide/17_117_ja.html ----- たとえば、#recent(20)と入力すると以下のように表示されます。 #recent(20) 2009-01-05T23:04:23+09:00 1231164263