セルサイズの変更で自由に最適印刷!変数を利用。宛名印字編

fuutotandokueyecatch

こんにちは、じゅんぱ店長(@junpa33)です。

 

今回の封筒宛名印刷エクセルの作成では、

セルサイズを変更して、封筒サイズごとに最適な印刷ポジションを決めて行きます。その変更の方法として、変数を利用すれば微妙な調整も可能になります。

 

この説明の前に、先回の記事を確認されたいという場合は、こちら↓になります。

マルチページを使ったエクセル封筒印字ソフトの作成!宛名リスト編

fuutoatesakilisteyecatch マルチページを使ったエクセル封筒印字ソフトの作成!宛名リスト編

 

このエクセルソフト完成品をフリーダウンロードするにはこちら↓の記事からです。

無料DL!封筒に宛名印刷できるエクセルソフトと使い方。時短ツール

fuutoatenatorieyecatch 無料DL!封筒に宛名印刷できるエクセルソフトと使い方。時短ツール

 

封筒宛名印刷エクセル一覧
fuutouatenaeyecatch001
こんにちは、じゅんぱ店長(@junpa33)です。 今回は、結構、みなさんお悩みの宛名書きについてです。 はがきの場合は一番簡単には、年賀状ソフトを利用するという方法もありますが、 封筒への宛名書きをするには、なかなか手早く簡単にとはいかな ...
続きを読む
fuutoatenatorieyecatch
こんにちは、じゅんぱ店長(@junpa33)です。 今回は、先回紹介しました封筒宛名印刷エクセルの使い方の説明を行っていきます。 一般的には、封筒に直接印刷することは、「宛名シール」を使うパターンよりも遥かに難易度が高く思われています。 こ ...
続きを読む
fuutouatenaeyecatch002
こんにちは、じゅんぱ店長(@junpa33)です。 これから何回かに分けて、紹介しました封筒宛名印刷エクセルのVBAコード組み立て方について説明を行っていきます。 今回は、基本操作部分についての説明を行っていきます。 本題に入るまでに、エク ...
続きを読む
fuutoatesakilisteyecatch
こんにちは、じゅんぱ店長(@junpa33)です。 先回に続き、封筒宛名印刷エクセルのVBAコード組み立て方についてです。 今回は、宛名リストの作り方についての説明を行っていきます。 コード数も多くありませんのでサクッと行きたいと思います。 ...
続きを読む
fuutotandokueyecatch
こんにちは、じゅんぱ店長(@junpa33)です。 今回の封筒宛名印刷エクセルの作成では、 セルサイズを変更して、封筒サイズごとに最適な印刷ポジションを決めて行きます。その変更の方法として、変数を利用すれば微妙な調整も可能になります。 この ...
続きを読む
fuutorenzokueyecatch
こんにちは、じゅんぱ店長(@junpa33)です。 今回の封筒宛名印刷エクセルの作り方は、 封筒の宛名印字の範囲指定を、アクティブセルのRangeオブジェクトを利用して行います。テキストボックスやInputBoxへの入力指定での方法は使いま ...
続きを読む
fuutosasidasieyecatch
こんにちは、じゅんぱ店長(@junpa33)です。 今回の封筒宛名印刷エクセルは、差出人印刷についてです。 特徴は、サイズにわせて縦印刷と横印刷に対応し、また差出人を変更することもできます。 SHOP名で、個人で、ハンネで出す場合などにも使 ...
続きを読む

 

 

 

宛名印字「単独印刷」のコマンドボタン 設置流れ

 

仕上がりはこのようになります。

tandokuinsatu001

 

  • 先回設置したマルチページにコントロールを設置します。
  • ユーザーフォームモジュールにコードを記述
  • ボタンから呼び出されるプロシージャーをModule1に記述する。

 

ここでのコード作成のポイントは、
封筒サイズの種類分のテンプレートを作ることなく、それぞれに印刷できるようにすることです。

  1. 宛名リストから印刷する対象をどのように選択するか?
  2. 印刷の用紙サイズがそれぞれ違う中で、適切な印刷ポジションを設定すること。

 

 

