Eu fiz essa pergunta "ontem" no Graphic Design SE, mas fui informado de que o SuperUser seria mais útil no que estou tentando realizar. Minha dúvida é sobre o uso de linhas de base, mas lembre-se de que tenho uma cópia do MSOffice 2016 Home & Student.
Estou tentando escrever o VBA para realizar o ajuste de caracteres individuais em todo o meu documento:
Sub RandomizeBaseline()
Dim rng As Range
Dim char As Variant
Dim baseline As Double
Set rng = ActiveDocument.Range
For Each char In rng.Characters
baseline = Rnd() * 2 - 1
char.Font.Position = baseline
Next char
End Sub
A intenção disso, para começar, é fazer com que um documento pareça ter sido digitado em uma máquina de escrever. Eu já tenho uma fonte monoespaçada para trabalhar, mas com a maneira como o MSWord analisa isso torna os valores de linha de base aleatórios -1, 0 ou 1. Defini-los como valores decimais para tornar a mudança de linha de base menos dramática aparentemente trunca para apenas zero e não muda absolutamente nada. O código analisa cada caractere do documento, visto pelo histórico de edição ao clicar em 'Desfazer', mas não há diferença visível. Como devo corrigir isso para o meu projeto ultra específico pretendido?