FORM formu kapat aç sonrası, son baktığım sayfaya dönme

[FORM] formu kapat aç sonrası, son baktığım sayfaya dönme - Yazdırılabilir Sürüm

+- Access SQL (https://www.access-sql.com)
+-- Forum: ACCESS SORULARI VE ÖRNEK UYGULAMALARI (https://www.access-sql.com/Forum-ACCESS-SORULARI-VE-ORNEK-UYGULAMALARI)
+--- Forum: ACCESS SORULARI (https://www.access-sql.com/Forum-ACCESS-SORULARI)
+--- Konu: [FORM] formu kapat aç sonrası, son baktığım sayfaya dönme (/Konu-formu-kapat-ac-sonrasi-son-baktigim-sayfaya-donme)

Sayfalar: 1 2

formu kapat aç sonrası, son baktığım sayfaya dönme - edacan19 - 31-12-2014

Merhaba arkadaşlar
formuma makro ile kapat aç yaptırıyorum , form açıldığında kapatırken baktığım sayfaya değilde son sayfaya gidiyor. bunu nasıl düzeltebiliriz yardımlarınızı bekliyorum şimdiden teşekkürler.

Cvp: formu kapat aç sonrası, son baktığım sayfaya dönme - alper_42 - 31-12-2014

makro yerine en güzeli vba kodu kullanmak. bunun için boş bir buton koyun ve hiçbir özellik vermeyin. sonra butona sağ klik, özellikler ve tıklandığında olayında kod oluşturucuyu seçin ve aşağıdaki kodlamayı kopyalayıp yapıştırın.

'geçerli sayfayı kapattırmak için
DoCmd.Close

'hangi form sayfasının açılmasını istiyorsanız " " arasındaki yere formunuzun adını yazınız.
stDocName = "ANAMENU"
DoCmd.OpenForm stDocName, , , stLinkCriteria

açtırdığınız formu kapatırken ise, yine aynı şekilde boş komut ekleyin ve bu kez tersini yapın.

Cvp: formu kapat aç sonrası, son baktığım sayfaya dönme - dsezgin - 31-12-2014

Sn edacan19;
1. Makroda form acildiktan sonra son kayda git islemi olabilir.
2. Form ozelliklerinden veri girisi(DataEntry) evet olarak isaretlenmistir.
3. Modul1 tasarlayin ve Global Kayit as long satiri olusturun. Form kapanmasi olay yordamina Kayit = ID satiri olusturun. (ID--> Tablodaki ve formda ki sirali alan. TC, Kimlik, gibi alanlar da olabilir.
Form acilma olayina
Me.recordsetclone.findfirst "[ID]=" & Kayit
me.bookmark= Me.recordsetclone.bookmark
kod olusturmaniz formu kapattiginizda ki sayfada acilir.

Cvp: formu kapat aç sonrası, son baktığım sayfaya dönme - onur_can - 02-01-2015

Visual Basic
DoCmd.GoToRecord acDataForm, "FormAdı", acGoTo, EnSonSayfaNo

komutu ile en son baktığınız kayda gidebilirsiniz.
Burada şu işlemin yapılması gerekiyor makro ile aç kapa yapıyorum demişsiniz, global bir değişken ile formun kapanma olayında içinde bulunulan kayıt numarası değişkene alınır, bu değişken komutta belirttiğim EnSonSayfaNo değişkenidir. Açıldığında ise en son baktığınız kayıtla açılır.

Cvp: formu kapat aç sonrası, son baktığım sayfaya dönme - edacan19 - 05-01-2015

Arkadaşlar söylediklerinizi yapmaya çalıştım ama olmadı ekli dosyada gösterebilirseniz sevinirim

Cvp: formu kapat aç sonrası, son baktığım sayfaya dönme - onur_can - 05-01-2015

sn edacan19 örneğiniz üzerinde düzeltme yaptım, Ayrıca kodları da vereyim.

Visual Basic
Option Compare Database
Option Explicit
Public KayitNo As Integer
 
Private Sub Form_Unload(Cancel As Integer)
KayitNo = Me.CurrentRecord
End Sub
 
Private Sub Komut9_Click()
DoCmd.Close acForm, "PUANTAJ"
DoCmd.OpenForm "PUANTAJ"
DoCmd.GoToRecord , "PUANTAJ", acGoTo, KayitNo
End Sub

iyi çalışmalar...