抗うことのできない強烈なExcelニーズおよび、やんごとなき理由によりHTTP通信のみ許可された我々のために。 クライアント(ExcelVBA) Option Explicit Sub uploadFile() Const strUrl As String = "http://localhost/uploadfile/reqfile.php" Dim filename As String filename = "C:\test.xlsm" Dim xmlHttp As Object Set xmlHttp = CreateObject("MSXML2.XMLHTTP") Dim strm As Object Set strm = CreateObject("ADODB.Stream") strm.Type = 1 strm.Open strm.LoadFromFile filename C