Free Excel Macros
Free collection of Excel macros for Excel Macro Processor

Welcome to our free collection of Microsoft Excel macros. You may use this macros with Microsoft Excel 97/2000/XP/2003/2007. With Excel Macro Processor you may apply this macros to a lot of Excel documents with progress indication.

Sub NormalPosition()
' Select top cell for all sheets
' Visual improvement for your documents

k = Worksheets.Count
For i = 1 To k
  If Worksheets(k - i + 1).Visible Then
    Worksheets(k - i + 1).Select
    Cells(ActiveWindow.SplitRow + 1, ActiveWindow.SplitColumn + 1).Select
  End If
Next i

End Sub

Sub FormulasToValues()
' Replace all formulas with values

WCount = Worksheets.Count
For i = 1 To WCount
  If Worksheets(WCount - i + 1).Visible Then
    Worksheets(WCount - i + 1).Select
    RCount = ActiveCell.SpecialCells(xlLastCell).Row
    CCount = ActiveCell.SpecialCells(xlLastCell).Column
    For j = 1 To RCount
      For k = 1 To CCount
        Worksheets(WCount - i + 1).Cells(j, k) = Worksheets(WCount - i + 1).Cells(j, k).Value
      Next k
    Next j
  End If
Next i

End Sub

Sub DeleteHiddenSheets()
' Remove hidden sheets from your document

i = 1
While i <= Worksheets.Count
  If Not Worksheets(i).Visible Then
    i = i + 1
  End If

End Sub

Sub DeleteHiddenRows()
' Remove hidden rows from all sheets

For i = 1 To Worksheets.Count
  If Worksheets(i).Visible Then
    k = ActiveCell.Row
    For j = 1 To k
      If Rows(j).Hidden Then
        Rows(j).Hidden = False
      End If
    Next j
  End If
Next i
If Worksheets(1).Visible Then Worksheets(1).Select

End Sub



User's manual

Screen shots


Excel macros

Excel Compare

Just few sentences. New version of Excel Macro Processor , our advanced automation tool for MS Excel.

  Copyright © 2013 Sowsoft. All rights reserved.
Designed by RaysLab