2016-07-11 VBAサンプル01 'Option ExplicitSub test() Dim strTest As String '文字列を入れる変数を宣言'Dim ws As Worksheet'Set ws = Worksheets("table") strTest = Worksheets("table").Cells(1, 2).ValueDebug.Print strTest 'strTestの中身をデバッグ用プリント End Sub