Eu criei uma forma (um retângulo) com dimensões fixas,Não consigo alterar essas dimensões.
Nesta forma, um texto é escrito automaticamente por um código vba. Mas este texto é diferente dependendo de uma escolha precedente em um formulário de usuário.
Gostaria de reduzir este texto na forma dependendo de sua altura.
Procurei na Internet mas não encontrei nenhuma solução, trabalhando com fórmulas em txtHeigh ou txtWidth, tamanho de Caracteres ou outro.
Peço desculpas por não poder fornecer nenhuma imagem porque é para trabalhar com dados privados. Você pode imaginar um retângulo no qual desejo adaptar o tamanho do texto à forma.
Responder1
Defina a célulaPersonagem->Tamanho=10 pt*Altura/0,75 pol.
Você precisará alterar o10 pontose/ou o0,75 pol.para ajustar a proporção entre o tamanho do texto e a altura desejada.
Responder2
visão 2013:
abrir ferramentas de desenvolvedor
abrir shapesheet da forma
digite o seguinte na célula onde o tamanho está definido: ROUND(Height/2.835,2)
O texto agora está em relação à altura da forma.
Também é possível criar uma relação com a largura: ROUND(Largura/2.835,2).
É isso que você quer?