エクセルVBA
Sub 金額未記入のセルをカウント()
Dim kensu As Long
Range("I100").End(xlUp).Select 'リストの最終行を、上方向に向けて指定する
Selection.Offset(0, 1).Select '上で指定したセルの、右の列のセルを指定する
Selection.Font.Bold = True '選択しているセル範囲の文字を太字にする
Range(ActiveCell, "J4").Select '最後のセルから上までの範囲を選択する
ActiveWorkbook.Names.Add Name:="kingaku", RefersToR1C1:=Selection
'金額の範囲に名前をつける
Range("I1").FormulaR1C1 = "=COUNTBLANK(kingaku)" 'セルI1に式を代入する
End Sub
経常費ファイルについての質問です。
月ごとに、ワークシートがあり、品名、個数のあとに、総額を入れています。
個数は最初からデータが入っているため、総額のところが未記入だと、まだ
品物が入荷していない、と、わかるように工夫しました。
上記のマクロで、各ワークシートごとには、未記入セルの個数を表示できるのですが、
違う月のワークシートでも、その数字が表記されてしまいます。
そこで、マクロを実行するボタンを押すと、その月の未記入セルの個数を出すことは
できるのですが、
ワークシートごとに、そのワークシートにあった数字を表記できたままにするには、
どうしたらよろしいでしょうか。
わかりにくい質問で、申し訳ありませんが、よろしくお願いします。