A.S.C Filtre, Grafik ve Raporlama Eklentisi

[VBA] ms office word belgesindeki kelimeleri access tablosundan değiştir
#1
Merhaba arkadaşlar 
ms word içindeki bul ve değiştir işlemini toplu olarak yapabilmek için
bir access veritabanı içerisindeki tabloya; bulup değiştirmek istediğim kelime ve karakterleri  kaydediyorum. daha sonra word belgesine yerleştirdiğim vba kodu ile bul değiştir işlemini topluca yapıyorum. 

kelime bul değiştir konusunda sorun yok, bunu istediğim gibi yapabiliyorum. uzun süredir arayıp bulamadığım bir sorunum var, yardımcı olabilirseniz minnettar olurum.

istediğim gibi yapmayı başaramadığım şu;
word belgesinde paragraf başında eğer numerik veya alfabetik (Madde imi değil) değeri bulmak ve bulduğum bu değer yerine, access tablosunda o değerin yerine koymak istediğim değeri eklemek istiyorum. word belgesinde vba kodunu çalıştırdığımda tüm metnin içindeki değerler değişiyor. 

örnek üzerinden anlatırsam; aradığım değer   "1. "   yerine koymak istediğim değer " - " olsun. bunu belgedeki tüm değerler için yapıyor oysa benim yapmak istediğim. "1. " değerini sadece paragraf başında ise " - " ile değiştirmek, paragrafın başında değil, aralarda ise herhangi bir değişiklik yapılmasın. bunu nasıl yapacağımı bulamadım. yardımlarınızı bekliyorum.  

örnek çalışmam ekte



  Alıntı
Bu mesajı beğenenler:
#2
Visual Basic
  1. Dim strFirstWord As String
  2. Dim strIn As String
  3. Dim oPara As Object
  4. strIn = InputBox("Replacement string?")
  5. For Each oPara In oWordDoc.Paragraphs ' belgedeki her paragraf için
  6. strFirstWord = oPara.Range.Words(1).Text ' paragraftaki ilk kelime
  7. If strFirstWord = strIn Then oPara.Range.Words(1).Text = "bununla değiştir " & " "  ' sona mutlaka boşluk eklenmeli
  8. Next


benzeri bir kod işinize yarayabilir.
her paragrafın ilk kelimesine bakar eğer ilk kelime aradığınız kelimeyle aynıysa değiştirme komutunu kullanabilirsiniz



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Office 20007 çökme Sorunu. Denizl 3 40 28-06-2020, 15:11
Son Mesaj: celalll
  [FORM] Word Belgesindeki Resmi Formdaki Ek Alanına Fare Ile Kopyala Yapıştır tersl 1 123 26-03-2020, 02:17
Son Mesaj: tersl
  Formdaki Verileri Word'e Tekli Ve çoklu Yazdırma prestij06 3 215 17-02-2020, 22:52
Son Mesaj: dsezgin
  Access'ten Excel ve Word'e kod ile veri aktarımı assenucler 29 28.276 15-02-2020, 23:36
Son Mesaj: gunalp26
  [FORM] Reçete Tablosundan Gelen Reçete Bilgilerini Tabloya Aktarma husem 14 576 28-11-2019, 13:52
Son Mesaj: dsezgin
  [VBA] Liste Kutusundan Word Belgeye Tablo Olarak Veri Almak hturkavci03 62 1.592 26-10-2019, 16:01
Son Mesaj: hturkavci03
  kullanıcı formunda pdf, word, vs.. dosya görüntüleme, ve ilgili işlemeler... tarkanay 6 409 07-09-2019, 22:20
Son Mesaj: tarkanay
  [VBA] ms office word belgesindeki kelimeleri bul ve değiştir abkbek 4 362 03-04-2019, 22:24
Son Mesaj: abkbek

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi