Not the answer to your question.
But maybe you want to have a look at this code,
and maybe after you tweak the code it can fit your expactation.
When the CommandButton1 is clicked,
it fill the TextBox1 with the active sheet active cell value which has quite many words.
the TextBox1_Change is fired, it put focus to the TextBox1 and send enter key to fit the height of the TextBox1 to it's value but keep the width.
Back to CommandButton1 it make the TextBox2 height the same as the height of TextBox1 height.
With the code above, if the user type in the TextBox1, it will give unpredictable result.
To solve it, move the SendKeys line to CommandButton1_Click
Bookmarks