Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
15/03/2012 19:18
Konu Sahibi
disa2006
Yorumlar
8
Okunma
2897
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

disa2006

Aktif Üye
Kullanici Avatari
Aktif Üye
100
10/04/2011
5
Edirne
Ofis 2003
26/10/2016,08:39
Çözüldü 
access 2003 te yapmıs oldugum vardıya defterı kayıt programında makine park numarası seçilerek acıklama yazılmıs bir formum var bu formda aylık bakımı yapıldı ,haftalık bakımı yapıldı , 3 aylık bakımı yapıldı seceneklerı mevcut.check box olarak bu kutucukların herhangi biri işaretlendiğinde excelde hazırlanmıs olan bakım föyünü yazdırmak ıstıyor musunuz ?sorusu ve evet cevabı verıldıgınde mevcut formun yazdırılmasını ıstıyorum mumkun mudur ?

Ek Dosyalar
denden.rar


haksızlık Karşısında eğilmeyiniz. Zira haklılığınız ile birlikte şerefinizide kaydedersiniz... (HZ ALİ)
Cevapla

disa2006

Aktif Üye
Kullanici Avatari
Aktif Üye
100
10/04/2011
5
Edirne
Ofis 2003
26/10/2016,08:39
Çözüldü 
mumkun degıl sanırım


haksızlık Karşısında eğilmeyiniz. Zira haklılığınız ile birlikte şerefinizide kaydedersiniz... (HZ ALİ)
Cevapla

disa2006

Aktif Üye
Kullanici Avatari
Aktif Üye
100
10/04/2011
5
Edirne
Ofis 2003
26/10/2016,08:39
Çözüldü 
forumda bılgı veren bır yer varsa bılen bır arkadasımız lnkı atar ıse sevınırım


haksızlık Karşısında eğilmeyiniz. Zira haklılığınız ile birlikte şerefinizide kaydedersiniz... (HZ ALİ)
Cevapla

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.883
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,00:01
Çözüldü 
Hafta için;
hafta onay kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu ekle

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 Dim stDocName As String
 Dim MyForm As Form
 Dim mesaj As Integer

If Me.hafta = "-1" Then

 mesaj = MsgBox("excelde hazırlanmıs olan bakım föyünü yazdırmak ıstıyor musunuz ?", vbYesNo)
 If mesaj = vbYes Then
 stDocName = "vardefteri"
 Set MyForm = Screen.ActiveForm
 DoCmd.SelectObject acForm, stDocName, True
 DoCmd.PrintOut
 DoCmd.SelectObject acForm, MyForm.Name, False
 End If
End If


İstediğiniz bu ise tabi.


Cevapla

disa2006

Aktif Üye
Kullanici Avatari
Aktif Üye
100
10/04/2011
5
Edirne
Ofis 2003
26/10/2016,08:39
Çözüldü 
dosya yolunu belırtmem gerekmeyecek mı ??


haksızlık Karşısında eğilmeyiniz. Zira haklılığınız ile birlikte şerefinizide kaydedersiniz... (HZ ALİ)
Cevapla

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.883
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,00:01
Çözüldü 
(15/03/2012, 21:39)disa2006 Adlı Kullanıcıdan Alıntı: dosya yolunu belırtmem gerekmeyecek mı ??


"mevcut formun yazdırılmasını ıstıyorum" diye yazdığınız için mevcut formu yani "vardefteri" formunu yazdıracak kod ekledim.

Siz ne yapılmasını istiyorsunuz ?


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Like Kullanımı Hakkında ALike Hatası anno 11 307 05/10/2017, 14:38 anno
Çözüldü Emlak Takip Programları Hakkında Yardım oguzhanulger 2 172 28/08/2017, 18:07 simendifer
Çözüldü Sql Serverdan Sorgu İle Yerel Veri Tabanına Veri Yazdırma ertans 1 166 24/08/2017, 11:22 burhanb
Çözüldü Cari baş harfine göre firma kodu oluşturma hakkında Gokcen Akan 25 1.085 14/07/2017, 08:32 Gokcen Akan
Çözüldü Formda Arama Yapınca Gelen Raporu Yazdırma ankaram 2 304 05/06/2017, 10:06 ankaram

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.