Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Wrap Text - Formula View
After hitting Control + ~ to see formulas in the cells, can/how to
wrap the formula text in the cells for more efficient view/printing purpose? |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Wrap Text - Formula View
No
You could use this John Walkenbach macro to show the formulas as text on another sheet with wrap text enabled. Great for printing. Sub ListFormulas() 'from John Walkenbach Dim FormulaCells As Range, Cell As Range Dim FormulaSheet As Worksheet Dim Row As Integer Dim ws As Worksheet ' Create a Range object for all formula cells On Error Resume Next Set FormulaCells = Range("A1").SpecialCells(xlFormulas, 23) ' Exit if no formulas are found If FormulaCells Is Nothing Then MsgBox "No Formulas." Exit Sub End If ' Add a new worksheet Application.ScreenUpdating = False Set FormulaSheet = ActiveWorkbook.Worksheets.Add FormulaSheet.Name = "Formulas in " & FormulaCells.Parent.Name ' Set up the column headings With FormulaSheet Range("A1") = "Address" Range("B1") = "Formula" Range("C1") = "Value" Range("A1:C1").Font.Bold = True End With ' Process each formula Row = 2 For Each Cell In FormulaCells Application.StatusBar = Format((Row - 1) / FormulaCells.Count, "0%") With FormulaSheet Cells(Row, 1) = Cell.Address _ (RowAbsolute:=False, ColumnAbsolute:=False) Cells(Row, 2) = " " & Cell.Formula Cells(Row, 3) = Cell.Value Row = Row + 1 End With Next Cell ' Adjust column widths With FormulaSheet.Columns("A:C") .Cells.WrapText = True End With Application.StatusBar = False End Sub Gord Dibben MS Excel MVP On Wed, 21 May 2008 15:25:35 -0700 (PDT), ccnlc1 wrote: After hitting Control + ~ to see formulas in the cells, can/how to wrap the formula text in the cells for more efficient view/printing purpose? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do I get date/time to wrap (format - wrap text doesn't work)? | Excel Discussion (Misc queries) | |||
wrap formula text | Excel Discussion (Misc queries) | |||
How do I view all text in a merged cell? Wrap text is activated. | Excel Discussion (Misc queries) | |||
Using a formula to wrap text | New Users to Excel | |||
Concatenation formula loses text wrap formatting | Excel Discussion (Misc queries) |