エクセルVBA 領収書の金額をオシャレに表示するコツ。

kingakuhyoujieyecatcha

エクセルVBAを使って領収書を作成する時に金額表示を工夫するとオシャレに表現することができます。

数字1文字ごとに書体を変えることもできます。
お店独自のオンリーワンの領収書を作ることもできます。

 

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

 

この記事は前回に引き続いて、領収書テンプレートへのデータ表示の設定を行います。

今回は領収書の金額を工夫した表示なるようにします。

 

前回までの記事の確認をしていただくと分かり易くなると思います。

<<<前の記事を読み返す<<<

VBAで発行データを領収書に反映』へ

ryousyudataeyecatchaVBAでオリジナルな領収書の作成に、エクセルのデータを反映します。

 

 

領収書の金額表示をオシャレにする

 

金額を表示するスタイルについて考えます。

たとえば 13000円の金額を表示するのに「¥13000」や「13000円」や「1万3千円」や「¥13,000-」などなど、他にもいろんな表示方法があると思います。

 

この記事で行う金額表示のデザインについては、テンプレートに表示枠を設定しましたように、

「¥」・「1」・「3」・「,」・「0」・「0」・「0」 の7つの文字をそれぞれ、セルに1つずつ順番に表示するようにします。

kingakuhyouji001

「おもてなし」を「お・も・て・な・し」と表示するするような感じです。

 

今回はこの「¥13,000-」の形でVBAを組み上げたいと思います。

 

領収金額データを加工してVBAコードで記述する

 

MEMO
領収書作成のエクセルVBA全コードを確認することが出来ます。

ryousyu_VBAkanseieyecatchオリジナルな領収書作成のエクセルVBA モジュール記述の全コード集

 

まず、表示においては

金額の桁数を調べて、3桁毎に ” ( , )カンマ ” を付けます。

例えば、

13000 (文字数5個)であれば → 加工後は 13,000 (文字数6個)

1300000 (文字数7個)であれば → 加工後は 1,300,000 (文字数9個)

のように変化します。

 

領収金額の桁数を調べる

 

ここで使う変数

  • 領収金額の桁数・・・・anum1
  • 領収金額・・・・・・・aBill
  • 3桁ごとのブロックとしたときの数・・・P
  • 桁数(anum1)を3で割った時の商・・・X
  • 桁数(anum1)を3で割った時の余り・・Y

ここで使う関数・メソッド

  • 指定した文字列の長さを返す関数・・・・・Len
  • データ型を文字列型に変換する関数・・・・CStr

ここで使う演算子

  • 割り算の商を返します・・・・・・¥
  • わりざんの余りを返します・・・・Mod

 

MEMO

Len関数についてはこの記事を参考にしてください。

vbaleneyecatchエクセルVBA Len関数で文字列の文字数を知る方法

CStr関数についてはこの記事を参考にしてください。

vbastrcstreyecatchエクセルVBA Str関数とCStr関数の知っておくべき違いと使い方を説明します

 

最初に領収金額の数字の桁数を数えます。

その都度変わる桁数を、桁数を変数として「anum1」とします。文字数を数えるコードを記述すると、

anum1 = Len(CStr(aBill))

aBill」は発行データ入力シートの金額データの変数です。

CStrとLenは金額データを値ではなく文字の並び(文字列型)として考えて、さらに文字数(桁数)を数えます。

次に、3桁毎にカンマを入れることになるので、数えた文字数を3桁区切りのブロックとした数を調べます。

ブロック数を”P”とすると、

X = anum1 ¥ 3   ・・・ 3で割った商がX

Y = anum1 Mod 3 ・・・ 3で割った余りがY

 

  • Y=0であれば、ブロック数Pは、=X となります。
  • Yが0でなければブロック数Pを計算するのに、X個と端数になります、端数は1個として数えてブロック数Pは、=X+1

とします。

 

ここまでのことをVBAコードにすると

コード⑤

コード
  anum1 = Len(CStr(aBill))
  x = anum1 \ 3
  Y = anum1 Mod 3
  If Y <> 0 Then
    P = x + 1
  Else
    P = x
  End If

 

