[Iska]

rachamba, код оформляется тэгом «code», а не «spoiler».

скрипт выдает ошибку "не удается найти указанный файл", »

Потому что путь содержит пробельные символы, и его надо заключать в кавычки:

Код:

Option Explicit

Dim objWshShell


Set objWshShell = WScript.CreateObject("WScript.Shell")

' For Russian Regional settings
Select Case Weekday(Now(), vbUseSystemDayOfWeek)
	Case 1, 2, 3, 4, 5 ' Monday, Tuesday, Wednesday, Thursday, Friday
		objWshShell.Run """C:\Program Files (x86)\Microsoft\Skype for Desktop\Skype.exe"""
	Case Else ' Saturday, Sunday
		' Nothing to do
End Select

Set objWshShell = Nothing

WScript.Quit 0