Нахождение ширины набора текста

Question

Я пытаюсь выяснить, есть ли способ выяснить, шире ли набор текста, чем ячейка, в которой он занят. Все, что я нашел, это использовать параметры переноса текста и автоподбора.

Я работаю над шаблоном, который будет автоматически заполняться макросом - получать информацию из базы данных. Я хочу иметь возможность выяснить, является ли текст в определенных ячейках слишком длинным, тогда марко обрежет текст и добавит его в другую ячейку в строке ниже. Использование параметров авто-высоты приведет к путанице в структуре шаблона, поэтому я хочу во что бы то ни стало избежать ее.

Итак, в заключение, я хочу иметь возможность определить, насколько широким является определенный набор текста.

Использование Excel 2016

Answer 1

Вот немного клуджа с использованием VBA:

Dim myWidth As Double
Dim textWidth As Double

myWidth = Range("A1").EntireColumn.ColumnWidth
Range("A1").EntireColumn.AutoFit
textWidth = Range("A1").EntireColumn.ColumnWidth
Range("A1").ColumnWidth = myWidth
MsgBox textWidth

Обратите внимание, что это даст вам разные результаты, в зависимости от шрифта в целевой ячейке