| |
▼momoko さん：
>勤務表の作成で、少数点での入力（例：13.00と入力で⇒13:00になる）時間値へ
>変換できるマクロ及び設定方法をご存知でしたら教えてください。
オートコレクトを利用されてはいかがでしょうか。
マクロで切り替えるならこんな感じです。^d^
Sub ドットコロン切替()
Dim V As Variant
Dim i As Integer
Dim Flg As Boolean
V = Application.AutoCorrect.ReplacementList
For i = 1 To UBound(V)
If V(i, 1) = "." Then
Flg = True
Exit For
End If
Next
If Flg Then
Application.AutoCorrect.DeleteReplacement What:="."
MsgBox "元に戻しました。"
Else
Application.AutoCorrect.AddReplacement What:=".", Replacement:=":"
MsgBox "設定しました。"
End If
End Sub
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
- 06/6/27(火) 21:49 -
