VBA y excel

hola grupo,
quisiera ejecutar desde código el método Ajustar Texto de
una celda que en excel aparece en formato celda-pestaña
alineación-casilla check Ajustar Texto.

si llamo al método range(A1).autofit

se cambia el ancho de la celda hasta que se ve todo el
texto en una sola línea, pero si marco desde excel la
casilla check ajustar texto se ajusta el texto al tamaño
actual de la celda (no cambia el tamaño de la celda)

desde código puedo realizar esto último?

gracias
.