Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
04/06/2011 15:02
Konu Sahibi
Kavas_27
Yorumlar
6
Okunma
2595
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

Kavas_27

Üye
Kullanici Avatari
Üye
5
2
01/12/2010
0
13/11/2013,22:40
Çözüldü 
arkadaşlar geçerli bir formu formu worde aktarmak istiyorum ancak acces konusunda yeni olduğum için bir türlü yapamadım bu konuda bana yardımcı olursanız sevinirim


Ek Dosyalar
.rar   yardım.rar (Dosya Boyutu: 496,75 KB / İndirme Sayısı: 37)
Cevapla

DUAYEN

Aktif Üye
Kullanici Avatari
Aktif Üye
S.... A....
1.026
13/08/2010
279
Yozgat
Ofis 2007
16/03/2017,17:22
Çözüldü 

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Dim WordApp As Word.Application
Dim AYol As String
AYol = CurrentProject.Path & "\Ustyazı36" & ".doc"
 
Application.FollowHyperlink AYol, , True, True
On Error Resume Next
Set WordApp = GetObject(, "Word.Application")
On Error GoTo ErrHandler
WordApp.Documents.Open (AYol)
WordApp.Visible = True
WordApp.WindowState = wdWindowStateMaximize
With WordApp.Selection
    .Goto what:=wdGoToBookmark, Name:="Ad"
    .TypeText BABAADI & " "
    .Goto what:=wdGoToBookmark, Name:="dtarih"
    .TypeText DOGUMTARIHI & " "
    .Goto what:=wdGoToBookmark, Name:="ad2"
    .TypeText ADISOYADI & " "
    .Goto what:=wdGoToBookmark, Name:="sira"
    .TypeText SIRANO
End With
DoEvents
WordApp.Activate
'WordApp.Documents.Save 'Kaydetmek isterseniz tırnağı boşaltınız..
 
WordApp.Print
Set WordApp = Nothing
Exit Sub
ErrHandler:
Set WordApp = Nothing

Bu kodu denermisiniz....


Bizim için zor diye bir şey yoktur, imkansızsa zaman alır...
Cevapla

DUAYEN

Aktif Üye
Kullanici Avatari
Aktif Üye
S.... A....
1.026
13/08/2010
279
Yozgat
Ofis 2007
16/03/2017,17:22
Çözüldü 
Konu ile tekrar dönerseniz seviniriz olumlu yada olumsuz.


Bizim için zor diye bir şey yoktur, imkansızsa zaman alır...
Cevapla

Kavas_27

Üye
Kullanici Avatari
Üye
5
2
01/12/2010
0
13/11/2013,22:40
Çözüldü 
teşekür ederim duayen yapmaya çalışıyorum yaptığımda tekrar geri döneceğim


Cevapla

Kavas_27

Üye
Kullanici Avatari
Üye
5
2
01/12/2010
0
13/11/2013,22:40
Çözüldü 
2010 ofice programı kullanıyorum bu kodları girdiğimde 'user defined type not defined' hatası veriyor.


Cevapla

Puletin


Kullanici Avatari
Altın Üye
1.715
01/11/2008
416
-
Ofis 2003
24/12/2016,00:18
Çözüldü 
User-defined type not defined hatasını alıyorsanız:
Şunu deneyiniz.

Alt+F11 tuşlarına basarak Visual basic penceresini açın.Tools menusünün altında referanslardan "Microsoft DAO 3.6 Object Library" yi işaretleyin ve OK e basın.


Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Seçili Dönemi Pdf Aktarma paseidon19 6 236 04/09/2017, 11:27 ozanakkaya
Çözüldü Üst Formdan Alt Forma Veri Aktarma teo81a 2 128 21/08/2017, 08:45 teo81a
Çözüldü Worde Aktarımda Ön İzmele Ve Wordü Otomatik Kaydetme derzulya 6 474 25/05/2017, 14:42 ozanakkaya
Çözüldü Tablolar Arası Aktarma Sorunu kübrashn 6 376 12/05/2017, 15:22 kübrashn
Çözüldü Liste Kutusundan Çoklu Seçim Yaparak Alt Forma Aktarma sadikkavakli 3 331 25/04/2017, 08:01 sadikkavakli

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