Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
04/04/2019 02:41
Konu Sahibi
haliliyas
Yorumlar
2
Okunma
231
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

haliliyas

Uzman
65596
Ha.... Ya....
 Belirtilmemiş
 23
 1.033
 30/07/2014
172
 -
 
 Ofis 2019 64 Bit
 Bugün,03:59
Çözüldü 
Microsoft Word x.x Object Library ekli olmasına rağmen aşağıdaki kod sürekli aynı hatayı veriyor.
butona ilk bastığımda hata veriyor arka planda word açılıyor (sadece görev yöneticide görünüyor)
eğer arka planda çalışan word'ü kapatmayıp
butona tekrar basarsam işlemi gerçekleştiriyor. sebebini ne olabilir?

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
Dim wdApp As Word.Application, wdDoc As Word.Document

On Error Resume Next
Set wdApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then 'Word isn't already running
Set wdApp = CreateObject("Word.Application")
End If
On Error GoTo 0
Set wdDoc = wdApp.Documents.Open("dosyayolu&adı")

wdApp.Visible = True

    With wdApp
        With wdDoc.Content.Find
            .Text = Me.TxtBul
            .Replacement.Text = Me.TxtDegis
            .Wrap = wdFindContinue
            .Execute Replace:=wdReplaceAll
        End With
'        .ActiveDocument.SaveAs2 FileName:=SaveAsName, FileFormat:=17
    End With

'You can now do whatever you like with the Word document e.g.

'wdDoc.PrintOut
wdDoc.SaveAs "dosyayolu&adı"



ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 482
 12.058
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,00:30
İnceleyiniz. Kod içerisindeki tek tırnak ile iptal edilen kısımları aktif ederseniz, dizindeki tüm word dosyalarında değişiklik yapar.


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

haliliyas

Uzman
65596
Ha.... Ya....
 Belirtilmemiş
 23
 1.033
 30/07/2014
172
 -
 
 Ofis 2019 64 Bit
 Bugün,03:59
yardımlarınız için teşekkürler hocam. sorun çözüldü.
yalnız "content" ile "StoryRanges" arasındaki fark ne?
hangisi nerede kullanılmalı?




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Access İle Word Şablonuna Bilgi Aktarma biocsi 13 678 01/01/2019, 16:27
Son Yorum: biocsi
Çözüldü Word Belgesine Resim Ekleme mustinba 7 298 13/11/2018, 10:53
Son Yorum: ozanakkaya
Çözüldü Butona Basarak Accessteki Bazı Verileri Word'e Eklemek prestij06 6 395 14/10/2018, 14:03
Son Yorum: Allback
Çözüldü Metin Kutusunda Ms Word Yasla Fonksiyonu Nasıl Kullanılabilir Oğuz Türkyılmaz 3 236 17/09/2018, 16:14
Son Yorum: ozanakkaya
Çözüldü Hafıza da açık kalan word bibib 4 214 11/09/2018, 15:40
Son Yorum: bibib

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.