[[20100219120627]] 『入力させた数値を「分」として扱いたい』(じゃぐ) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『入力させた数値を「分」として扱いたい』(じゃぐ)

 いつもお世話になっております。
 Excel2003、WindowsXP です。
 あるセルに"5"(半角英数)と入力したときに、その数値を5分(シリアル値0.003472)として扱いたいのですが、
 簡単な方法はありますか?
 例えば書式で表示形式をパーセンテージにすると、"1"と入力すると"0.01"と扱われますよね?
 そのような感じで簡単な方法があればご教授いただきたくお願いします。


 VBAでこんな事するくらいしか思いつきませんでした。

  Private Sub Worksheet_Change(ByVal Target As Range)
  If Application.Intersect(Target, Me.Range("A1:A10")) Is Nothing Then Exit Sub
  If Target.Value <> "" Then
    Application.EnableEvents = False
    Target.Value = TimeSerial(0, Target.Value, 0)
    Application.EnableEvents = True
  End If
  End Sub

 (momo)

 5 を入力するだけで 0:05 と同じ扱いにはなりません。
なにかの設定でそうなるものでもありません。
「0:05 として扱いたかったら、0:05と入力しなさい」というのが時刻シリアル値の
仕様です。
作業の最後で1440という数値をコピーして、対象セルに「形式を選択して貼り付け」で
「除算」にチェックして貼り付けすると時刻シリアル値に近い数値にはなりますが、
この方法には微小な誤差が発生する可能性があります。
 
こちらの方がお勧め
[[20040523125849]] 『時間入力の自動変換』(koko) 
 
(みやほりん)(-_∂)b

 momoさん、みやほりんさん、ありがとうございました。
 やっぱ簡単には行きそうにないですね。
 私も数式やVBAを駆使(?)して頑張ってみます。
 どうもでした!
 (じゃぐ)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.