+- 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ığı: Macro İçin Yardım (/konu-macro-icin-yardim.html)
Sayfalar:
1
2
Macro İçin Yardım - mahircinar01 - 08/02/2012
Macroda kod satırında çağırmak istediğim formun adını kod satırına tam olarak yazamıyorum (bu genelde formun ismi uzun olduğu zaman oluyor. örnek çağırmak istediğim formun adı bakımveyedekleme olunca tam olarak yazamıyorum) ek te ki dosyamı inceler yardımcı olursanız sevinirim
Cvp: Macro İçin Yardım - iscinar - 08/02/2012
Dosya eklenmemiş.
Tekrar denerseniz iyi olur.
Cvp: Macro İçin Yardım - mahircinar01 - 08/02/2012
dosyayı ekledim bir incelerseniz
Cvp: Macro İçin Yardım - iscinar - 08/02/2012
(08/02/2012, 10:52)mahircinar01 yazdı: Macroda kod satırında çağırmak istediğim formun adını kod satırına tam olarak yazamıyorum (bu genelde formun ismi uzun olduğu zaman oluyor. örnek çağırmak istediğim formun adı bakımveyedekleme olunca tam olarak yazamıyorum) ek te ki dosyamı inceler yardımcı olursanız sevinirim
Sn.mahircinar01
Form açmak için makro kullanmanızda ki gayeniz nedir bilmiyorum ancak bu işi vb yapmayı denediniz mi?
Cvp: Macro İçin Yardım - mahircinar01 - 08/02/2012
bu uygulamayı bir yerde görmüştüm. bende kendi programımda denemek istedim yapamadım. dediğim şekilde yapma şansımız yok mudur? vb bilmiyorum
Cvp: Macro İçin Yardım - iscinar - 08/02/2012
Vba bilmekten ziyade yeni bir buton eklediğinizde Access sihirbazı bu işi sizin için yapıyor zaten.
Yeni bir buton eklediğinizde aşağıdaki gibi bir kod ekliyor dilerseniz sihirbaza yaptırın dilerseniz de
Kullanmak istediğiniz butonun tıklandığında olayına
Private Sub Komut2_Click()'Komut2 yazan yerlere butonunuzun adını
On Error GoTo Err_Komut2_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Form1" 'Form1 yerine açtırmak istediğiniz form adını yazabilirsiniz.
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Komut2_Click:
Exit Sub
Err_Komut2_Click:
MsgBox Err.Description
Resume Exit_Komut2_Click
End Subyazdığınızda istediğiniz formu açacaktır