Bu word dosyalarının düzenlenirken aşağıdaki değişiklikler uygulanmıştır:
- Öncelikle word dosyasında bozulmaya meyilli görselin olup olmadığı baştan aşağı kontrol edilmiştir. Eğer böyle potansiyel tehlikeli yapılar varsa bu alanlar görsele çevrilmiştir. Bu görseller "Metin İle Aynı Hizada" ayarında "Normal" stil hiyerarşisinde kaydedilmiştir.
-
Dosyada düzenleme esnasında "Otomatik Madde İşaretçileri"nin kontrolden
çıkması tehlikesine karşın, bunlar, makro ile normal metne çevrilmiştir.
"ALT+F11" ile "Visual Basic Script" penceresi açılmış, ardından "CTRL+G" ile "Immediate" arayüzüne aşağıdaki kod yapıştırılmış, "Enter" tuşu ile
çalıştırılmıştır:
ActiveDocument.Range.ListFormat.ConvertNumbersToText
-
Eğer "Stil Galerisi" çok kalabalık ise, aşağıdaki makro kodu, "Visual Basic Script" penceresinde, "This document"e sağ tıklanıp "Insert / Module" arayüzüne yapıştırılıp "Run" ile çalıştırılmıştır:
Sub DeleteUnusedStyles()
Dim aStyle As Style
For Each aStyle In ActiveDocument.Styles
If aStyle.BuiltIn = False Then
With ActiveDocument.Content.Find
.ClearFormatting
.Style = aStyle.NameLocal
.Execute FindText:="", Format:=True
If .Found = False Then aStyle.Delete
End With
End If
Next aStyle
End Sub -
Eğer word dosyası, içindeki görsellerin diskte çok yer kaplamasından
dolayı, büyük bir boyutta ise aşağıdaki makro, "Insert / Module" arayüzüne yapıştırılıp "Run" ile çalıştırılmıştır:
Sub test()
Dim shp As InlineShape
If ActiveDocument.InlineShapes.Count = 0 Then Exit Sub
For i = ActiveDocument.InlineShapes.Count To 1 Step -1
Set shp = ActiveDocument.InlineShapes(i)
If shp.Type = wdInlineShapePicture Then
shp.Select
Selection.Cut
Selection.PasteSpecial Link:=False, DataType:=15, Placement:=wdInLine, _
DisplayAsIcon:=False
End If
Next
End Sub - "Başlamadan Önce" başlığı; "Giriş" olarak "Başlık 2" stil hiyerarşisinde kaydedilmiştir.
- "Giriş" başlığı altındaki tablo içindeki metin kesilmiş, ardından tablo silinmiş ve metin "Normal" stil hiyerarşisinde kaydedilmiştir.
- "Bölümle İlgili Özlü Söz", "Bu Bölümde Öğrenecekleriniz", "Birlikte Düşünelim" başlıkları ve alt metinleri silinmiştir.
- "Uygulamalar", "Uygulama Soruları" başlıklarının içerikleri mevcut ise "Normal" stil hiyerarşisinde kaydedilmiştir; eğer başlıkların içerikleri yoksa bunlar silinmiştir.
- "Bu Bölümde Ne Öğrendik?" başlığı; "Bölüm Özeti" olarak "Başlık 2" stil hiyerarşisinde kaydedilmiştir.
- "KAYNAKÇA" başlığı; "Normal" stil hiyerarşisinde kaydedilmiştir.
Aşağıdaki özel kullanım için çekilmiş vidyoları izlemeniz faydalı olacaktır.
Ek bilgi geldikçe güncellenecektir.
Hiç yorum yok:
Yorum Gönder