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
#7
