セルに罫線【けいせん】を設定する方法VBAで罫線を扱うには、Border【ﾎﾞｰﾀﾞｰ】オブジェクトが持つ各種のプロパティで線のスタイルや太さ、色などを設定します。 また、Range【ﾚﾝｼﾞ】オブジェクトのBorderaround【ﾎﾞﾀﾞｰｱﾗｳﾝﾄﾞ】メソッドを使用すると セル範囲の外枠の線の種類や太さ、色を一度に設定できます。 Borders【ﾎﾞｰﾀﾞｰｽﾞ】プロパティセルの上下左右、斜めに設定されている罫線を表すBorder【ﾎﾞｰﾀﾞｰ】オブジェクトを取得するには、Range【ﾚﾝｼﾞ】オブジェクトのBorders【ﾎﾞｰﾀﾞｰｽﾞ】プロパティを使用します。 Border【ﾎﾞｰﾀﾞｰ】オブジェクトを取得するには、Borders【ﾎﾞｰﾀﾞｰｽﾞ】プロパティで対象となる罫線の位置を引数で参照する必要があります。Borders【ﾎﾞｰﾀﾞｰｽﾞ】プロパティで引数を省略した場合は

Name【ﾈｰﾑ】プロパティフォント名を取得または設定をするには、セルの書式設定を表すFont【ﾌｫﾝﾄ】オブジェクトの Name【ﾈｰﾑ】プロパティを使用します。 Name【ﾈｰﾑ】プロパティの書式と設定値の説明【取得】 オブジェクト.Name 【戻り値】文字列型(String) 【設定】 オブジェクト.Name = 設定値 オブジェクト Range【ﾚﾝｼﾞ】オブジェクトのFont【ﾌｫﾝﾄ】プロパティで取得した、Font【ﾌｫﾝﾄ】オブジェクトを指定します。設定値 フォント名を表す文字列を設定します。「セルの書式設定」ダイアログボックスの「フォント」タブにある「フォント名」の一覧にあるフォント名を指定します。半角や全角の違いやスペースなども正確に指定しないと正しく設定できません。 A1セルから始まるデータ範囲のフォントをHG丸ｺﾞｼｯｸM-PROに設定するコード例Sub フォント設定

HorizontalAlignment【ﾎﾘｿﾞﾝﾀﾙｱﾗｲﾒﾝﾄ】プロパティセル内の文字の横方向の配置を取得または設定するには、Range【ﾚﾝｼﾞ】オブジェクトのHorizontalAlignment【ﾎﾘｿﾞﾝﾀﾙｱﾗｲﾒﾝﾄ】プロパティを使用します。 HorizontalAlignment【ﾎﾘｿﾞﾝﾀﾙｱﾗｲﾒﾝﾄ】プロパティの書式と設定値の説明【取得】 オブジェクト.HorizontalAlignment 【設定】 オブジェクト.HorizontalAlignment = 設定値

セルに表示形式を設定する方法セルに入力されているデータの表示形式は、「セルの書式設定」ダイアログボックスの「表示形式」タブで設定します。 VBAで表示形式を変更するには、Range【ﾚﾝｼﾞ】オブジェクトのNumberFormatLocal【ﾅﾝﾊﾞｰﾌｫｰﾏｯﾄﾛｰｶﾙ】プロパティを使用します。 NumberFormatLocal【ﾅﾝﾊﾞｰﾌｫｰﾏｯﾄﾛｰｶﾙ】プロパティ指定したセルの表示形式を取得または、設定するには、Range【ﾚﾝｼﾞ】オブジェクトのNumberFormatLocal【ﾅﾝﾊﾞｰﾌｫｰﾏｯﾄﾛｰｶﾙ】プロパティを使用します。 NumberFormatLocal【ﾅﾝﾊﾞｰﾌｫｰﾏｯﾄﾛｰｶﾙ】プロパティの書式と設定値【取得】 オブジェクト.NumberFormatLocal 【戻り値】バリアント型 (Variant) 【設定】 オブジェクト.NumberForma

