| |
▼UO3 さん：
ちゃちゃですが m(_ _)m
>関数ではなく演算子です。ＶＢＡへるぷを参照いただきたいのですが
>割り算のあまりを取得します。
「あまり」はMod 演算子ですよね
ヘルプより
●\ 演算子
2 つの数値の商を計算し、結果を整数で返します。
▼森本家 さん：
セル入力した6桁（または5桁）の数値を「時分秒」に自動で変換したい
のなら、こんな風に考えてもいいかと思います。
（\ 演算子、 Mod演算子 などを使わず時分秒に直しています。）
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B3:C14")) Is Nothing Then Exit Sub
Dim ss As String
ss = Target.Value
If ss Like "#####*" Then
Application.EnableEvents = False
With Target
.Value = CDate(Format$(ss, "00:00:00"))
.NumberFormatLocal = "hh:mm:ss"
End With
Application.EnableEvents = True
End If
End Sub
解決後ですが... 参考まで。
|
|
kanabun
- 11/11/12(土) 19:06 -
