sahir73
Altın Üye
- Katılım
- 17 Nisan 2019
- Mesajlar
- 68
- Excel Vers. ve Dili
- Office 2016 Professional Plus 32 Bit
- Altın Üyelik Bitiş Tarihi
- 07-07-2027
Merhaba sevgil excel.web.tr ailesi bir ajanda uygulması üzerinde çalışmaktayım yapmak istediğim şey şu
görev tarihi ve saati geldiğinde textboxa ilgi görevin, yazmış olduğum prosedürü, userform açıkken userform üzerindeki txtYuksek textboxuna çağrılarak akatarılması . TetiklEme işini beceremedim.
görev tarihi ve saati geldiğinde textboxa ilgi görevin, yazmış olduğum prosedürü, userform açıkken userform üzerindeki txtYuksek textboxuna çağrılarak akatarılması . TetiklEme işini beceremedim.
C#:
Public Sub Hatirlat()
Dim sh As Worksheet
Dim ss, i As Long
Set sh = ThisWorkbook.Sheets("AJANDA")
ss = sh.Range("B" & Rows.Count).End(xlUp).Row
For i = 2 To ss
If Format(sh.Range("C" & i).Value, "hh:mm") = Format(Time, "hh:mm") And sh.Range("B" & i).Value = Date Then
Beep
Beep
txtYuksek.Value = sh.Range("E" & i)
End If
Next i
Application.OnTime Now + TimeValue("00:01:00"), "Hatirlat"
End Sub