Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. Toggles text wrap alignment for selected cells
Sub ToggleWrapText()
    If TypeName(Selection) = "Range" Then
      Selection.WrapText = Not ActiveCell.WrapText
    End If
End Sub