Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
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.
Sub DupeKiller() Dim wsTemp As Worksheet, lRows As Long, rTemp As Range Set wsTemp = ThisWorkbook.Worksheets("Temp") With wsTemp .Range("A1").PasteSpecial xlPasteValues lRows = .Range("A" & Rows.Count).End(xlUp).Row Set rTemp = .Range("A1:A" & lRows) With rTemp .RemoveDuplicates Columns:=1, Header:=xlNo End With lRows = .Range("A" & Rows.Count).End(xlUp).Row Set rTemp = .Range("A1:A" & lRows) Set r = rTemp rTemp.ClearContents End With End Sub
|Frequency distribution of horizontal data?||5||30|
|Change hyperlink addresses that contain a certain substring using VBA||9||47|
|Automating an Excel Template using VBA and Outlook||8||28|
|I'm trying to understand this simple vb code!||2||23|