Word dosyasındaki değişiklik

Katılım
15 Ocak 2010
Mesajlar
90
Excel Vers. ve Dili
Excel 2002 Türkçe
Merhaba. Öncelikle böyle bir hizmeti sunduğunuzdan ötürü sizlere teşekkür ederim. Word dosyası biçimindeki bir kitapta sayfa numaraları başında # olacak şekilde belirtilmektedir (Mesela, #100). Lakin bu sayfa numaraları #4 olarak başladığından, bu sayfa numaralarını #1 ile başlayacak şekilde nasıl değiştirebilirim?

Örnek:

Öncesi
#4 #5... #350

Sonrası
#1 #2...#347
 

Haluk

𐱅𐰇𐰼𐰚
Katılım
7 Temmuz 2004
Mesajlar
12,291
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Özel kişi
Kullandığınız Office sürümüne göre değişiklik gösterebilir ama; şağıdaki resmi inceleyin, yardımcı olabilir ....



.
 
Katılım
15 Ocak 2010
Mesajlar
90
Excel Vers. ve Dili
Excel 2002 Türkçe
Merhaba. # ile yazılı sayfa numaraları Word'un atadığı değil, metin içinde yer alanlardır.
 

Haluk

𐱅𐰇𐰼𐰚
Katılım
7 Temmuz 2004
Mesajlar
12,291
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Özel kişi
Google Drive veya benzeri düzgün bir yere dosyanızı yüklerseniz, ne yapabileceğimize bakalım ....

.
 

Haluk

𐱅𐰇𐰼𐰚
Katılım
7 Temmuz 2004
Mesajlar
12,291
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Özel kişi
Eğer söz konusu #4 #5 ..... #350 gibi ifadeler, Word belgesinde normal elle yazılan metinlerse, örnek olarak eklediğim dosyadaki RegExp metodu kullanılarak hazırlanan VBA kodu bu değerleri sizin istediğiniz gibi #1 #2 .... #347 olarak düzenler ( 3 eksilterek).

Eklediğim örnek dosyadaki sayfalarda kırmızı fontla belirttiğim #4 - #9 arasındaki değerler #1 - #6 olarak düzenlenecektir.

Dosyayı, makroları etkinleştirerek açtıktan sonra Test isimli makroyu çalıştırın.

Dosyanın harici linki:

https://drive.google.com/open?id=1LoObjtlLNgn6BJyz1tmN4pud-S9VMnYN


Not:

1) Ekli dosyadaki kodu kendi orjinal dosyanızda denemeden önce mutlaka yedeğini alın.

2) Eğer söz konusu "#" ve "sayı" arasında boşluk varsa, ilk önce tüm dokümanda Bul-Değiştir ile bu boşlukları silin, aralarında boşluk kalmasın. Bunu yapmak için Bul>> #boşluk (yani klavyede boşluk tuşu) yazdıktan sonra Değiştir>># yazın ve hepsi aynı standarta gelsin.

.
 

Ekli dosyalar

Son düzenleme:
Katılım
22 Ekim 2018
Mesajlar
22
Excel Vers. ve Dili
2010
Çok teşekkürler cevaplar için. Bilmiyordum bende...
 
Üst