VBA lvwReportが変数定義されていません

質問

皆さんこんにちは。
エクセル2013を使用しております。

Userform1を開いた際にリストビューにリストを載せるべく
見よう見まねで作ったリストビュー用のコードですが
下記のコードを走らせると
「lvwReport」の箇所で
『コンパイルエラー　変数が定義されてません』と出ます。

他のブックで使用していたコードをエクスポートして
現在使用しているブックにインポートしたら
エラーが出るようになってしまいました。

ネット等で調べても「lvwReport」は宣言もなく普通に使われているようですし
そもそも他のブックでは動いていたし・・・
なぜこんなエラーが出るのかさっぱり想像がつきません。

エラーを回避するにはどうしたら良いでしょうか。
ご教授いただけると幸いです。

------------------------------------------------------------------------------------------------
Private Sub UserForm_Initialize()

Dim i As Long
Dim LastRow As Long
LastRow = Sheets("検索").cells(Sheets("検索").Rows.Count, "A").End(xlUp).Row
With ListView1

.View = lvwReport
.LabelEdit = lvwManual
.HideSelection = False
.AllowColumnReorder = True
.FullRowSelect = True
.Gridlines = True
.ColumnHeaders.Add , "施主", Sheet1.Range("B2").Value, 120
.ColumnHeaders.Add , "駅", Sheet1.Range("A2").Value, 60
.ColumnHeaders.Add , "店舗", Sheet1.Range("C2").Value, 80

For i = 2 To LastRow
With .ListItems.Add
.Text = Sheets("検索").cells(i, 2).Text
.SubItems(1) = Sheets("検索").cells(i, 1).Text
.SubItems(2) = Sheets("検索").cells(i, 3).Text

End With
Next
End With
End Sub

回答No.1

mt2008 · ベストアンサー

lvwReportも、その下で使用しているlvwManualもListViewコントロールで使用される定数です。
特に宣言しなくてもListViewコントロールを組み込んでいればエラーにならずに使えるはずです。
ListViewコントロールを組み込んでいないだけでは？

ListViewコントロールは外部コントローラなので標準では組み込まれていません。
自分で組み込む必要があります。

補足

ご回答ありがとうございます。
Userformを作るページ？？のツールボックスに
リストビューが入っていたので
組み込んであると思っていました。
確認してみます！