excelmacro https://blog.hatena.ne.jp/excelmacro/ excelmacro’s diary https://excelmacro.hateblo.jp/ Sub addString_Exe(n As Integer)'各セルの前後に文字を追加する Dim msg As String Dim strForward As String Dim strBack As String msg = "まず前方" & n & "文字目に追加する文字を入力して下さい。空欄でも構いません。" 'Application.InputBoxのType '0:数式 '1:数値 '2:文字列 '8:セル参照 strForward = Application.InputBox(msg, Title:="前方追加文字列", Type:=2) '文字形式(Type:=2)のIn… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fexcelmacro.hateblo.jp%2Fentry%2F2021%2F09%2F05%2F210332" title="文字追加マクロ - excelmacro’s diary" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2021-09-05 21:03:32 rich https://excelmacro.hateblo.jp/entry/2021/09/05/210332 1.0 100%