サブテスト（）Dim z As String z = 14〜17〜b 17〜14 ActiveSheet.Cells（b、13）= "z"次のz次のエンドサブ

Question

私はVBAを初めてお使いです。新入り。私は、ループ中に引用符で作業する変数を取得しようとしています。たとえば：

Sub test() 
Dim z As String 
For z = 14 To 17 
For b = 14 To 17 

ActiveSheet.Cells(b, 13) = "z" 

Next z 
Next b 

End Sub 

「コンパイルエラー：タイプの不一致」が表示されます。誰かが私が間違っていることを教えてもらえますか？ご協力いただきありがとうございます。

Answer 1

変数zを文字列として宣言します。文字列は数字ではなく、forループでインクリメントまたは使用することはできません。

変数を整数として宣言し、その値をセルに出力します。

外側のzループは内側のbループの前に閉じています。それも問題です。このようなエラーをより明確にするためにコードをインデントすることに慣れておきたいかもしれません。

全体的に、達成したいことは明確ではありません。 z値を範囲に印刷したいだけなら、例えばbループは必要ありません。例：

Sub test() 
Dim z As Integer 

For z = 14 To 17 
' enters z value into column M 
    ActiveSheet.Cells(z, 13) = z 
Next z 

End Sub