概要 既存のRedmineチケットをREST API (PUT)経由で更新するExcelマクロ(VBA)のサンプル。 コード Option Explicit Public Const REDMINE_URL As String = "http://myserver/redmine/" Public Sub Test1() Dim requestStatus As String requestStatus = UpdateIssue( _ 1, _ "94811293a201319fbaea04af5c0fd8a52b06c65f", _ "説明の更新テスト", _ "注記の追加テスト") MsgBox requestStatus End Sub Public Function UpdateIssue( _ ByVal issueId As Integer, _ ByVal apiKey A