平均を求める関数についてと日付入力について - Office系ソフト - 教えて！goo

こんにちは。

1.○平均を求める関数について
SUBTOTAL 関数を駆使してください。小計のところで、SUBTOTAL を使い、平均でも、SUBTOTALを使用します。

平均は、SUBTOTAL(1,範囲）
小計は、SUBTOTAL(9,範囲）

SUBTOTAL関数は、SUBTOTAL関数の部分を勘定に入れません。

2.○日付入力について

>本日以降の年月日でもっとも近い年度が現れるようにしたいのです。
マクロという方法もありますが、必ず、意識して（明示的に）入力してください。
そういうところで、手を抜くと、後でミスが必ず発生します。
あえて、マクロにするなら、

'シートモジュール

Private Sub Worksheet_Change(ByVal Target As Range)
Dim myDate As Date
If Target.Column <> 1 Then Exit Sub '1列目以外は不可
If IsDate(Target.Text) = False Then Exit Sub
myDate = CDate(Target.Text)
If myDate < Date Then
　 myDate = DateSerial(Year(myDate) + 1, Month(myDate), Day(myDate))
　 Application.EnableEvents = False
　　 Target.Value = myDate
　 Application.EnableEvents = True
End If
End Sub

このぐらいの入力は、面倒でも手動でしてほしいですね。

3.○携帯電話番号の表示について

桁がきちんと決まっているなら、以下のようになります。
[<=9999999999]000-0000-0000

通報する

○日付入力について

>本日以降の年月日でもっとも近い年度が現れるように

1/2と入力すると平成20年であっても、平成21年１月２日と表示（？表示上のことだけ？）とするのでしょうか？

そうでなければ、判定基準があいまいなため無理だと思います。
例えば、2000年問題時の25/75のような、きちんとした判定基準があればできるとおもいますが・・・

通報する

○平均を求める関数について
>AVERAGE関数が使えません。

関数の範囲指定するところで、CTRLキーを押しながら範囲指定をすることにより、離れた箇所でも出来ると思います。

例　AVERAGE(B10:B11,B12:B14)

○携帯電話番号の表示について
表示形式のユーザ設定で
000-0000-0000
といれてみては、いかがでしょうか？

通報する