VBAのマクロの作成例１４−２１ ステ−タスバ−への表示（２） 14-9項と目的は同じであるが本例だと行数が少なくシンプル。 （１）DATA数を表示 Sub 例1421a() cend = 1500 'デバッグ用数値 Application.StatusBar = True For i = 2 To cend Application.StatusBar = "ＤＡＴＡ処理中 --- " & i & "/" & cend ' ---------------------------------------------------- For j = 1 To 10000 'デバッグ用タイミング（実際はここに実行マクロを入れる） Next '----------------------------------------------------- Next Application.St