マルチページ「単独印刷」ページでのコマンドボタンの配置

 

いつものようにツールボックスから必要なコントロールを選んで、マルチページ上で展開します。

 

ユーザーフォームでのボタン設置

 

青矢印の部分です。

各コントロールのプロパティはこのようになります。その他の文字コメントはラベルを使って作成してください。

 

tandokuinsatu002a

 

①マルチページ「単独印刷」タブ

tandokuinsatu003

②ラベル「プリンター注意」

tandokuinsatu004

 

③ラベル「宛名確認表示」

tandokuinsatu005

オブジェクト名 「単独印刷」
Caption 「単独印刷」
オブジェクト名 「プリンター注意」
Caption 「(空白)」
オブジェクト名 「宛名確認表示」
Caption 「ここをクリックすると最新に更新します。」

 

④コマンドボタン「セル戻る」

tandokuinsatu006

⑤コマンドボタン「セル進む」

tandokuinsatu007

⑥ラベル「用紙注意」

tandokuinsatu008

オブジェクト名 「セル戻る」
Caption 「戻る↑」
オブジェクト名 「セル進む」
Caption 「次へ↓」
オブジェクト名 「用紙注意」
Caption 「(白紙)」

 

⑧コマンドボタン「宛名編集」

tandokuinsatu009

⑨コマンドボタン「印刷プレビュー」

tandokuinsatu010

オブジェクト名 「宛名編集」
Caption 「宛名編集」
オブジェクト名 「印刷プレビュー」
Caption 「印刷確認」

 

フォームモジュールでのコード記述

 

「宛名印刷設定」ユーザーフォームモジュールにコントロールのコードを記述します。

 

②ラベル「プリンター注意」
⑥ラベル「用紙注意」

封筒サイズをオプションボタンで選択したときに「注意書き」を表示するかどうかのコードが記述されています。

先回の記事で確認できます。

マルチページを使ったエクセル封筒印字ソフトの作成!宛名リスト編の

オプションボタンのコード設定

 

③ラベル「宛名確認表示」

宛名リストで今、選択している印刷宛名を表示します。

Private Sub 宛名確認表示_Click()

Worksheets(“宛名リスト”).Select
宛名印刷設定.宛名確認表示.Caption = Worksheets(“宛名リスト”).Range(“B” & ActiveCell.Row)
Worksheets(“宛先”).Select

End Sub

 

④コマンドボタン「セル戻る」

Module1に記述されている「セル移動戻る」プロシージャーを呼び出します。

Private Sub セル戻る_Click()
Module1.セル移動戻る
End Sub

 

⑤コマンドボタン「セル進む」

Module1に記述されている「セル移動進む」プロシージャーを呼び出します。

Private Sub セル進む_Click()
Module1.セル移動進む
End Sub

 

⑧コマンドボタン「宛名編集」

Module1に記述されている「単独印刷」プロシージャーを呼び出します。

Private Sub 宛名編集_Click()
Module1.単独印刷
End Sub

 

⑨コマンドボタン「印刷プレビュー」

Module1に記述されている「単独印刷PV」プロシージャーを呼び出します。

Private Sub 印刷プレビュー_Click()
Module1.単独印刷PV
End Sub

 

セルサイズの変更などModule1でのコード記述

 

「セル移動戻る」プロシージャー

アクティブセルを一行上げます。

Sub セル移動戻る()

Worksheets(“宛名リスト”).Select
If ActiveCell.Row – 1 = 0 Then
  Exit Sub
End If

Worksheets(“宛名リスト”).Range(“B” & ActiveCell.Row – 1).Select
宛名印刷設定.宛名確認表示.Caption = ActiveCell.Value
Worksheets(“宛名リスト”).Select

End Sub

 

「セル移動進む」プロシージャー

アクティブセルを一行下げます。

Sub セル移動進む()

Worksheets(“宛名リスト”).Select
If ActiveCell.Row + 1 = 1048577 Then
  Exit Sub
End If

