Sub RemoveTextWrap() Range("A1").WrapText = False End Sub
This code will help you to remove text wrap from the entire worksheet with a single click. It will first select all the columns and then remove text wrap and auto fit all the rows and columns. There’s also a shortcut that you can use (Alt + H +W) for but if you add this code to Quick Access Tool Bar it’s way more than keyboard shortcut.