カンマの入った金額に変更する

 

ここで使う変数

  • 領収金額の桁数・・・・anum1
  • 領収金額・・・・・・・aBill
  • カンマを付けた領収金額の桁数・・・・anum2
  • カンマを付けた領収金額・・・・・・・aBilln
  • 領収金額を3桁ごとにまとめブロックとし格納した配列変数・・・myBOX(5)
  • 3桁ごとのブロックとしたときの数・・・P
  • 桁数(anum1)を3で割った時の余り・・Y
  • ループ回数の変数・・・・・・・・・・・t

ここで使う関数・メソッド

  • 指定した文字列の長さを返す関数・・・・・Len
  • データ型を文字列型に変換する関数・・・・CStr
  • 指定した文字列で開始位置から指示数分だけ切り出す関数・・・・Mid
  • 配列の要素を結合する関数・・・・Join

 

MEMO

Mid関数についてはこの記事を参考にしてください。

vbamideyecstchエクセルVBA Mid関数・Right関数・Left関数で文字列の一部を切り出す

Join関数についてはこの記事を参考にしてください。

vbajoineyecatchエクセルVBA Join関数の使い方 配列変数で文字列を要素化した時に効く

1次元配列変数についてはこちらを参考にしてください。

vbahairetueyecatchエクセルVBA 1次元配列変数の利用法を最速に理解

 

先ほどのブロックをブロック単位でP個、”カンマ”を付けて繋いでいけばカンマの入った金額になります。

カンマの入った金額を新しい変数として”aBilln”とします。

3桁ずつのブロックをそれぞれの変数に格納していきます。

 

今回作成している領収書は、

領収書の金額表示の最大が15桁になりますので、ブロックの最大個数は5個になります。

 

格納庫を変数”myBOX”とします。

条件式を使って

    • P = 1 (amun1)の時この場合は、3桁までの金額になりますので、カンマを付ける必要はありません。【aBilln = CStr(aBill)】
    • P ≠ 1 の時この場合は、さらに分割して
      • 余りYが0でなければ余りYの数(1か2)の分だけ先に”CStr(aBill)”から文字を切り取って”myBOX”に、格納後は文字数3個ずつ残りの”CStr(aBill)”から文字を切り取りそれぞれ”myBOX”に格納します。
      • 余りYが0であれば最初から、文字数3個ずつ”CStr(aBill)”から文字を切り取りそれぞれ”myBOX”に格納します。

この一連の作業をP回繰り返し(ループ)します。

 

そして、作ったそれぞれの収納庫を順番に”カンマ”加えて連結(変数”aBilln”)していきます。

カンマを加えた数字の桁数を数え直します。

桁数を変数として”anum2”と名付けます。文字数を数えるコードを記述すると、
anum2 = Len(aBilln)となります。

ここまでをVBAコードに直すと

コード⑥

コード
  Dim myBOX(5) As String

'領収金額が3桁以下の時の処理
  If anum1 = 3 Or anum1 = 2 Or anum1 = 1 Then
    aBilln = CStr(aBill)

'領収金額が4桁以上の時の処理
  Else
    For t = 0 To P - 1
'桁数の余りが存在する時
      If Y <> 0 Then
'桁数の余り分を先頭桁から切り出す
        If t = 0 And Y <> 0 Then
          myBOX(0) = Mid(aBill, 1, Y)
'残り桁数を3桁ずつ最後まで切り出す
        Else
          myBOX(t) = Mid(aBill, Y + 3 * (t - 1) + 1, 3)
        End If
'桁数の余りがない時
      Else
        If t = 0 Then
          myBOX(0) = Mid(aBill, 1, 3)
        Else
          myBOX(t) = Mid(aBill, Y + 3 * t + 1, 3)
        End If
      End If
    Next t

'3桁づつのブロックの末尾にカンマを付ける
    aBilln = Join(myBox, ",")
  End If

'カンマを付けた領収金額の桁数を調べる
  anum2=Len(aBilln)

 