Worksheets(“宛名リスト”).Select
Worksheets(“宛名リスト”).Range(“B” & ActiveCell.Row).Offset(1, 0).Select
宛名印刷設定.宛名確認表示.Caption = ActiveCell.Value
Worksheets(“宛名リスト”).Select

End Sub

 

「単独印刷」プロシージャー

今回の記事の中心部になります。

印刷したい宛名を指定する方法は。「宛名リスト」で宛名を選択(セルをアクティブに)するだけです。特に確定ボタンなども作っていません。

変数を使ってセルのサイズを変化させます。モジュール内で使えるように記述の先頭で宣言しています。

先回の記事↓で確認できます。

「封筒宛名を印刷するエクセルVBAの作り方。基本操作部分編」の

呼び出したModule1のプロシージャーのコード記述」です

 

 

宣言文
Public TPnU As Double, TPnL As Double, TPnM As Double, TPnRo As Double

変数は小数点を扱えるようにDouble(Singleでもいいかもしれませんが)で宣言しています。

それぞれの変数の意味はこのようにしています。

TPnU先頭行の高さを調整するための変数
TPnLA列の幅を調整するための変数
TPnMフォントサイズを調整するための変数
TPnRo全行の高さを調整するための変数

 

封筒の宛名印刷の項目を変数として設定するコード

最初に、選択した宛名の項目別データを変数に代入します。この変数は「呼び出したModule1のプロシージャーのコード記述」に宣言しているものです。

宣言文
Public STY As Variant

Public aR As Long, J As Long

Public aN, aKei, aSho, aYB, aK, aSK, aB, aBM, aRe

アクティブにした宛名セルからその同一行の氏名、郵便番号、住所、連絡番号等を印刷用データとして変数に代入します。

Sub 単独印刷()

 

STY = 宛名印刷設定.TP_no.Caption

 

Worksheets(“宛名リスト”).Select
  aR = ActiveCell.Row
  aN = Range(“B” & aR).Value
  aKei = Range(“C” & aR).Value
  aSho = Range(“D” & aR).Value
  aYB = Range(“E” & aR).Value
  aK = Range(“F” & aR).Value
  aSK = Range(“G” & aR).Value
  aB = Range(“H” & aR).Value
  aBM = Range(“I” & aR).Value
  aRe = Range(“J” & aR).Value

 

封筒タイプ別に変数に数値を設定する

基本、横書きの設定ですが、「STY=TP1」と「STY=TP2」と「STY=TP3」の時に縦書きを選択できるようになっています。

 

MEMO

Gotoステートメントの使い方についてはこの記事を参考にしてください。

VBAGotoeyecatch001Gotoステートメントの利用法を最速に理解。毒コードと薬コード

 

TPnRo = 1

 

If STY = “TP1” Then
  If 宛名印刷設定.横書き2 = True Or 宛名印刷設定.横書き3 = True Then
    STY = “TP1y”
    TPnU = 1
    TPnL = 1
    TPnM = 1
  Else
    TPnU = 1
    TPnL = 1
    TPnM = 1
    TPnRo = 0.67
    縦書き
    GoTo step1
  End If

ElseIf STY = “TP2” Then
  TPnU = 2.5
  TPnL = 1
  TPnM = 1
  縦書き
  GoTo step1

ElseIf STY = “TP3” Then
  If 宛名印刷設定.横書き1 = True Then
    STY = “TP3y”
    TPnU = 2.5
    TPnL = 2
    TPnM = 1
  Else
    TPnU = 2.5
    TPnL = 2
    TPnM = 1
    縦書き
    GoTo step1
  End If

ElseIf STY = “TP4” Then
  TPnU = 7
  TPnL = 3
  TPnM = 1.2

ElseIf STY = “TP5” Then
  TPnU = 4.5
  TPnL = 1.7
  TPnM = 1.2

ElseIf STY = “TP6” Then
  TPnU = 2
  TPnL = 1
  TPnM = 1
  TPnRo = 1
  縦書き
  GoTo step1

ElseIf STY = “TP7” Then
  TPnU = 5.5
  TPnL = 8
  TPnM = 1.5
  TPnRo = 1.5

