書誌データをWebから収集!エクセルVBAでデータをフル活用

hancus1aa

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

 

販売管理ソフトの販売王の効率的な利用で、今回から客注注文品の販売伝票(売上伝票)を迅速に作成する裏ワザテクニックについてもっと掘り下げていきます。

 

今回の記事は、商品登録に必要な書誌データをWebページから入手して、エクセルVBAでフル活用できる方法を説明します。「商品登録」をする場面での時短ワザです。

 


(全体としての目標)

販売管理ソフト販売王で伝票を作成するときには、業務時間を短縮できる方法があります。

販売王の伝票発行の基本の流れとしての<顧客登録→商品登録→売上伝票作成→伝票発行>は省略することはできません。

ですので、この流れの中の各作業部分でそれに掛かる時間を短縮する方法を考えていくことになります。

 

販売商品を販売王に直接データ入力するのではなく、一旦、それを外部でCSVデータ化して販売王にインポートするという方法をとります。
販売商品のデータを一度にまとめてCSVデータとして販売王にインポートしたほうが効率的な作業が出来るというわけです。

 

今までの伝票発行の方法にもよりますが、この方法で販売王を使って伝票作成した場合、
恐らく、一顧客10品目の伝票作成でしたら伝票作成まで作業時間は10分掛からないと思います。

以前と比べて格段の時短作業になっているのではないでしょうか。


 

前の記事を確認する。↓

無料で時短!販売王のデータ入力・出力機能で伝票作成をカスタマイズ

hanbaiou2eyecatchaa 無料で時短!販売王のデータ入力・出力機能で伝票作成をカスタマイズ

 

販売王カスタムツール作成記事一覧
hanbaioueyecatch01aaa
こんにちは、じゅんぱ店長(@junpa33)です。 販売管理に必須のソフト、販売王の使い方について考えていきます。 はじめてパッケージを開けたときに出てくる使い方マニュアルは確かにかなり分厚いです。でも、この記事を読み進んでいただくと、使い ...
続きを読む
hanbaiou2eyecatchaa
こんにちは、じゅんぱ店長(@junpa33)です。 今回は、販売管理ソフトの販売王のカスタマイズについてもっと掘り下げていきます。 販売王のデータ入力やデータ出力についてのカスタマイズについてです。 しかもエクセルがあれば、ソフトの追加費用 ...
続きを読む
hancus1aa
こんにちは、じゅんぱ店長(@junpa33)です。 販売管理ソフトの販売王の効率的な利用で、今回から客注注文品の販売伝票(売上伝票)を迅速に作成する裏ワザテクニックについてもっと掘り下げていきます。 今回の記事は、商品登録に必要な書誌データ ...
続きを読む
hancus2eyecatch
こんにちは、じゅんぱ店長(@junpa33)です。 今回のテーマは、 先回解説しました「書誌データ抽出.xlsm」をVBAコードのパーツで使って、販売商品の商品データ(書誌データ)を販売王にインポートする方法を完成させます。 販売王へのデー ...
続きを読む
hanbaiurieyecatchaa
こんにちは、じゅんぱ店長(@junpa33)です。 先回作成しましたエクセルBOOK「販売データ入力.xlsm」で、販売王への商品登録を外部データから行えるようになりました。 今回は、販売伝票(売上伝票)を外部データのインポートによって素早 ...
続きを読む
hancustorieyecatchaa
こんにちは、じゅんぱ店長(@junpa33)です。 今回は「販売データ入力.xlsm」の使い方について、設置方法から取扱説明書風に説明していきたいと思います。 このエクセルソフトは以下からダウンロードすることができます。ダウンロード頂いた「 ...
続きを読む

 

 

 

販売商品のCSVデータを販売王にインポートするための作業工程

keyborder001a

① 販売商品の商品データ(書誌データ)を取り出す

  • 商品注文画面から商品データ(書誌データ)を吸い上げる。(一品ずつ手打ちで情報入力はしない)
  • エクセルVBAコードを記述し利用可能な状態にする。

② 販売王が要求する必要な書誌データを付加する

③ 作成したエクセルシートをCSVデータ化して所定場所に名付けした上で保存する

④ 販売王のテキストデータ入力画面で入力作業して完了

 

この様に大きく4つのステップで、販売王に効率的に販売商品のデータ一度にまとめてCSVデータでインポートすることができます。

 

顧客データを販売王にインポートする

 

顧客データについての販売王への一括入力に関しては、販売王の初期導入時にあることかもしれません。その時は今回同様エクセルVBAを使って行うこととなります。

