VBからslackにメッセージ

エクセルのVBからSLACKにメッセージ出せないか探して出せた
最初メールだけかと思ってたらいけた
参考：https://became-free.com/vbdotnet-slack-api/
上記参考からslackのページが日本語化進んでて助かる
VB側は
Sub test1()

TargetURL = "https://hooks.slack.com/services/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"
Set httpReq = CreateObject("WinHttp.WinHttpRequest.5.1")
httpReq.Open "POST", TargetURL, False
httpReq.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
httpReq.send ("payload={""text"":""hoge\nエクセルVBからメッセージ""}")

End Sub
こんな感じ

powershell でも同じことできた　さらにフックする条件付けて