📊 VBA (Excel)
Check Show Seconds in Taskbar Clock Registry Value (VBA)
Reads the Show Seconds in Taskbar Clock registry value via WScript.Shell.RegRead and reports it in a message box — no PowerShell or reg.exe needed.
ShowSecondsInTaskbarClockRegCheck.bas
Attribute VB_Name = "ShowSecondsInTaskbarClockRegCheck"
Option Explicit
Public Sub ShowSecondsInTaskbarClockRegCheck()
Dim wsh As Object
Dim regPath As String
Dim value As Variant
Set wsh = CreateObject("WScript.Shell")
regPath = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSecondsInSystemClock"
On Error Resume Next
value = wsh.RegRead(regPath)
On Error GoTo 0
If IsEmpty(value) Then
MsgBox "Value not set:" & vbCrLf & regPath, vbExclamation, "Show Seconds in Taskbar Clock"
Else
MsgBox "Show Seconds in Taskbar Clock" & vbCrLf & regPath & " = " & value, vbInformation
End If
End Sub