Fit by the default fitting preset
On the Tools menu, point to Fit, and then click Fit text.
Select preset and fit
Hold SHIFT while on the Tools menu, pointing to Fit, and then clicking Fit text.
Notes
•The software make its best attempt to bring the text in the measure, applying the default, or the selected preset. Should the preset values allow to do such fitting, the text will be brought into the measure. Otherwise, the maximum allowed fit is applied. Check if the text is actually fitting after the Fit text operation, and if it does not, edit it by removing some lines, or select and apply a more flexible fitting preset (if available).
•The above functionality is based on the TxtCharCopyFitAll() script, that in turn calls Ted4.TxtCharCopyFitEx("", True).
<ShellCommand(CanExecute:="Ena_IsEditingText")> _
Public Sub TxtCharCopyFitAll()
Dim preset As String = ""
If Ted4.GetQualifier = 1 Then preset = "?"
Ted4.TxtCharCopyFitEx(preset, True)
' Ted4.previewrefresh()
End Sub