AccessTr.neT
Kısayol Oluşturma - 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ığı: Kısayol Oluşturma (/konu-kisayol-olusturma.html)



Kısayol Oluşturma - lemoncher2 - 17/08/2021

Merhaba iyi günler.


Merak ettiğim bir konu var. Vba üzerinden klasör oluşturabiliyoruz. Bu oluşturduğumuz klasörün kısayolunu oluşturabilirmiyiz. Biraz araştırdım ancak bu konu hakkında bilgi edinemedim. Yardımlarınız için şimdiden teşekkürler.


RE: Kısayol Oluşturma - berduş - 17/08/2021

aşağıdakine benzer bir kod işinize yarayabilir
ikon, dosya tanımı vs de eklenebilir
createshortcut koduyla ilgili bir araştırmayla daha çok bilgi edinebilirsiniz
dilerim işinize yarar
Dim oWsh As Object
Set oWsh = CreateObject("wscript.shell")
masaustU = oWsh.specialfolders("desktop")
kisayol = masaustU & "\YagizEBA kısa.lnk" ' kısayolun oluşturulacağı yer ve ad
Set oShort = oWsh.createshortcut(kisayol)
With oShort
.targetpath = masaustU & "\YagizEBA" 'dosya/klasör adresi
.Save
End With



RE: Kısayol Oluşturma - lemoncher2 - 17/08/2021

Teşekkür ederim inceleyip dönüş yapacağım


RE: Kısayol Oluşturma - lemoncher2 - 18/08/2021

Teşekkürler cevaplanmışa taşıyabilirsiniz


RE: Kısayol Oluşturma - berduş - 18/08/2021

Rica ederim
İyi çalışmalar)