今回の記事テーマの中でも、個別に顧客データを追加しないといけないことがあると思います。

ただ今回のそういった場合は、恐らく販売王の顧客入力窓から直接データ入力したほうが作業的にも効率的かと思います。(大量の数の入力ではないかと思います。)

したがって、このテーマの中では、顧客データの外部CSVデータの一括のインポートについての記事は掲載していません。

また改めて別の機会で説明したいと思います。

 

販売商品の商品データ(書誌データ)を取り出す

kanseizaikoborder001

今回この記事では、まず商品登録に必要な書誌データをWebページから入手する方法を説明していきます。

 

Webページから書誌のデータの取り出しを行います。

取り出し元のWebページによってエクセルVBAコードを変更する必要があります。

この手法は、エクセルVBAでつくる他のソフトにも利用することができます。

それでは順を追って説明をしていきます。

 

 

シート名を変更します

 

新しいエクセルBOOKを開きます。

シート名を

Sheet1 → 「操作ボタン」
Sheet2 → 「貼り付け」
Sheet3 → 「作業シート」

とします。

Sheet名のタブをダブルクリックすると名前の変更ができる状態になります。

 

BOOK名を「書誌データ抽出」として変更保存

 

「ファイル」タブ→「名前を付けて保存」をクリック。

保存場所は分かり易い場所へ、

BOOK名は「書誌データ抽出.xlsm」としてください。

エクセルVBA保存のため、マクロ有効BOOKで保存してください。

 

販売商品の書誌データ抜き出しのエクセルVBAを記述します

 

Webからの書誌データ取り出しについては、取り出し元のWebページによって、

エクセルVBAのコードを変える必要があります。

 

日販NOCSからの書誌データ取り出し

Webページに表示されたテキストの必要個所をコピーして、

hanbaicustm1001a

エクセルの「貼り付け」シートにテキストのみペーストします。

hanbaicustm1002a

そしてその貼り付けられた書誌データの内、必要な書誌データのセル番号を指定してピッキングしていきます。

日販のWebに関しては、「出版社」と「本体価格」の書誌データ取り出しについては余分な文字の削除などが必要です。

取り出した書誌データは「作業シート」に書き出しします。

 

MEMO

入力セルの最終行を取得する方法はこちらを参考にしてください。

vbalastcelleyecatchエクセルVBA データ入力済セルの最終行番号を取得する方法

Replace関数の使い方についてはこちらの記事を参考にしてください。

vbareplaceeyecatchエクセルVBA Replace関数で文字列を置換・削除。VBA最速理解

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

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

InStr関数の使い方についてはこちらの記事を参考にしてください。

vbainsteeyecatchエクセルVBA Instr関数・InstrRev関数で文字列を検索する

Mid関数、Right関数、Left関数についてはこちらを参考にしてください。

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

エクセルVBAを初めて立ち上げる時に参考になる記事はこちらです。

vbavbekidoeyecatchエクセルVBA 始めての起動。VBEの立ち上げ、保存と終了

 

日販NOCSからの書誌データ取り出しのエクセルVBAコード

Sub NOCSデータ登録()
Dim nR As Long
Dim L As Long, M As Long, kkkm As variant, n As Long, kkk As variant
Dim spa As String, sp As String

    Worksheets("貼り付け").Select
    Range("A:A").NumberFormatLocal = "0_ "
    
    Worksheets("作業シート").Select

  If Range("B1").Value <> "書名" Then
      Range("A1").Value = "ISBN"
      Range("B1").Value = "書名"
      Range("C1").Value = "出版社"
      Range("D1").Value = "著者"
      Range("E1").Value = "本体価格"
  End If
    nR = Range("A1").CurrentRegion.Rows.Count + 1
    
'書名
    Worksheets("貼り付け").Range("A2").Copy _
        Destination:=Worksheets("作業シート").Range("B" & nR)
'出版社
    spa = Replace(Worksheets("貼り付け").Range("A18"), "発行所=", "")
    sp = Replace(spa, "発売所=", "")
    Worksheets("作業シート").Range("C" & nR) = Trim(sp)
'著者
    Worksheets("貼り付け").Range("A21").Copy _
        Destination:=Worksheets("作業シート").Range("D" & nR)
'本体価格
    L = Len(Worksheets("貼り付け").Range("A26"))
    M = InStr(Worksheets("貼り付け").Range("A26"), "体")
    kkkm = Right(Worksheets("貼り付け").Range("A26"), L - M)
    n = InStr(kkkm, "円")
    kkk = Left(kkkm, n - 1)
    Worksheets("作業シート").Range("E" & nR) = kkk
