Arama Sorunu

1 2
05/04/2012, 22:20

C*e*l*o*y*c*e

Private Sub Komut232_Click()
If MsgBox("YAZDIRILSIN MI?", _
vbYesNo) = vbYes Then
DoCmd.OpenReport "IKITARIH", acViewPreview, "", , acNormal
Cancel = True
Me.Undo
End If
End Sub
raporlama makrosu yerine olay yordamı olarak bunu yazın deneyin
05/04/2012, 22:27

yorum70

Sn.C*e*l*o*y*c*e belirttiğniz kodu ekledim oldu, tşk.

CTRL+alt+delete yapmadan programı nasıl açarız ? sorun nedir acaba ? Tşk.
05/04/2012, 22:51

C*e*l*o*y*c*e

formun çıkış kodu yok yani kapat kodu yok

Private Sub OLEİlişkisiz110_Click()
DoCmd.Close
End Sub
06/04/2012, 08:15

yorum70

Sn.C*e*l*o*y*c*e. kodumu aldım işyerine geçiyorum.Teşekkür ediyorum.
Muhtemelen konu çözülmüştür.accesman '' konunun son halini ekler misiniz'' demeden eklerim.
1 2