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

Derecelendirme: 0/5 - 0 oy
halily

halily

Uzman
65596
Ha....
 26
 1.157
 30/07/2014
209
 -
 
 Ofis 2019 64 Bit
 Bugün,22:32
Çö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

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 483
 12.099
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,02:59
İ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. 

...........
halily

halily

Uzman
65596
Ha....
 26
 1.157
 30/07/2014
209
 -
 
 Ofis 2019 64 Bit
 Bugün,22:32
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 726 01/01/2019, 16:27
Son Yorum: biocsi
Çözüldü Word Belgesine Resim Ekleme mustinba 7 326 13/11/2018, 10:53
Son Yorum: ozanakkaya
Çözüldü Butona Basarak Accessteki Bazı Verileri Word'e Eklemek prestij06 6 416 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 256 17/09/2018, 16:14
Son Yorum: ozanakkaya
Çözüldü Hafıza da açık kalan word bibib 4 228 11/09/2018, 15:40
Son Yorum: bibib

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