'ISBN
    Worksheets("作業シート").Range("A" & nR).NumberFormatLocal = "0_ "
    Worksheets("貼り付け").Range("A33").Copy _
        Destination:=Worksheets("作業シート").Range("A" & nR)
    Worksheets("作業シート").Cells.EntireColumn.AutoFit
        
    Worksheets("貼り付け").Range("A1:A65").Clear
    Worksheets("貼り付け").Activate
    Range("A1").Select
    
End Sub

こちらのエクセルVBAコードを「書誌データ抽出.xlsm」のModule1に「NOCSデータ登録()」として保存してください。

 

Moduleの起動法はこちらから確認してください。↓

「VBE(ビジュアルベーシックエディター)を起動する」

 

出版書誌データベースからのデータ取り出し

閲覧ブラウザは「Microsoft Edge」の場合です。

Webページに表示されたテキストの必要個所のコピー

hanbaicustm1003a

 

エクセルの「貼り付け」シートに「テキストのみ」としてペースト

hanbaicustm1004a

 

出版書誌データベースを利用する場合は、

エクセルの「貼り付け」シートに貼り付けられる書誌データのセル位置がその都度変動します。

ピッキングする書誌データの一行上にはその書誌データの項目が表示されているので、それをガイドとしてセル位置を特定します。

取り出した書誌データは「作業シート」に書き出しします。

 

出版書誌データベースからの書誌データ取り出しのエクセルVBAコード

Sub 出版書誌データ登録()

Dim hR As Long, nRr As Long
Dim s As Long
Dim tyoR As Long, ISR As Long, syuR As Long, prR As Long
Dim tyo As String, pri As Long

    Worksheets("貼り付け").Select
    Range("A:A").NumberFormatLocal = "0_ "
    hR = Cells(Rows.Count, 1).End(xlUp).Row
    
    For s = 1 To hR
        If InStr(Range("A" & s), "著:") > 0 Then tyoR = s
        If Range("A" & s) = "ISBN" Then ISR = s + 1
        If Range("A" & s) = "出版社" Then syuR = s + 1
        If Range("A" & s) = "定価" Then prR = s + 1
    Next s
    
  Worksheets("作業シート").Select
  
    If Range("B1").Value <> "書名" Then
        Range("A1").Value = "ISBN"
        Range("B1").Value = "書名"
        Range("C1").Value = "出版社"
        Range("D1").Value = "著者"
        Range("E1").Value = "本体価格"
    End If
    
    nRr = Range("A1").CurrentRegion.Rows.Count + 1
    
'書名
    Worksheets("貼り付け").Range("A2").Copy _
        Destination:=Worksheets("作業シート").Range("B" & nRr)
'出版社
    Worksheets("貼り付け").Range("A" & syuR).Copy _
        Destination:=Worksheets("作業シート").Range("C" & nRr)
'著者
    tyo = Replace(Worksheets("貼り付け").Range("A" & tyoR), "著:", "")
    Worksheets("作業シート").Range("D" & nRr) = Trim(tyo)

'本体価格
    pri = Replace(Worksheets("貼り付け").Range("A" & prR), "円(本体)", "")
    Worksheets("作業シート").Range("E" & nRr) = Trim(pri)

'ISBN
    Worksheets("作業シート").Range("A" & nRr).NumberFormatLocal = "0_ "
    Worksheets("貼り付け").Range("A" & ISR).Copy _
        Destination:=Worksheets("作業シート").Range("A" & nRr)
    Worksheets("作業シート").Cells.EntireColumn.AutoFit
            
    Worksheets("貼り付け").Range("A:A").Clear
    Worksheets("貼り付け").Activate
    Range("A1").Select
    
End Sub

こちらのエクセルVBAコードを「書誌データ抽出.xlsm」のModule1に「出版書誌データ登録Edge()」として保存してください。

 

Moduleの起動法はこちらから確認してください。↓

「VBE(ビジュアルベーシックエディター)を起動する」

 

閲覧ブラウザが「Internet Explorer11」の場合

Microsoft Edgeとは表示内容が変わりますので、新たなコードを作成しました。

Sub 出版書誌データ登録IE11()

