Excel VBAで指定した文字列をn回繰り返す方法


  1. ループを使用する方法:

    Sub RepeatString()
    Dim inputString As String
    Dim n As Integer
    Dim repeatedString As String
    Dim i As Integer
    
    ' 入力文字列と繰り返し回数を指定
    inputString = "Hello"
    n = 3
    
    ' 文字列を繰り返す
    For i = 1 To n
        repeatedString = repeatedString & inputString
    Next i
    
    ' 結果を表示
    MsgBox repeatedString
    End Sub
  2. String関数を使用する方法:

    Sub RepeatString()
    Dim inputString As String
    Dim n As Integer
    Dim repeatedString As String
    
    ' 入力文字列と繰り返し回数を指定
    inputString = "Hello"
    n = 3
    
    ' 文字列を繰り返す
    repeatedString = String(n, inputString)
    
    ' 結果を表示
    MsgBox repeatedString
    End Sub

これらのコード例では、"Hello"という文字列を3回繰り返しています。入力文字列や繰り返し回数は、自分の要件に合わせて適宜変更してください。

この方法を使用することで、Excel VBAで指定した文字列を任意の回数繰り返すことができます。