データ内で空白セルが含まれる行全体を削除する方法データ内で空白セルがあった場合その空白セルを含む全体行を削除したい場合があります。つまり、一つのデータ固まりを表すレコード内に空白セルがあった場合にそのレコードを削除する方法について解説します。 方法としては、データ範囲を参照するRange【ﾚﾝｼﾞ】オブジェクトのCurrentRegion【ｶﾚﾝﾄﾘｰｼﾞｮﾝ】プロパティでデータ範囲を参照し、特定のセルを参照するRange【ﾚﾝｼﾞ】オブジェクトのSpecialCells【ｽﾍﾟｼｬﾙｾﾙｽﾞ】メソッドを使用して「空白セル」を参照し、参照したセル範囲の行全体を参照するRange【ﾚﾝｼﾞ】オブジェクトのEntireRow【ｴﾝﾀｲﾔﾛｳ】プロパティを使用して参照した空白セルが含まれる行全体を参照して、Range【ﾚﾝｼﾞ】オブジェクトのDelete【ﾃﾞﾘｲﾄ】メソッドで参照されている行全

VBAで列を挿入する場合はセルを表すRange【ﾚﾝｼﾞ】オブジェクトのInsert【ｲﾝｻｰﾄ】メソッドを使用します。Insert【ｲﾝｻｰﾄ】メソッドは指定したセル範囲にセルを挿入するメソッドです。列を挿入する場合は挿入する場所にあるセルの移動方向を設定する引数Shift【ｼﾌﾄ】に右方向にシフトする定数を指定します。また、Columns【ｶﾗﾑｽｽ】プロパティやEntireColumn【ｴﾝﾀｲﾔｶﾗﾑ】プロパティを使用して指定の列全体を参照し、Insert【ｲﾝｻｰﾄ】メソッドを使用すると列全体が挿入されます。 Insert【ｲﾝｻｰﾄ】メソッドInsert【ｲﾝｻｰﾄ】メソッドの書式と設定値(引数)の説明[]内は省略可能です。 オブジェクト.Insert[(Shift,CopyOrigin)] オブジェクト 列を表すプロパティで参照した行やセル範囲をRange【ﾚﾝｼﾞ】オブジェ

シートを参照するプロパティExcel2007からのシートは、ワークシートとグラフシートの2種類があります。Worksheets【ﾜｰｸｼｰﾂ】プロパティは、ワークシートを参照でき、Charts【ﾁｬｰﾂ】プロパティは、グラフシートを参照できます。その他にVBAでは、シートの種類を問わずに参照できるSheets【ｼｰﾂ】プロパティがあります。 Sheets【ｼｰﾂ】コレクションとは同じ種類のオブジェクトの集まりを「コレクション」といいます。Worksheet【ﾜｰｸｼｰﾄ】の集まりは、Worksheets【ﾜｰｸｼｰﾂ】コレクション、グラフシートの集まりは、Charts【ﾁｬｰﾂ】コレクションすべてのシートの集まりは、Sheets【ｼｰﾂ】コレクションになります。 Sheetsコレクション概略図 Worksheets.Addメソッド新規ワークシートを追加するには、Worksheetsコレクシ

アクティブシートではないワークシートのセルを、セルを表すRange【ﾚﾝｼﾞ】オブジェクトの Select【ｾﾚｸﾄ】メソッドで選択するとエラーが発生します。 sheet1がアクティブでsheet2のA1セルを選択したコードSub セル選択1() Worksheets("sheet2").Range("A1").Select End Sub 実行結果 エラーの原因は、セルをSelect【ｾﾚｸﾄ】メソッドで選択する場合やセルをActivate【ｱｸﾃｨﾍﾞｲﾄ】メソットでアクティブにする場合は、「アクティブシートのセル」しか操作できないからです。したがって、このケースの場合はsheet2をアクティブにしてからA1セルを選択する必要があります。 選択できる場合Sub セル選択2() Worksheets("sheet2").Activate Range("A1").Select End Su

