Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Sub Workbook_Activate() Call isWorkSheetEmpty End Sub Sub isWorkSheetEmpty() Dim result As Long Application.DisplayAlerts = False result = Application.WorksheetFunction.CountA(ActiveWorkbook.ActiveSheet.Range("a:iv")) If result = 0 Then ' Call ShowHeaderForm MsgBox "empty" End If Application.DisplayAlerts = True End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Compare Two Columns on Two Different Sheets and Paste the Results into a 3rd Sheet||5||43|
|window API declaration what is the difference between these two||3||24|
|Open attachments in viewer, not main app||4||30|
|How to change the class of VBA so that instead of IE it uses Google Chrome?||3||19|
Join the community of 500,000 technology professionals and ask your questions.