String関数を使用したプログラミング例を紹介します。
例題
繰り返す文字（A4セル）に入力されている文字を繰り返す回数（A2セル）に入力されている数値分繰り返し、結果欄（A7セル）に表示するプログラミング方法です。
[実行前]：
[実行後]：
プログラミング
プログラミングは以下の通りとなります。
[記述例]：
Sub サンプル()
If (Trim(Range("A2")) = "" Or IsNumeric(Range("A2")) = False) Then
MsgBox "A2セルに繰り返す回数を数字で入力して下さい。", 16, "メッセージ"
Else
If (Trim(Range("A4")) = "") Then
MsgBox "A4セルに繰り返す文字を入力して下さい｡ ", 16, "メッセージ"
Else
Range("A7") = String(Range("A2"), Range("A4"))
End If
End If
End Sub
内容を説明すると、
String関数を使用して繰り返す文字（A4セル）に入力されている文字を繰り返す回数（A2セル）に入力されている数値分繰り返し、結果欄（A7セル）に表示して下さい。
との意味になります。
ダウンロード
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。