マクロ実行中にユーザーから文字列や数値を受け取るとき、最も簡単な方法のひとつはInputBoxを使うことです。次のコードは、ユーザーに名前を入力してもらい、入力された文字列をセルA1に書き込みます。 Sub Sample1() Dim buf As String buf = InputBox("名前を入力してください") Range("A1") = buf End Sub 特に難しいテクニックでもなく、ややもするとVBAの解説本でさえ紹介されないこともある基本ワザですが、実はこのInputBoxは意外と奥が深いんです。 InputBoxは2つある まず衝撃的な事実からお話ししましょう。Excel VBAで使えるInputBoxには次の2種類があります。 InputBox関数 ApplicationオブジェクトのInputBoxメソッド ひとつはInputBox関数です。文字列の左端を抜き出

InputBOx画面表示の違い(Excel2016の表示例)InputBox関数の場合 InputBoxメソッドの場合 コード表記の違い上記の表示例のコードInputBox関数の場合Sub sample1() Dim 名前 As String 名前 = Inputbox("お名前を入力してください。") End Sub InputBoxメソッドの場合Sub sample2() Dim 名前 As String 名前 = Application.Inputbox("お名前を入力してください。") End Sub InputBoxメソッドを利用する場合はApplication【ｱﾌﾟﾘｹｰｼｮﾝ】オブジェクトを記述します。InputBoxの前に記述がない場合は、InputBox関数になります。戻り値を受け取るので引数は「()」カッコで囲みます。 InputBox関数メッセージテキストとデータを

MsgBoxで、どんなときに括弧を使うのかと、メッセージを改行する"改行コード"について、詳しい解説を動画で公開しています。ぜひ、こちらもご覧ください。Youtubeでは、ほかにもたくさんの動画を公開しています。チャンネル登録をお忘れなく！ Office TANAKAチャンネル ■VBAのコードで、括弧はどんなときに使うのか 構文 引数promptは必ず指定します、ダイアログボックスに表示するメッセージを指定します。 引数buttonは省略可能です。ダイアログボックスに表示する、ボタンの種類やタイプなどを指定します。 引数titleは省略可能です。ダイアログボックスのタイトルバーに表示する文字列を指定します。 引数helpfileは省略可能です。ダイアログボックスの[ヘルプ]ボタンから開くヘルプファイルを指定します。引数helpfileを指定する場合は、引数contextも必ず指定しなけれ

MsgBox【ﾒｯｾｰｼﾞﾎﾞｯｸｽ】関数MsgBox【ﾒｯｾｰｼﾞﾎﾞｯｸｽ】関数は、警告や注意などのアイコン「はい」や「OK」ボタンなどを表示したメッセージを表示します。 クリックしたボタンによって一定の戻り値が返るため、戻り値を使って条件分岐をして処理を振り分けることができます。 MsgBox【ﾒｯｾｰｼﾞﾎﾞｯｸｽ】関数の書式と設定値(引数)の説明[]内は省略可能です。 MsgBox( Prompt[, Buttons, Title, Helpfile, Context ]) Prompt【ﾌﾟﾛﾝﾌﾟﾄ】（必須） ダイアログボックスに表示するメッセージとなる文字列を指定します。Buttons【ﾎﾞﾀﾝｽﾞ】（省略可） 定数を使用して「ボタンの種類」「アイコンの種類」「メッセージボックスの状態」などを指定します。 複数の定数を指定する場合は算術演算子のプラス「+」を使用して定数を加

MsgBox関数の使い方（2） - ユーザーが選択したボタンの処理 (Excel 97/2000/2002/2003/2007/2010/2013/2016) 「MsgBox関数の使い方（1） -メッセージボックスの表示方法」では、メッセージの改行、ボタンやアイコンの指定など、いろいろな表示方法をご紹介しました。 いろいろなボタンを表示できたら、今度はユーザーがどのボタンをクリックしたか、その結果を知りたいところです。 ここでは、ユーザーが選択したボタンを判定する方法をご紹介します。 MsgBox関数はユーザーがどのボタンをクリックしたかを数値で返します。 選んだボタンによって処理を行うには、この戻り値を利用します。 「MsgBox関数の使い方（1）」では、引数をカッコで囲まずに利用してきましたが、関数の戻り値を利用するときは、引数をカッコで囲むのがVBAの基本ルールです。 次のコードは、