OfficeType

VBA~WorksheetFunction.Reptメソッド~Excel

VBAで文字列を指定した回数だけ繰り返して表示したい場合はWorksheetFunction.Reptメソッドを使います。

書き方

WorksheetFunction.Rept(文字列, 繰り返し回数)

例として下の画像において下のコードを実行するとB列の値分の★がC列に繰り返して表示されます。

image-01

Sub test1()

Range("C2") = WorksheetFunction.Rept("★", Range("B2"))
Range("C3") = WorksheetFunction.Rept("★", Range("B3"))
Range("C4") = WorksheetFunction.Rept("★", Range("B4"))
Range("C5") = WorksheetFunction.Rept("★", Range("B5"))
Range("C6") = WorksheetFunction.Rept("★", Range("B6"))

End Sub

image-02