با سلام چطور میشه کاری کنیم که یه ایکون روی یک سلول قرار بدیم و پس ار کلیک و انتخاب تاریخ، تاریخ داخل سلول بیفته ممنون نه داخل فرم و باکس
در واقع میخوام مستقیماً و بدون فرم باشه
در واقع میخوام مستقیماً و بدون فرم باشه
Public Sub sabtTarikh() Dim n If ActiveControl.Caption <> Empty Then Label54.Caption = ComboBox2.Text & "/" & Format(ComboBox1.Text, "00") & "/" & Format(ActiveControl.Caption, "00") Label55.Caption = TbH(Label54.Caption, 2) Label60.Caption = J_GREGORIANDATE(Label54.Caption, 1) ActiveCell = Label54.Caption Unload Me End If
Range("h14") = Label54.Caption
کامنت