Burada Greg Maxey'den eski stil WordArt'ın Word'ün yeni sürümlerinde kullanımı hakkında çok ayrıntılı bir makale var .
Temel olarak, belgenizi Word 97-2003 belgesi olarak kaydetmeye hazırsanız, eski WordArt'ı eskisi gibi kullanabilirsiniz.
Alternatif olarak, aşağıdaki makroyu oluşturursanız, eski stil WordArt'ı yeni biçimde kaydedilen bir Word dosyasına ekler:
Sub ClassicWordArtInsert()
Dim oShp As Word.Shape
Dim oILS as Word.InlineShape
Set oShp = ActiveDocument.Shapes.AddTextEffect(Office.MsoPresetTextEffect.msoTextEffect1, _
"Your Text Here", "Arial", 36, _
Office.MsoTriState.msoFalse, Office.MsoTriState.msoFalse, 0, 0, Selection.Range)
If MsgBox("Do you want your classic WordArt object inline with text?", _
vbQuestion + vbYesNo, "Classic Inline") = vbYes Then
Set oILS = oShp.ConvertToInlineShape
End If
On Error Resume Next
oShp.Select
oILS.Select
On Error GoTo 0
lbl_Exit:
Exit Sub
End Sub
Yukarıda belirtilen web sitesinden kopyalandı.
Bununla birlikte, yapmanız gerekenleri gerçekten söylemediğinizden, istediklerinize cevap verecek mi bilmiyorum.