Pomocí netshnetsh firewall set opmode enable
Pomocí vbs skriptuSet objFirewall = CreateObject("HNetCfg.FwMgr")
Set objPolicy = objFirewall.LocalPolicy.CurrentProfile
objPolicy.FirewallEnabled = TRUE
Pomocí GPOComputer Configuration --> Administrative Templates --> Network --> Network Connections --> Domain Profile --> Windows Firewall: Protect all networks connections nastavit na Enable
Pokud při prohledávání velkého seznamu (např. v MS Excelu) potřebujete „skočit“ na aktuální datum, lze to snadno pomocí VBA makra
Sub skoc_na_dnesni_datum()
ActiveRange = A1
Cells.Find(What:=Date, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
Application.CutCopyMode = False
End Sub