Dim hR As Long, nRr As Long
Dim s As Long
Dim tyoR As Long, ISR As Long, syuR As Long, prR As Long
Dim tyo As String, pri As Long, pr As String, syu As String
Dim ISa As Variant

    Worksheets("貼り付け").Select
    Range("A:A").NumberFormatLocal = "0_ "
    hR = Cells(Rows.Count, 1).End(xlUp).Row
    
    For s = 1 To hR
        If InStr(Range("A" & s), "著:") > 0 Then tyoR = s
        If InStr(Range("A" & s), "ISBN") > 0 Then ISR = s
        If InStr(Range("A" & s), "出版社") > 0 Then syuR = s
        If InStr(Range("A" & s), "定価") > 0 Then prR = s
        If InStr(Range("A" & s), "発行年月日") > 0 Then hakR = s
    Next s
    
  Worksheets("作業シート").Select
  
    If Range("B1").Value <> "書名" Then
        Range("A1").Value = "ISBN"
        Range("B1").Value = "書名"
        Range("C1").Value = "出版社"
        Range("D1").Value = "著者"
        Range("E1").Value = "本体価格"
        Range("F1").Value = "発行年月日"
    End If
    
    nRr = Range("A1").CurrentRegion.Rows.Count + 1
    
'書名
    Worksheets("貼り付け").Range("A5").Copy _
        Destination:=Worksheets("作業シート").Range("B" & nRr)
'出版社
    syu = Replace(Worksheets("貼り付け").Range("A" & syuR), "出版社", "")
    Worksheets("作業シート").Range("C" & nRr) = Trim(syu)
'著者
    tyo = Replace(Worksheets("貼り付け").Range("A" & tyoR), "著:", "")
    Worksheets("作業シート").Range("D" & nRr) = Trim(tyo)

'本体価格
    pr = Replace(Worksheets("貼り付け").Range("A" & prR), "円(本体)", "")
    pri = Replace(pr, "定価", "")
    Worksheets("作業シート").Range("E" & nRr) = Trim(pri)

'ISBN
    ISa = Replace(Worksheets("貼り付け").Range("A" & ISR), "ISBN", "")
    Worksheets("作業シート").Range("A" & nRr).NumberFormatLocal = "0_ "
    Worksheets("作業シート").Range("A" & nRr) = ISa
    
    Worksheets("作業シート").Cells.EntireColumn.AutoFit
            
    Worksheets("貼り付け").Range("A:A").Clear
    Worksheets("貼り付け").Activate
    Range("A1").Select
    
End Sub

 

ここまでのまとめ

keyborder001a

このエクセルVBAコードで、Webページからの書誌データ取り出しが簡単に行えるようになります。

この書誌データ取り出し項目は、「ISBN」「書名」「出版社」「書名」「本体価格」です。

このエクセルVBAは、販売王の一括商品登録のために作成する”販売商品の外部のCSVデータをインポート”のためのソフトの部品として利用することになります。

 

Webページからの書誌データ取り出しのこの手法は、エクセルVBAでつくる他の色々なソフトにも利用することができます。

単純には、それぞれのソフトにここで作成したエクセルVBAコードをそれぞれ埋め込んでいけばOKということです。

けれども、この手法は取り出し元のWebページの仕様に依存していますので、
そのWebページにデザインなどの変更があった場合はその都度
埋め込んだソフトそれぞれに、VBAコードを変更しないといけないことになります。

ですので、そういった大変さや不便さを軽減するために、
今回作成した「書誌データ抽出.xlsm」というエクセルBOOKを共通部品として、
さらに他のエクセルVBAでつくるソフトにも利用していきます。

メンテナンスが必要な時にはこの「書誌データ抽出.xlsm」のエクセルVBAコードを変更すればOKということになります。

 

次回は販売王にインポートできる書誌データをエクセルVBAで作成した

完成形のCSVデータのエクセルシートを作り上げます。

 

次の記事を読んでみる。↓

販売王の商品登録を外部データからCSVでインポートする方法

hancus2eyecatch 販売王の商品登録を外部データからCSVでインポートする方法

 

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

 

Excelマクロ&VBA超入門 今すぐ使えるかんたんぜったいデキます!
エクセルVBAを初めて勉強するときに効く
vbastudy016a
vbastudy017a

電子書籍版「Excelマクロ&VBA超入門」をamazonで見てみる

(著者)井上香緒里
(出版社)技術評論社
(税込価格)1,738円(本体1,580円+税)

マクロとVBAについて学んでみたいけれど,いまひとつ自信がないという方のために,ひとつひとつの操作を丁寧に解説する1冊目の教科書です。
エクセルVBAの「い・ろ・は の い」から説明していますので、安心して取り組める参考書です。
例題として、
  • 「データ消去」「シートのコピー」「メッセージボックス」の機能を持つお小遣い帳
  • 「入力フォーム」の機能を持った歩数表
2つの題材ファイルを作成しながら,マクロとVBAの基本を学習していきます。

 

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