ここまでのコード⑤とコード⑥をVBEのコードウインドに貼り付けてください。

貼り付けの場所に注意してください。コード②を貼り付けた下に貼ってください。

こんな感じになったでしょうか。

kingakuhyouji002a

 

加工した領収金額データを適所に表示するVBAコード

 

領収書シートでの表示に関するVBAコードの記述作業をしていきます。

 

最初に前回作成した時の残りデータをクリアーする

 

まず注意しなければならないのは、前に表示させた領収書のデータが、次に作成する領収書の時にもそのまま残っていることです。

次に表示させたいデータのために、前に表示したデータを忘れずに消去しないといけません。

 

領収金額の表示セルは”セルE10からセルT10” と ”セルE32からセルT32”になります。

セルの値を消す方法はいろいろ考えれますが、今回は空文字列 ”” を使って値を消します。

セルE10は”10行目の5列目” セルT10は”10行目の20列目”ということですので、

前記事での説明では、Range(”E10”) Range(”T32”)と説明しましたが、

セルの位置指定の表示方法は他にも、

セルE10はCells(10,5) セルT10はCells(10,20)と表示できます。

この表現方法を利用して、列の5番目から20番目までを1つづつ順番に消していく(消去作業をループする)方法を使います。

 

金額の先頭には円マークを付けます。これは固定項目です。

Range(”E10”)= ”¥”

Range(”E32”)= ”¥”

 

VBAコード的にはこのようになります。

コード⑦

コード
  For s = 0 To 15
    Cells(10, s + 5).Value = ""
    Cells(32, s + 5).Value = ""
  Next s
  Range("E10")="¥"
  Range("E32")="¥"

 

1セルごとに金額の数字(文字)を入れます

 

ここで使う変数

  • カンマを付けた領収金額の桁数・・・・anum2
  • カンマを付けた領収金額・・・・・・・aBilln
  • 3桁ごとのブロックとしたときの数・・・P
  • カンマを付けた領収金額の最後の文字が入るセルの列位置・・・Z
  • 桁数(anum1)を3で割った時の余り・・Y
  • ループ回数の変数・・・・・・・・・・・i
  • ループ回数の変数・・・・・・・・・・・j

ここで使う関数・メソッド

  • 指定した文字列で開始位置から指示数分だけ切り出す関数・・・・Mid

 

変数aBillnの数値を1桁(1個)づつ切り取ってセルに入れていきます。

For i = 1 to anum2

Cells(10,5+i).Value = Mid(aBilln,i,1)

Next i

 

ここで注意しなければならないことがあります。

3桁ずつのブロックにしてmyBOX5つに収納しています。

 

先ほどの例で言うと

myBOX(0)は”1”  myBOX(1)は”300”  myBOX(2)は”000”  myBOX(3)は” ”  myBOX(4)は” ”  myBOX(5)は” ” の値になっています。

カンマ ”,” 付きで連結しましたので、この場合変数aBilln は 1,300,000,,,となっています。

この場合、領収書表記するときに要らないカンマ ”,” が3つも付いています。

余分なカンマを消去するコードも付け加える必要があります。

If Y <> 0 Then
Z = Y + 3 * (P - 1) + 1 + P - 1
Else
Z = Y + 3 * (P - 1) + 1 + 3 + P - 1
End If

 

固定の項目として、
金額表示の最後に「-」マークを入れます。

 

ここまでのVBAコードで言うと

コード⑧

コード
  For i = 1 To anum2
    Cells(10, 5 + i).Value = Mid(aBilln, i, 1)
    Cells(32, 5 + i).Value = Mid(aBilln, i, 1)
  Next i
  If Y <> 0 Then
    Z = Y + 3 * (P - 1) + 1 + P - 1
  Else
    Z = Y + 3 * (P - 1) + 1 + 3 + P - 1
  End If
  Cells(10, Z + 5).Value = "-"
  Cells(32, Z + 5).Value = "-"
  For j = Z + 6 To 20
    Cells(10, j).Value = ""
    Cells(32, j).Value = ""
  Next j

 

このようになります。

kingakuhyouji003

 

