サイト内のVBAコードを検索できます。
[2012/05/11] Update / by dz02572i
No.[5] VBA Tips 一覧 |
|
|
ブログトップへ戻る|
|
--->その他のサンプルコードはこちらから。
VBA Tips 一覧
[セル]
・セルの選択
A1を選択
C15を選択
変数でC15を選択
C列の最終行を選択
C列の最終行を選択 (変数)
行を選択
複数行の選択
すべて選択
四隅の選択
四隅の選択 (変数) ・・・など
・セルを移動して左上に表示
・詳細を別セルに表示
・アクティブセルのアドレスを調べる
・アクティブセルの列番号を英文字に変換する
[セルに値を入力]
・A1セルに「テスト」と入力
・A1セルに今日の日付を入力
・A1セルに書式を設定して日付を入力
・セル内で改行して値(文字)を入れる / chr(10)
・[trim] セルの前後空白を除去する
[セル・テキストボックスの色の指定方法]
・セル・テキストボックスの色の指定方法
---> 色見本 / 色一覧 (RGB)
[セルの書式設定]
・数値を3桁にそろえる / セルの右クリックで
・数値を3桁にそろえる / マクロ
[セルの移動で色を変える]
・セルの移動で色を変える
セルの移動で、色を変える / その1
セルの移動で、色を変える / その2 *選択しているセルだけ
セルの移動で、色を変える / その3 * 行全体 ・・・など
[いろいろなセルの削除方法]
・セルの削除
セルの値のみを削除
セルの値・書式すべてを削除
A1セルの削除 その1 / 選択して削除
A1セルの削除 その2 / 選択せずに削除
A2からC1の削除 その1 / 選択して削除
A2からC1の削除 その2 / 選択せずに削除
A2からC1の削除 その3 / 変数
A2からC列の最終行の削除 ・・・など
・行の削除・挿入
[表示領域(スクロールエリア)を設定]
・スクロールエリアの設定
・スクロールエリアの解除
[印刷]
・印刷範囲の指定
四隅を印刷範囲に指定
四隅を印刷範囲に指定 (変数1)
四隅を印刷範囲に指定 (変数2) 最終行が不確定の場合 ・・・など
・印刷プレビュー
・設定をしてプレビューする
[シート・ブック]
・シート名 / ブック名を取得する
・エクセルの絶対パスを取得する
・シート名をリストボックス・コンボボックスに表示
・フォームからシートを削除する
・フォームからシートを新しく追加する
・フォームからシート名を変更する
・複数のシートを選択する (作業グループ)
・「シート間の参照」を維持したままコピーする
・ブックの自動保存を無効にする
・ウィンドウを最大化・最小化・通常状態にする
・ブックのパスを取得する / ディレクトリ・フォルダとファイル名
・フォルダを作成する (ブックと同じ階層にディレクトリを作成)
・子フォルダを作成する (複数)
・バックアップファイルを作成する / コピーを作成
・ファイル名と拡張子を分離する ( .xls )
[オートシェイプ]
・オートシェイプの名前を取得する(オブジェクト名/コントロール名)
・クリックしたオートシェイプの名前を取得する(オブジェクト名/コントロール名)
・オートシェイプを選択状態にする (オブジェクト名/コントロール名)
・オートシェイプの型を調べる (オブジェクト名/コントロール名/タイプ)
・オートシェイプを半透明にする
・指定したオートシェイプを削除する
・すべてのコントロールを削除する (シート上)
・最後に追加されたオブジェクト名を調べる
・最後に追加されたオブジェクト選択する
・指定したオブジェクトの型(タイプ)だけを選択する
・指定したオブジェクトの型だけにマクロを登録
[テキストボックス]
・テキストボックスの値をループで削除 その1
・テキストボックスの値をループで削除 その2
・テキストボックスのフォント色・背景色をループ処理で変更
・テキストボックスに今日の日付を表示
・テキストボックスの前後空白を取り除く
・テキストボックスで「キーコード」を取得する
・Escキーでテキストボックスの値を消去・削除
・テキストボックスで改行できるようにする
[チェックボックス]
・チェックボックスを全部 True / Falseにする (ループ処理)
[月の最終日を取得]
・月の最終日を取得
[今週・先週・来週の期間を取得]
・今週の期間を取得
・先週の期間を取得
・来週の期間を取得
[リストボックス・コンボボックス]
・リストボックス・コンボボックスの基本用語
・ListIndex : 現在選択されている行番号
・ListCount :リストの数
・ListRows :コンボ ボックスのリストボックスのに表示される最大行数
・ColumnCount :列の数
・ColumnWidths :列の幅
・BoundColumn
・Column
・リストボックス,コンボボックスに1〜10の値を入れる
・コンボボックスに1,10,20・・・100の値を入れる
・コンボボックスに今週の日付を追加する
・コンボボックスに先週の日付を追加する
・コンボボックスに来週の日付を追加する
・コンボボックスに今月の日付を追加する
・コンボボックスに先月の日付を追加する
・コンボボックスに来月の日付を追加する

