『1.21.93』
これは1分21秒93を表しているのですが、『81.93』という様に秒数に変換する方法を教えてください。
ネットで調べても『:』で区切ってある場合の説明は出てくるのですが『.(ドット)』区切りは見つかりませんでした。
よろしくお願いします。
. は必ず2つあるとして。
.で文字列を区切り、最上位に当たる数値が分を表すので、60倍すれば秒数になります。
以下、じか書きなので参考程度に。
s = "1.23.45"
d = Split(s,".")
t = cDbl((d(0)*60 + d(1)) & "." & d(2) )
Debug.Print "1.23.45 = " & t
もし、.が3つの可能性もある場合、.の数で場合わけして、それぞれの場合に必要な秒数に換算しましょう。
1時間=60分=3600秒なので、時間数*3600で秒数になりますね。
セルのA1に値が入っているとして、A2に
=IF(ISERR(FIND(".",A1)), 60*A1, 60*LEFT(A1,FIND(".",A1))+MID(A1,FIND(".",A1)+1,LEN(A1)))
と入力すれば変換できますよ。
ありがとうございます。出来ました。
ありがとうございます。ただ初心者なもんで意味がわかりません。