Skip to content

Instantly share code, notes, and snippets.

@jangeador
Last active August 29, 2015 14:23
Show Gist options
  • Save jangeador/63ec6df26a11e94ae69d to your computer and use it in GitHub Desktop.
Save jangeador/63ec6df26a11e94ae69d to your computer and use it in GitHub Desktop.
Sub Reset_all_lastcells()
'David McRitchie, http://www.mvps.org/dmcritchie/excel/lastcell.htm
Dim sh As Worksheet, x As Long
For Each sh In ActiveWorkbook.Worksheets
x = sh.UsedRange.Rows.Count 'see J-Walkenbach tip 73
Next sh
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment