- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：Excel VBA formatについて）
Excel VBA formatについて
このQ&Aのポイント
- Excel VBA formatについての質問です。予約登録システムでComboBoxのデータを設定し、選択した時間を正しく表示できるようにしたいですが、12:00を選択するとエラーが発生し「0.5」になってしまいます。
- Excelで予約登録システムを作成している中で、12:00の選択時にエラーが発生し、表示が「0.5」となってしまう問題が発生しています。現在は応急処置として11:59に対応していますが、適切な解決策を教えていただきたいです。
- VBAを使ったExcelの予約登録システムで、ComboBoxで時間を選択する際に12:00を選択すると「0.5」と表示され、エラーが発生します。現在は11:59に変更して対応していますが、より正確な解決策を知りたいです。
- thincl
- お礼率66% (75/113)
- Excel（エクセル）
- 回答数2
- ありがとう数2
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
RowSourceをやめて_Initialize()でセットしてみてください。 以下はA1からA15までとしてのコードですので、実際に合わせてください。Change()はなくてもいけます。 Private Sub UserForm_Initialize() Dim i As Long For i = 1 To 15 Me.Cmbkjikan.AddItem Format(Cells(i, "A"), "hh:mm") Next End Sub
その他の回答 (1)
- kkkkkm
- ベストアンサー率66% (1719/2589)
回答No.2
No.1の追加です。 もしくは Change()を以下のように変更してみてください。 Private Sub Cmbkjikan_Change() Dim index As Integer With Me index = .Cmbkjikan.ListIndex .Cmbkjikan.Value = Format(.Cmbkjikan.List(index), "hh:mm") End With End Sub
お礼
ありがとうございます。 思い通りの動作になりました。