Макрос в WORD.

[Kart_01]

Есть кто с макросами умеет работать?
Как сделать в Word'e макрос, чтоб переводил румынские последовательности (ţ) в латинские буквы?

[Weekers]

Kart_01,
Есть такая штука, VBA называется. Ею можно.

[Kart_01]

Weekers,
Можно подробней если знаешь?

[Weekers]

Kart_01,
Так в хелпе всё подробно написано.
Я этим не занимался, но, думаю, ничего сложного нет.

[dmn]

Код: Выделить всё

Sub Replace()
   For i = 1 To ActiveDocument.Characters.Count
      Select Case Asc(ActiveDocument.Characters(i))
      Case 84
         ActiveDocument.Characters(i) = "T"
      Case 116
         ActiveDocument.Characters(i) = "t"
      End Select
   Next i
End Sub

[Weekers]

dmn,
Можно ещё проще. Используя встроенную функцию REPLACE.

[Kart_01]

dmn,
спасибо, разобрался