combobox da saat formatı hakkında

[muratcx]

Merhaba arkadaşlar userformda combobox2 de saat verileri var verileri sayfa1 den alıyorum combobox da saati seçtiğimde formatı ondalık oluyor kaydettiğimde normal halini alıyor. Formatı bir türlü ayarlayamadım.

Ayrıca kaydet butonuna bastığımda combobox1 deki tarihi baz alarak tarihin karşılık geldiği haftayı s
C sütununa yazdırmak istiyorum.(şu anda boş yazmaya ayarlı)

Her iki konuda yardımlarınızı rica ediyorum

Örnek dosya ektedir

 

[muratcx]

Arkadaşlar biz çözümü varmı dır

 

[Husgvarna]

Aşağıdaki gibi deneyin.

Private Sub ComboBox2_Change()
ComboBox2 = Format(ComboBox2.List(ComboBox2.ListIndex), "hh:mm")
End Sub

"Yılın kaçıncı haftası?" içinde şöyle

Private Sub CommandButton1_Click()
satır = Sheets("sayfa1").Range("A65536").End(3).Row + 1
    Cells(satır, "A") = ComboBox1
    Cells(satır, "B") = ComboBox2
    Cells(satır, "C") = DatePart("ww", (CDate(ComboBox1)), vbMonday, vbFirstFourDays)
End Sub

 

[muratcx]

Sn Husgvarna,

İlginize çok teşekkür ederim, eline sağlık.