文字列の繰り返し関数はないの?
文字の繰り返し関数はString(n,c)ですが、文字列の繰り返し関数はないの?
ないようです。なので作ってみました。
Function Strings(n,s)
Dim a:ReDim a(n):Strings=Join(a,s)
End Function
MsgBox Strings(5,"abc")
しかし、これくらいなら関数を作らずとも簡単に書けますね。
MsgBox Join(Split(Space(5)),"abc")
更に、こういう方法もあります。
MsgBox Replace(Space(5),Chr(32),"abc")
« すべてのウィンドウを元のサイズに戻す。 | トップページ | 参照が残って終了しないExcelを優しく終了させる。 »