第４回：自分で行うキーワード抽出

前回、『第３回：自分で行うキーワード抽出』でベースキーワードに掛け合わせキーワードを掛け合せて、３３９７ワードを作成し、その中から月間検索ボリュームのあるキーワード４３８キーワードにベースキーワード４３を加えてトータル４８１の月間検索ボリュームの有るキーワードを抽出しました。

調査対象サイト：防犯カメラ・監視カメラのサイト

前回までに抽出したキーワード　４８１キーワード

STEP３：別パターン掛け合わせキーワード（場所）の抽出と掛け合わせ

STEP3-1：別パターン掛け合わせキーワード（場所）抽出

STEP１で抽出した４３コのベースキーワードに掛け合せる別パターンのキーワードを抽出します。
弊社の場合、次のサイトを利用して抽出しています。

キーワードサジェスト.com
Keyword Tool
Googleキーワードプランナー
フレーズ、ウェブサイト、カテゴリを使用して新しいキーワードを検索　を利用
Yahoo !知恵袋
kizasi.jpラボ

これらを利用して導き出した掛け合わせキーワード（場所）が以下５４ワードになります。

室内
一軒家
住宅
戸建て
戸建て住宅
家
商店街
倉庫
事務所
太陽光発電
太陽光
駐車場
病院
保育園
幼稚園
店舗
お店
マンション
アパート
分譲マンション
賃貸マンション
小学校
中学校
高等学校
教育施設
大学
飲食店
公園
公共施設
公団
団地
住宅街
ファミレス
屋外
家庭用
畑
庭
玄関
車庫
車
会社
業務用
ドア
コンビニ
スーパー
百貨店
道路
自宅用
屋外用
室内用
ベランダ
学校
天井
ガレージ

STEP3-２：エクセルを利用してベースキーワード×場所の掛け合わせキーワード

エクセルのVisualBasicEditorを利用して掛け合わせを行います。

STEP3-2-1：エクセル立上げ

A列にベースキーワード４３コ
B列に掛け合わせ場所キーワード５４コ
co-006

STEP3-2-2：エクセルVisualBasicEditor

エクセルを開いた状態で、ショートカットキー『Alt＋F11』

VisualBasicEditorが開くので、挿入　⇒　標準モジュール

co-008

標準モジュールクリックでコードウィンドが表示されます。

co-009

標準モジュールで出てきたコードウィンド（右側の白い広い部分）に以下のコードをコピペします。

==========ここから============

Sub test01()
a = Cells(Rows.Count, "A").End(xlUp).Row 'A列最終行取得
b = Cells(Rows.Count, "B").End(xlUp).Row 'B列最終行取得
For i = 1 To a '１行からA列最終行まで繰り返し
For n = 1 To b '１行からB列最終行まで繰り返し
x = x + 1
Cells(x, "C") = Cells(i, "A") & " " & Cells(n, "B") 'C列に結合して転記
Next n
Next i
End Sub

==========ここまで============

co-010