ElseIf STY = “TP8” Then
  TPnU = 5.5
  TPnL = 6
  TPnM = 1.5
  TPnRo = 1.5

ElseIf STY = “TP9” Then
  TPnU = 4.5
  TPnL = 5
  TPnM = 1.5
  TPnRo = 1.5

ElseIf STY = “TP10” Then
  TPnU = 3
  TPnL = 3.5
  TPnM = 1.5
  TPnRo = 1.5

Else
  MsgBox “封筒サイズが指定されていません。”, vbOKOnly, “メッセージ”
Exit Sub
End If

 

横書きの場合の表示(「宛先」シートに表示)コード

続いて以下のコードがつながっていきます。

宛名項目のデータが表示されるセル番号は不変で、主には、その上隣りや左隣のセルのサイズを可変にすることで用紙サイズでの印字位置を調整しています。

With Worksheets(“宛先”)

  .Cells.ClearFormats
  .Cells.ClearContents
  .Cells.UseStandardHeight = True
  .Cells.UseStandardWidth = True
  .PageSetup.CenterHorizontally = False
  .PageSetup.TopMargin = Application.CentimetersToPoints(1.5)
  .PageSetup.LeftMargin = Application.CentimetersToPoints(0.5)
  .PageSetup.RightMargin = Application.CentimetersToPoints(0.5)
  .PageSetup.BottomMargin = Application.CentimetersToPoints(1.5)
  .Rows.RowHeight = 24 * TPnRo
  .Columns(1).ColumnWidth = 4.5 * TPnL
  .Columns(6).ColumnWidth = 4.5
  .Cells.Font.Size = 15 * TPnM
  .Cells.ShrinkToFit = True
  .Rows(1).RowHeight = 24 * TPnU

  .Range(“B2”).Value = aYB
  .Range(“B4”).Value = aK & aSK & aB
  .Range(“B5”).Value = aBM
  .Range(“B7”).Value = aSho
  .Range(“B7”).Font.Size = 17 * TPnM
  .Range(“B7”).Font.Bold = True
  .Range(“B8″).Value = aN & ” ” & aKei
  .Range(“B8”).Font.Size = 17 * TPnM
  .Range(“B8”).Font.Bold = True
  .Range(“B11”).Value = aRe

  .Range(“B4:E4”).MergeCells = True
  .Range(“B5:E5”).MergeCells = True
  .Range(“B7:E7”).MergeCells = True
  .Range(“B8:E8”).MergeCells = True
  .Range(“B11:E11”).MergeCells = True

End With

step1:

Worksheets(“宛先”).Columns.AutoFit
フォント設定

End Sub

 

縦書きの場合の表示コード

縦書きの場合は、別のプロシージャーとして記述し、「単独印刷」プロシージャーの中でこれを呼び出します。

Sub 縦書き()

 

With Worksheets(“宛先”)

  .Cells.ClearFormats
  .Cells.ClearContents
  .Cells.UseStandardHeight = True
  .Cells.UseStandardWidth = True
  .PageSetup.TopMargin = Application.CentimetersToPoints(1.5)
  .PageSetup.LeftMargin = Application.CentimetersToPoints(0.5)
  .PageSetup.RightMargin = Application.CentimetersToPoints(0.5)
  .PageSetup.BottomMargin = Application.CentimetersToPoints(1.5)
  .Rows.RowHeight = 24 * TPnRo
  .Columns(“A”).ColumnWidth = 3
  .Columns(“K”).ColumnWidth = 3
  .Cells.Font.Size = 15 * TPnM
  .Cells.ShrinkToFit = True
  .Cells.Orientation = xlVertical
  .Cells.VerticalAlignment = xlTop
  .Rows(1).RowHeight = 24 * TPnU
  .Range(“B:J”).ColumnWidth = 3
  .Range(“E2”).Value = aYB
  .Range(“J4”).Value = aK & aSK & aB
  .Range(“I12”).Value = aBM
  .Range(“G5”).Value = aSho
  .Range(“G5”).Font.Size = 17 * TPnM
  .Range(“G5”).Font.Bold = True
  .Range(“F5″).Value = aN & ” ” & aKei
  .Range(“F5”).Font.Size = 17 * TPnM
  .Range(“F5”).Font.Bold = True
  .Range(“B22”).Value = aRe
  .Range(“E2:H2”).MergeCells = True
  .Range(“J4:J21”).MergeCells = True
  .Range(“I12:I21”).MergeCells = True
  .Range(“G5:G21”).MergeCells = True
  .Range(“F5:F21”).MergeCells = True
  .Range(“B22:H22”).MergeCells = True
  .Range(“E2”).Orientation = xlHorizontal
  .Range(“B22:H22”).Orientation = xlHorizontal

