AccessTr.neT

merhaba sn. sledgeab tablolar arası veri kopyalamada formüllerde hata yapıyorum mümkünse kontrol edebilirmisin Frm den Frm1 e teşekkür ederim kolay gelsin

Tablodaki OlayAyı alanının varsayılan değerini

=Format(Date();"mmm")

yerine

=Format(Date();"mmmm")

yazmalısın,

Formun Kayıt kaynağını ve Açılan kutunun Denetim Kaynağını boş bırak.

Formdaki butonun tıklandığında olayına yazdığın kodu aşağıdaki ile değiştir.

Private Sub Komut104_Click()

Dim ay, yol As Integer

yol = CurrentProject.path & "\" & "Frm1.mdb"

ay = MtnAy

DoCmd.RunSQL "INSERT INTO Tablo ( SucNo, OlayAyi ) IN '" & yol & "' SELECT Tablo.SucNo, Tablo.OlayAyi, * FROM Tablo WHERE (((Tablo.OlayAyi)='" & ay & "'));"



End Sub

Dim yol, ay As Integer ????

string olmasın

merhaba sledgeab bey aynısını uyguladım rutime error 13 hatası alıyorum siz uygulayabilirmisiniz eklentide mümkünse

Verilen kodların uygulanmış hali ektedir.

merhaba hayırlı geceler hocam 1. de kaydediyor 2. de butona basmamda hata veriyor neden