Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
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 Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False If Not Intersect(Target, Range("A1")) Is Nothing Then Range("A2:A" & Rows.Count).RowHeight = 15 If Target <> "" Then aRows = Split(Target, ",") For Each rw In aRows Rows(rw).AutoFit Next End If End If Application.ScreenUpdating = True End Sub
|Run an action on recently added records to a table||13||66|
|split worksheet into new worksheets based on changing value in Column A (by means of an Excel VBA)||4||28|
|Need conditional formating when doubles||14||20|
|Excel 2007 VB Code for GCF||7||18|