AccessTr.neT
Ajanda Çalışması Hakkında - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Ajanda Çalışması Hakkında (/konu-ajanda-calismasi-hakkinda.html)

Sayfalar: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18


RE: Ajanda Çalışması Hakkında - feraz - 20/06/2020

Tamama basınca tekrar soruyormu.O mesaj köprü ile ilgili.Sonra değiştiririz önceden eklediğim media playerle.Böyle kısa kod olduğu için kullanmıştım Img-grin


RE: Ajanda Çalışması Hakkında - kanakan52 - 20/06/2020

(20/06/2020, 13:24)feraz yazdı: Tamama basınca tekrar soruyormu.O mesaj köprü ile ilgili.Sonra değiştiririz önceden eklediğim media playerle.Böyle kısa kod olduğu için kullanmıştım Img-grin


Her çalma işleminden önce soruyor , sıkıntı yok içine gömeriz Img-grin


RE: Ajanda Çalışması Hakkında - feraz - 20/06/2020

(20/06/2020, 13:33)kanakan52 yazdı:
(20/06/2020, 13:24)feraz yazdı: Tamama basınca tekrar soruyormu.O mesaj köprü ile ilgili.Sonra değiştiririz önceden eklediğim media playerle.Böyle kısa kod olduğu için kullanmıştım Img-grin


Her çalma işleminden önce soruyor , sıkıntı yok içine gömeriz Img-grin
Sub mesaj()  kodundaki
ActiveWorkbook.FollowHyperlink Address:=ThisWorkbook.Path & "/Media/" & .ListItems(i).SubItems(13) & ".mp3"

silip alttakini ekleyin.

CreateObject("Shell.Application").Open (ThisWorkbook.Path & "\Media\" & .ListItems(i).SubItems(13) & ".mp3")



RE: Ajanda Çalışması Hakkında - kanakan52 - 20/06/2020

(20/06/2020, 13:46)feraz yazdı:
(20/06/2020, 13:33)kanakan52 yazdı:
(20/06/2020, 13:24)feraz yazdı: Tamama basınca tekrar soruyormu.O mesaj köprü ile ilgili.Sonra değiştiririz önceden eklediğim media playerle.Böyle kısa kod olduğu için kullanmıştım Img-grin


Her çalma işleminden önce soruyor , sıkıntı yok içine gömeriz Img-grin
Sub mesaj()  kodundaki
ActiveWorkbook.FollowHyperlink Address:=ThisWorkbook.Path & "/Media/" & .ListItems(i).SubItems(13) & ".mp3"

silip alttakini ekleyin.

CreateObject("Shell.Application").Open (ThisWorkbook.Path & "\Media\" & .ListItems(i).SubItems(13) & ".mp3")


oldu hocam.. eline sağlık Img-grin


RE: Ajanda Çalışması Hakkında - feraz - 20/06/2020

Rica ederim.
Denemek için mesela 3 adet kayıt ekleyin arka arkaya excelin açılmasından 5 dakika sonrası için.Yani saat 14 ise 14:03
14:04 gibi ve kaydedin.
Exceli kapatıp sadece açın başka bişey yapmasanız bile yine vakhi gelenler için uyarı vermesi gerek normalde.
Diğer şartları akşam yapmaya çalışırım.


RE: Ajanda Çalışması Hakkında - kanakan52 - 20/06/2020

(20/06/2020, 14:13)feraz yazdı: Rica ederim.
Denemek için mesela 3 adet kayıt ekleyin arka arkaya excelin açılmasından 5 dakika sonrası için.Yani saat 14 ise 14:03
14:04 gibi ve kaydedin.
Exceli kapatıp sadece açın başka bişey yapmasanız bile yine vakhi gelenler için uyarı vermesi gerek normalde.
Diğer şartları akşam yapmaya çalışırım.


Aynen, excelin açık olması yeterli hocam, excelide bir şekilde açık tutucaz artık Img-grin