End With

End Sub

 

「単独印刷PV」プロシージャー

最後にプリントプレビューのコードです。

Sub 単独印刷PV()

Worksheets(“宛先”).PrintPreview

End Sub

 

「単独印刷」のまとめ

 

「単独印刷」プロシージャーの封筒タイプごとの変数の数値設定を調整すれば、より気に入った配置で宛名印刷をすることが出来ると思います。

少しずつ数値を変化させながら、プレビュー画面で確認して行くのがコツです。

 

普通によく使われているのはこの方法ではなく、

オソドックスにそれぞれの大きさの封筒のテンプレートを作成して、データを流し込んで印刷するという方法です。

この方法がより簡単だと思います。

ただそれは、封筒のサイズ分だけテンプレートを作らないといけませんし、そのテンプレートにデータを流し込むコードもそれぞれに作らないといけません。

 

今回は、これだけ多くの封筒の種類を扱っていますので、よりコンパクトに作ろうということで、テンプレートを設置しない方法を採用しました。

 

ここまで、印刷プレビューを確認しながら一件ずつ印刷するパターンを紹介しましたが、

次回は、印刷範囲を決めて連続で宛名印刷を行うパターンを紹介したいと思います。

 

次の記事に進むのは、こちら↓からになります。

エクセルVBAアクティブセルの利用。印刷の範囲を指定!封筒宛名印刷

fuutorenzokueyecatch エクセルVBAアクティブセルの利用。印刷の範囲を指定!封筒宛名印刷

 

エクセルVBAの独習を始めるためのポイントについて vbastudyeyecatchエクセルVBAを独学で習得するためのポイントは?良書との出会いは重要 基礎知識習得のためのオンライン学習講座の参考記事 Udemy1eyecatchエクセルVBA初級者がUdemyで動画学習する講座おすすめ5選と無料講座の上手な使い方。
  今回の記事はここまでです。
最後までご覧いただき有難うございました。

 

エクセルVBAを使って業務効率を上げて行くのに、始めのうちに知っておきたい内容を纏めています。

 

