在這篇教學中,我們將介紹如何使用 Excel VBA 來發送訊息到 LINE Notify。LINE Notify 是 LINE 提供的服務,可以透過 API 發送訊息到 LINE 上。這篇教學將帶你步驟一步完成設置。
取得 LINE Notify 權杖
- 前往 LINE Notify 官方網站。
- 點選「登入」並使用你的 LINE 帳號登入。
- 點選「發行權杖」,並在出現的畫面中設定一個名稱,點選「發行」。
- 複製你取得的權杖(token),這將用於程式碼中作為認證用。
設定 Excel VBA 程式碼
打開 Excel,按下Alt + F11
進入 VBA 編輯器,然後新增一個新的模組(Module)。將以下程式碼貼入模組中:Sub SendLineNotifyMessage()
' 請將下面的 access token 替換為你自己的 LINE Notify 權杖
Dim accessToken As String
accessToken = "你的LINE Notify權杖"
' 訊息內容
Dim message As String
message = "這裡是你要發送的訊息內容"
' LINE Notify 的 API 網址
Dim apiUrl As String
apiUrl = "https://notify-api.line.me/api/notify"
' 使用 XMLHTTP 物件來發送 POST 請求
Dim http As Object
Set http = CreateObject("MSXML2.XMLHTTP")
' 設定 POST 請求的相關屬性
http.Open "POST", apiUrl, False
http.setRequestHeader "Authorization", "Bearer " & accessToken
http.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
' 設定 POST 請求的內容,這裡是訊息內容
Dim postData As String
postData = "message=" & message
' 發送 POST 請求
http.send (postData)
' 如果需要檢查回應,可以使用下面的程式碼
' Debug.Print http.responseText
' 釋放 HTTP 物件
Set http = Nothing
End Sub
設定程式碼中的變數
- accessToken:將程式碼中的
"你的LINE Notify權杖"
替換為你在步驟 1 中取得的 LINE Notify 權杖。 - message:將
message
變數的內容修改為你想要發送的訊息內容。
執行 VBA 程式碼
按下 VBA 編輯器中的執行按鈕(或按下 F5
),程式碼會發送一個 HTTP POST 請求到 LINE Notify 的 API 網址,發送你設定的訊息到你的 LINE 帳號。
注意事項:
- 請確保你的電腦能夠連接到網際網路。
- 確保你有正確的權杖和訊息內容。
- 如果需要更複雜的功能或更多的參數,請參考 LINE Notify 官方文件。
這樣,你就完成了在 Excel VBA 中使用 LINE Notify 發送訊息的設置和執行。希望這篇教學對你有幫助!