• ベストアンサー

記述

下記コードでRows("gyou:gyou").Select が正しくありません。Rows("4:4").Select の意味にさせるにはどう記述すればよいか。お教え願います。 Sub Macro1() ' Dim gyou As Integer gyou = 4 ' Rows("4:4").Select Rows("gyou:gyou").Select Selection.Insert Shift:=xlDown End Sub

質問者が選んだベストアンサー

  • ベストアンサー
  • marbin
  • ベストアンサー率27% (636/2290)
回答No.3

#1です。ご提示のコードは↓のように書くことも出来ます。 Dim gyou As Long gyou = 4 Cells(gyou, 1).EntireRow.Insert

すると、全ての回答が全文表示されます。

その他の回答 (3)

  • mu2011
  • ベストアンサー率38% (1910/4994)
回答No.4

次の方法は駄目でしょうか。 gyou = "4:4" Rows(gyou).Select

すると、全ての回答が全文表示されます。
  • hana-hana3
  • ベストアンサー率31% (4940/15541)
回答No.2

"" で囲むと文字列として扱われます。 Rows(gyou & ":" & gyou).Select とか Rows(gyou).Select

すると、全ての回答が全文表示されます。
  • marbin
  • ベストアンサー率27% (636/2290)
回答No.1

変数を""で括ってはいけません。 単なる文字列と看做されます。 Rows(gyou & ":" & gyou).Select

すると、全ての回答が全文表示されます。