vbaintfixeyecatch
エクセルVBA関数で、数値の整数部分だけを分離します。 整数値取得のFix関数でなくInt関数の使用の場合でも、 他の関数との組み合わせで解決することが出来ます。 こんにちは、じゅんぱ店長(@junpa33)です。 今回のテーマは、数値の整 ...
続きを読む
vbarndeyecatch
エクセルVBAのRnd関数で乱数を取得します。 実用のためにはコードに簡単な加工をする必要があります。特に乱数値の整数化とRandomizeは必須です。 6.5兆通りのパスコードの生成方法も解説しています。 こんにちは、じゅんぱ店長(@ju ...
続きを読む
vbaroundupdowneyecatch
エクセルVBA 数値の切り上げ、切り捨てをするときには注意しなければいけません。 RoundUp関数とRoundDown関数を使う時に負の数が混在していると、そのままだと誤った計算結果になることがあります。 こんにちは、じゅんぱ店長(@ju ...
続きを読む
vbaroundeyecatch
エクセルVBAでも数値を四捨五入したい時は、Round関数を利用することが多いです。 Round関数の使い方はワークシートと同様ですが、ただ大きな注意点があります。 ここではその注意点も含めて使い方の説明を行います。 こんにちは、じゅんぱ店 ...
続きを読む
vbamaxminaveeyecatch
エクセルVBAで、ワークシート関数 Max・Min・Averageを利用して最大値・最小値・平均を求めます。 「簡単で短いエクセルVBAコード組み立て」を目指す上では、ワークシート関数は強い味方です。 こんにちは、じゅんぱ店長(@junpa ...
続きを読む
vbainsteeyecatch
InStr関数・InStrRev関数は、文字列操作系の関数の中でも最重要です。 この関数により指定の文字(列)の存在位置が取得できます。 そしてそれを目盛基準として、文字列操作をすることもできます。 こんにちは、じゅんぱ店長(@junpa3 ...
続きを読む
vbareplaceeyecatch
エクセルVBAで使える関数にReplace関数があります。 Replace関数は検索の文字列を指定の文字列に置換したり、削除したり出来ます。 利用価値の高い関数です。使い慣れておきましょう。 こんにちは、じゅんぱ店長(@junpa33)です ...
続きを読む
vbaselectcaseeyecatch
エクセルVBAで、必須の条件文。 その中の一つで、Select Case 条件分岐 ステートメントの使い方を説明します。 簡単なコード、可読性の向上が特徴のステートメントです。是非、知っておきましょう。 こんにちは、じゅんぱ店長(@junp ...
続きを読む
VBAValeyecatch
エクセルVBAのVal関数の使い方についてです。 「値を文字列型から数値型へ変換する」という機能があります。 データ型が不一致の場合、プログラムエラーでコード停止が発生することが良くあります。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
VBAStringeyecatch
エクセルVBA String関数の使い方についてです。 「文字を指定した数だけ並べることが出来る」という機能の関数です。 この関数を使えば簡潔なコード記述で実行することが出来ます。 こんにちは、じゅんぱ店長(@junpa33)です。 今回は ...
続きを読む
vbajoineyecatch
エクセルVBAでJoin関数の使い方について説明します。 文字列を接続する関数ですが、 配列変数で文字列を要素化した時にはこれを使います。 また「区切り文字」も自由に設定できます。 こんにちは、じゅんぱ店長(@junpa33)です。 今回は ...
続きを読む
vbamideyecstch
エクセルVBAで文字列操作は、コード作成の中でも重要な部分です。 Mid・Right・Left関数は、その操作の中で重要な働きをする関数です。 文字列を切り出すこの関数の基本部分を説明します。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
vbatrimeyecatch
Trim・RTrim・LTrimは文字列の端にあるスペースを取り除きます。 ちょっとのことですが、取り込みデータにスペースが付いていることでのエラーは発見修正が結構厄介です。 注意が必要です。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
vbastrcstreyecatch
エクセルVBAで、Str関数とCStr関数に使い方とその違いについて説明します。 戻り値にちょっとした違いがあります。 使い方の違いでその後のコードの進行に影響が出ることがあり、なおざりにはできません。 こんにちは、じゅんぱ店長(@junp ...
続きを読む
vbaleneyecatch
Len関数の使い方ついて説明します。 エクセルVBAでプログラミングを行う時に、テキストデータを加工処理するには必須の関数です。 非常に有用な関数ですので、是非使えるようになっておきましょう。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
VBACheckBoxeyecatch
エクセルシートで使う場合の、2種類あるチェックボックスの設置と使い方の違いを解説します。 一見簡単そうですが、 単純でない使い方をしたい時は、設置方法と設定方法を工夫する必要があります。 こんにちは、じゅんぱ店長(@junpa33)です。 ...
続きを読む
VBAOptionbuttoneyecatch
エクセルで書類を作成する時、項目を選択できるようにするのがオプションボタンです。 これには2種類あり、使い方にかかわる違いもあります。 詳しいオプションボタン設置方法と使い方のコツを解説します。 こんにちは、じゅんぱ店長(@junpa33) ...
続きを読む
vbamojisousaeyecatch
エクセルVBAコードで、ファイルの保存時に名前を付けて保存について、その時の年月日を付けたい時の設定方法についてです。 保存されたファイルがたくさん増えて行く中で、ファイルの判別で年月日を付けている(付けたいと思っている)人も多いでしょう。 ...
続きを読む
vbajyufukueyecatch
今回は、同じ項目を一つにまとめるためのエクセルVBAコードを紹介します。 多数銘柄の商品を複数の店で扱っている場合、商品銘柄集計表を作るには、商品銘柄の種類だけをリストにしないといけません。 こんにちは、じゅんぱ店長(@junpa33)です ...
続きを読む
vbafolderdeleteeyecatch
今回は、不要なフォルダをサクッと削除するエクセルVBAコードを紹介します。 削除の仕方は2つあります。VBA自身の機能を使うことと、FSOの機能を使うことの2つです。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAで、不 ...
続きを読む
vbadirkilleyecatch
今回は、フォルダに保存されている要らないファイルを削除するエクセルVBAコードを紹介します。 フォルダを開いて一つずつファイル名を確認して、ではなくて、コード実行一発でササッと完了します。 こんにちは、じゅんぱ店長(@junpa33)です。 ...
続きを読む
vbachdireyecatch
エクセルVBAのステートメントで「ChDir(チェインジディレクトリ)」というのがあります。 少々地味感のあるステートメントですが、この使い方のポイントを説明いたします。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAの ...
続きを読む
vbafindeyecatch001
今回は、データの検索方法で、エクセルVBAでできるメソッドについてです。 「FindとFindNextメソッド」の使い方と最速理解のコードの組み立て方を説明したいと思います。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルの検 ...
続きを読む
今回も、エクセルVBAで利用できるワークシート関数についてがテーマです。 この記事では、データナンバーなどから、その必要な値や数値を抽出する「Vloolup関数」について使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です ...
続きを読む
vbaindexeyecatch001
今回も、エクセルVBAで利用できるワークシート関数についてがテーマです。 この記事では、データリストから必要な値や数値を取り出してくる「Index関数」について使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセ ...
続きを読む
vbamatcheyecatch001
エクセルVBAで利用できる関数についてがテーマです。 今回は、データリストから必要な値や数値を取り出してくる「Match関数」について、使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAでよく使うワーク ...
続きを読む
vbahairetu3eyecatch
エクセルVBAで変数を利用するとき、二次元配列変数を知っていれば何かと便利なことがあります。 今回はそんな配列変数をより実際に近い例題で説明していきます。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAのプログラムでは、 ...
続きを読む
vbahairetu2eyecatch
エクセルVBAで配列を利用する時、それに関わる関数やステートメントを利用すれば、 より簡潔にコードを作成することが出来ます。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBA 配列を扱うときに利用できる関数とステートメント ...
続きを読む
vbahairetueyecatch
エクセルVBAで変数を利用するとき、複数の同じ型で変数を設定したいときがあります。 そんな時、出番となるのが配列変数ということです。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAの1次元配列変数の使い方を説明します。 ...
続きを読む
vbabuttoneyecatch
エクセルVBAのプログラムを実行するのに、ワークシート上に設置したボタンのクリックでワンポチっとで行いたい。 そんなボタンの簡単設置方法を紹介します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAで、シートにマクロ(プ ...
続きを読む
vbasumeyecatch
エクセルVBAで、羅列された数値の集計作業をパパッと熟していきたいときがありますよね。 それを簡単に行える方法としてSUM関数があります。今回はこのSUM関数の使い方についてです。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセ ...
続きを読む
vbainputboxeyecatch
エクセルVBAのプログラムで、利用者からの入力データを取り込んでコードを実行していくことがあります。 その簡潔な方法としてInputBoxがあります。今回はこのInputBoxの使い方についてです。 こんにちは、じゅんぱ店長(@junpa3 ...
続きを読む
vbalastcelleyecatch
エクセルVBAのプログラム作成で、入力データをその都度蓄積していく場合など、 既にデータの入っている最終セルの位置を調べたいという時が多くあります。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAのコード組み立てで、デー ...
続きを読む
vbawithstateeyecatch
エクセルVBAのコードの組み立てでは、視認性や可読性を上げるためにできるだけ記述を簡潔にしたいところです。 Withステートメントは、そういったコード記述を簡潔にする役割があります。 こんにちは、じゅんぱ店長(@junpa33)です。 エク ...
続きを読む
vbacleareyecatch
エクセルVBAでシートを再利用するために、一度内容すべてをクリアしたい時があります。 普通は、Clearメソッドを使ってクリア操作を行いますが・・・ こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAを組み上げる中で、シート ...
続きを読む
vbaoffseteyecatch
エクセルVBAで、セルやセルの選択範囲を移動させるのにOffsetプロパティがあります。 今回の「VBA最速で理解」は、この便利な「Offsetプロパティ」の使い方について説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エ ...
続きを読む
vbanameeyecatch
エクセルVBAで、アクティブセル、アクティブシート、アクティブブックという「現在参照中の・・・」というオブジェクトがあります。 今回の「VBA最速で理解」は、この「ActiveWorkbook」「ActiveSheet」「ActiveCel ...
続きを読む
vbaselacteyecatch
エクセルVBAで、そのコードを実行する先のオブジェクトに、フォーカスするためのメソッドに、「Select」と「Activate」があります。 今回は、このよく似た「Select」と「Activate」について説明します。 こんにちは、じゅん ...
続きを読む
vbavbekidoeyecatch
エクセルVBAを始めようとしたときに一番最初に戸惑うのが、「どうしたらVBAコードを書く表示画面になるのか?」だと思います。 今回は、この「どうしたら、その画面になるんだろう?」についての方法を説明します。 こんにちは、じゅんぱ店長(@ju ...
続きを読む
vbamsgboxeyecatch
エクセルVBAでユーザーフォームを使わなくても、簡単なユーザーとのやり取りならメッセージボックスでも可能です。 今回は、この「ユーザーへのメッセージや選択肢を提示する」ユーザーフォームについての説明をします。 こんにちは、じゅんぱ店長(@j ...
続きを読む
vbadoloopeyecatch
以前の記事でも書いたように、エクセルを使った業務で、「ループの処理」コードは重要な実行処理部分です。 今回は、このもう一つの「ループの処理」である「実行回数が限定されないループ処理」を行うコードについて説明します。 こんにちは、じゅんぱ店長 ...
続きを読む
vbafoldereyecatch
エクセルを使った業務で、「作成したファイルの保存」は作業の最後に必ず必要な部分です。 今回は、この「作成したファイルの保存」を行うための重要部分。保存先フォルダをVBAで指定する方法を説明します。 こんにちは、じゅんぱ店長(@junpa33 ...
続きを読む
vbasengeneyecatch
エクセルVBAのコード組み立てで使う変数。「この変数を使いますよ!」というのが「変数の宣言」です。 今回は、この変数の宣言についてです。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBA のコード組立ての中で、変数の宣言は ...
続きを読む
vbaifjyokeneyecatch
エクセルVBAのコード組み立てで最も必要な、最もよく使うメソッドの1つで「If~Then~Else」があります。 今回はこの「If~Then~Else」メソッドについて設定条件の絞り方のポイントを説明します。 こんにちは、じゅんぱ店長(@j ...
続きを読む
VBACopyeyecatch
エクセルVBAのコード組み立てで、よく使うメソッドの1つで「Copy」メソッドがあります。 今回はこの「Copy」メソッドの使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAで、ワークシートのコピーをを ...
続きを読む
VBAGotoeyecatch001
エクセルVBAのコードで、Gotoステートメントは嫌われ系のグループにはいっています。 それでも、GotoがあるのでVBAコード組み立てがスムーズに、楽に、なる事も多いと言うのも事実です。 こんにちは、じゅんぱ店長(@junpa33)です。 ...
続きを読む
fornextirekoeyecatch
エクセルVBAのコード組み立てで、非常によく使うステートメントの一つにFor~Nextでのループ処理があります。 今回はこのFor~Nextステートメントの使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルV ...
続きを読む

 

<記事内容についての告知>VBAコードの記述記事においては、その記述には細心の注意をしたつもりですが、掲載のVBAコードは動作を保証するものではりません。 あくまでVBAの情報の一例として掲載しています。 掲載のVBAコードのご使用は、自己責任でご判断ください。 万一データ破損等の損害が発生しても当方では責任は負いません