エクセルVBAで領収書の金額をおしゃれに表示のまとめ

 

1つのセルに金額をまとめて表示するだけなら、考えるまでもなく全く簡単にできてしまいます。

でも、

今回のように領収書の金額表示を少し凝った表示にしようとすると、ちょっとした手間がかかってしまうのは事実です。

その代わりその分、他店とはひと味もふた味も違ったものになったりします。

皆さんも是非チャレンジしてみてはどうでしょうか。

 

表示テストをしてみてください。

文字の大きさ、右詰め中央左詰めも同時に調整をしてみてください。

 

次回は、最終回です。

コントロールパネルを作って、発行年月日の設定と印刷開始ボタンなどを配置していきます。

 

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

 

>>>次の記事へ進む>>>

ユーザーフォームのVBAを使って印刷全体をコントロール』>>>

ryousyu_userformeyecatchaエクセルで領収書、ユーザーフォームのVBAで印刷をコントロール

 

領収書作成シリーズ一覧
ryousyumihoneyecatcha
知る人ぞ知る「領収書作成の鬼仕事」。領収書の作成と印刷をEXCELを利用して超時短の仕事に変えてみます。 一度システムを作ってしまえばあとは永年無料で超時短です。 これでレジの感熱紙領収書では不可という顧客にも対応できて「手書き領収書地獄」 ...
続きを読む
ryousyusho_tempeyecatch3aa
領収書発行ソフトを無料DLで利用できます。市販領収書サイズのA6版で1枚づつ印刷します。 また、この業務実使用のエクセルVBAソフトの自作法を解説していきます。 初回はテンプレートづくりです。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
ryousyuineieyecatcha
領収書の作成はエクセルで売上データなどから容易く作成することはできます。 が、自動化して、しかも発行者印を押してとなると、参考となるものが非常に少ないです。 今回、自店で使っているやり方を紹介いたしますので参考にしていただければと思います。 ...
続きを読む
ryousyudataeyecatcha
エクセルVBAを使って独自に作った領収書に、発行情報をまとめた一覧表からのデータを反映させます。 こうすれば、その一覧表のデータ内容を変更するだけで簡単に登録修正や再発行ができるようになります。 こんにちは、じゅんぱ店長(@junpa33) ...
続きを読む
kingakuhyoujieyecatcha
エクセルVBAを使って領収書を作成する時に金額表示を工夫するとオシャレに表現することができます。 数字1文字ごとに書体を変えることもできます。 お店独自のオンリーワンの領収書を作ることもできます。 こんにちは、じゅんぱ店長(@junpa33 ...
続きを読む
ryousyu_userformeyecatcha
エクセルで領収書を作成します。 ユーザーフォームのVBAを使って印刷全体をコントロールできるようにします。 今回がこのテーマの記事の最終回となります。 こんにちは、じゅんぱ店長(@junpa33)です。 今回は、領収書印刷をコントロールする ...
続きを読む
ryousyuyousi
領収書作成シリーズ一覧 領収書の用紙について 一般的に市販されている領収書は、小切手帳判(84x175mm)やA6ヨコ版(105x154mm)が中心です。 そこで今回作成した領収書は、A6ヨコサイズに設定しています。 使用する用紙についてで ...
続きを読む
printerselecteyecatcha
こんにちは、じゅんぱ店長(@junpa33)です。 今回は、紆余曲折しながら今、メインで使っているプリンターの話題についてです。 今まで幾つかの機種を使って来ましたが、現在一番フィットしているプリンターについてです。 業務作業で、プリンター ...
続きを読む
ryousyu_VBAkanseieyecatch
エクセルVBAを使って、オリジナルな領収書の作成を解説してきました。 ここで、各モジュールに記述するVBA全コードを一覧で紹介します。 VBAコード配置の確認に利用してください。 こんにちは、じゅんぱ店長(@junpa33)です。 「領収書 ...
続きを読む

 

業務効率UPのためにエクセル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コードのご使用は、自己責任でご判断ください。 万一データ破損等の損害が発生しても当方では責任は負いません。