Alıntı:Ayrıca İzin başlangıç tarihini(C17) Takvim yardımıyla seçim yapmak istiyorum.RDB Tarih Seçici eklentisini indirin
Çalışma Sayfanızdaki Vba kodu ile Tarih Seçici'yi açın
Aşağıdaki kod ile Tarih Seçici'yi açıp / kapatabilirsiniz. Diğer Vba projelerindeki makroyu, Hücre menüsündeki menü öğelerini kullanmak yerine çalışma sayfanızda tarih eklemek için Takvim'i açıp kapatabilirsiniz.
Sub CallDatePickerFromOtherWorkbooks()
Dim TestWkbk As Workbook
Dim obj As Object
If Val(Application.Version) >= 12 Then
Set TestWkbk = Nothing
On Error Resume Next
Set TestWkbk = Workbooks("WinDatePicker.xlam")
On Error GoTo 0
If TestWkbk Is Nothing Then
MsgBox "Sorry the Date Picker add-in is not open."
Else
Application.Run "'" & TestWkbk.Name & "'!OpenDatePicker", obj
End If
End If
End Sub