・コンボボックスの値をテキストボックスに表示
・複数列のコンボボックスの値をテキストボックスに表示
・コンボボックスの値をシートに戻す
[メッセージボックス / インプットボックス]
・メッセージボックスで改行する

・インプットボックスで分岐する
[関数]

・REPT関数でグラフを作る

・文字列の置換 Replace / 「●」 を「◎」に置換する
・文字列の置換 Replace / 「.」を「。」に置換する

・小文字を大文字に変換する / StrConv
・大文字を小文字に変換する / StrConv
・半角を全角に変換する / StrConv
・全角を半角に変換する / StrConv
・いろいろな文字列の変換(半角・全角・フリガナ・ひらがな・カタカナ) / StrConv
・郵便番号をハイフンで分割する / 文字列分割 Split
・前後の空白を除去して隣のセルに転記 / trim
・前後・間の空白除去して隣のセルに転記 / (trim) (replace)
・前後・間の空白除去する、さらに半角に変換

・特定の文字列で分割して、隣のセルに表示

--->ここでは「県」で分割しています。
・「名字(苗字・姓)」と「名前」で別々のセルに分割する

--->空白で分割
[フォーム]
・フォームを非表示にする
・5秒間フォームを非表示にする
・指定した時間でカウントダウンする
・フォームをシートの左上に表示
・フォームを解像度に応じて最大化する
・フォームのテキストボックスに値を入れて起動する
【 [0] VBA Tips 一覧 】
【 [A] 入力 】
【 [A] 検索・抽出・置換 】
- No.[101] 検索画面をつくる
- No.[102] 検索結果の候補一覧を表示する
- No.[107] 部分一致で抽出する (フィルタオプション)
- No.[108] 完全一致で抽出する (フィルタオプション)
- No.[109] フォームから部分一致で抽出する (フィルタオプション)
- No.[110] フォームから部分一致・完全一致で抽出する (フィルタオプション)
- No.[111] 抽出結果を別シートに表示する (フィルタオプション)
- No.[112] AND検索(複数条件)で抽出する (フィルタオプション)
- No.[113] OR検索(複数条件)で抽出する (フィルタオプション)
- No.[114] 二つの項目からAND検索で抽出する (フィルタオプション)
- No.[115] 二つの項目からOR検索で抽出する (フィルタオプション)
- No.[116] 空白セルを抽出 (フィルタオプション)
- No.[117] 空白以外のセルを抽出 (フィルタオプション)
- No.[118] 重複しないデータを抽出
- No.[119] 重複しないデータを抽出してコンボボックスに表示
- No.[120] 特定の文字を含まないデータを抽出
- No.[121] 今日の日付を抽出
- No.[122] 昨日の日付を抽出
- No.[123] 指定期間を抽出 (例:10日前から今日まで)
- No.[124] 今月の日付を抽出
- No.[125] 先月の日付を抽出
【 [A] セル 】
- No.[2] セルの選択
- No.[4] セルの移動で、色を変える
- No.[6] セルの削除
- No.[7] セルを移動して、左上に表示する
- No.[8] 詳細を別セルに表示
- No.[11] セルに値を入力
- No.[36] アクティブセルのアドレスを調べる
- No.[46] セル内で改行する / chr(10)
- No.[56] [trim] セルの前後空白を除去する
【 [A] 行・列 】
【 [A] シート・ブック 】
- No.[9] 表示領域(スクロールエリア)を設定
- No.[13] シート名 / ブック名を取得する
- No.[59] シート名をリストボックス・コンボボックスに表示
- No.[60] フォームからシートを削除する
- No.[61] フォームからシートを新しく追加する
- No.[62] フォームからシート名を変更する
- No.[63] ブックの自動保存を無効にする
- No.[72] バックアップファイルを作成する / コピーを作成
- No.[73] ファイル名と拡張子を分離する ( .xls )
- No.[74] エクセルの絶対パスを取得する
- No.[82] 複数のシートを選択する (作業グループ)
- No.[84] 「シート間の参照」を維持したままコピーする
- No.[90] ブックを開くときにマクロを実行する
【 [Z] ファイル操作 】
- No.[69] ブックのパスを取得する / ディレクトリ・フォルダとファイル名
- No.[70] フォルダを作成する (ブックと同じ階層にディレクトリを作成)
- No.[71] 子フォルダを作成する (複数)
【 [A] 印刷・ページ設定 】
【 [B] 書式・色・罫線 】
【 [C] オートシェイプ 】
- No.[57] すべてのコントロールを削除する (シート上)
- No.[64] オートシェイプの名前を取得する(オブジェクト名/コントロール名)
- No.[65] クリックしたオートシェイプの名前を取得する
- No.[66] オートシェイプを選択状態にする (オブジェクト名/コントロール名)
- No.[67] オートシェイプの型を調べる (オブジェクト名/コントロール名/タイプ)
- No.[68] オートシェイプを半透明にする
- No.[83] 指定したオートシェイプを削除する
- No.[85] 最後に追加されたオブジェクト名を調べる / オートシェイプ
- No.[86] 最後に追加されたオブジェクト選択する / オートシェイプ
- No.[87] 指定したオブジェクトの型(タイプ)だけを選択する / オートシェイプ
- No.[88] 指定したオブジェクトの型だけにマクロを登録 / オートシェイプ
- No.[92] すべてのオブジェクト(オートシェイプ)を選択
【 [F] フォーム 】
- No.[54] フォームをシートの左上に表示
- No.[53] フォームを解像度に応じて最大化する
- No.[52] 指定した時間でカウントダウンする
- No.[51] 5秒間フォームを非表示にする
- No.[50] フォームを非表示にする
- No.[89] フォーム上のコントロールを大きくする
- No.[91] 「Controls」を使ってオブジェクトで指定する /
Controls("TextBox1")など ★
【 [F] テキストボックス 】
- No.[14] テキストボックスの値を削除
- No.[27] テキストボックスの色をループ処理で変更
- No.[28] テキストボックスに今日の日付を表示
- No.[35] テキストボックスの前後空白を取り除く
- No.[47] テキストボックスで「キーコード」を取得する
- No.[48] Escキーでテキストボックスの値を消去・削除 / keycode
- No.[58] テキストボックスで改行できるようにする / textbox
- No.[75] フォームのテキストボックスに値を入れて起動する
【 [F] リストボックス・コンボボックス 】
- No.[18] リスト・コンボボックスに1〜10の値を入れる
- No.[19] コンボボックスに今週の日付を追加する
- No.[20] コンボボックスに先週の日付を追加する
- No.[21] コンボボックスに来週の日付を追加する
- No.[22] コンボボックスに今月の日付を追加する
- No.[23] コンボボックスに先月の日付を追加する
- No.[24] コンボボックスに来月の日付を追加する
- No.[25] リストボックス・コンボボックスの基本用語
- No.[29] コンボボックスの値をテキストボックスに表示
- No.[31] 複数列のコンボボックスの値をテキストボックスへ
- No.[32] コンボボックスの値をシートに戻す
- No.[44] コンボボックスに1,10,20・・・100の値を入れる
- No.[93] コンボボックスの項目数を数える
- No.[94] 選択しているコンボボックスのリスト番号を知る
- No.[95] コンボボックスで選択したい項目を指定する
- No.[96] コンボボックスで選択している項目を削除する
- No.[97] コンボボックスのすべての値を削除する
- No.[98] (VLookup) IDを選んで、テキストボックスに名前を表示させる
【 [F] メッセージボックス・インプットボックス 】
【 [F] チェックボックス 】
【 [U] 日付・時刻 】
【 [U] 文字列操作 】
- No.[38] 文字列の置換 Replace / 「●」 を「◎」に置換する
- No.[39] 文字列の置換 Replace / 「.」を「。」に置換する
- No.[40] 小文字を大文字に変換する / StrConv
- No.[41] 大文字を小文字に変換する / StrConv
- No.[42] 半角を全角に変換する / StrConv
- No.[43] 全角を半角に変換する / StrConv
- No.[45] いろいろな文字列の変換(半角・全角・フリガナ・ひらがな・カタカナ) / StrConv
- No.[76] 郵便番号をハイフンで分割する / 文字列分割 Split
- No.[77] 前後の空白を除去して隣のセルに転記 / trim
- No.[78] 前後・間の空白除去して隣のセルに転記 / (trim) (replace)
- No.[79] 前後・間の空白除去する、さらに半角に変換
- No.[80] 特定の文字列で分割して、隣のセルに表示
- No.[81] 「名字(苗字・姓)」と「名前」で別々のセルに分割する
【 [V] 関数 】
【 [V] 読み上げ 】
- No.[103] ExcelのSpeech.Speak で読み上げ
- No.[104] SAPI で読み上げ
- No.[105] 音声認識の人物名をリストボックスに表示する
- No.[106] 人物を指定して読み上げる
【 [V] ハイパーリンク 】
サーバーの空き箱に入ってるニャン。甘えん坊ニャン。拍手はちょっとだけすきニャン。




























































































