Function EE_UsedRange(Optional ws As Worksheet) As range
' returns the usedrange
' defaults to activeworksheet
'http://excelexperts.com/xla-routines-eeUsedRange    for updates on this function
    If ws Is Nothing Then
        Set ws = ActiveSheet
    End If
 
    Set EE_UsedRange = ws.UsedRange
 
End Function