{"id":1182,"date":"2017-09-11T23:53:03","date_gmt":"2017-09-11T14:53:03","guid":{"rendered":"https:\/\/euc-access-excel-db.com\/tips\/?p=1182"},"modified":"2017-10-15T23:12:20","modified_gmt":"2017-10-15T14:12:20","slug":"excel2003-microsoft-query-sql-command-refresh","status":"publish","type":"post","link":"https:\/\/euc-access-excel-db.com\/tips\/ct07_se\/ct070201_get_pc_hard\/excel2003-microsoft-query-sql-command-refresh","title":{"rendered":"Excel2003\u3067\u3001Microsoft Query\u306eSQL\u5185\u5bb9\u3092\u66f8\u304d\u63db\u3048\u308bVBA\u30d7\u30ed\u30b0\u30e9\u30e0\u306e\u3072\u306a\u578b\u30b5\u30f3\u30d7\u30eb"},"content":{"rendered":"<p>\u25cf\u3000Excel2003\u3067\u3001Microsoft Query\u306eSQL\u5185\u5bb9\u3092\u66f8\u304d\u63db\u3048\u308bVBA\u30d7\u30ed\u30b0\u30e9\u30e0\u306e\u3072\u306a\u578b\u30b5\u30f3\u30d7\u30eb<\/p>\n<p><span style=\"color: #ff0000;\">\u203b\u307e\u3060\u66f8\u304d\u304b\u3051\u30fb\u8abf\u67fb\u4e2d\u3067\u3059\u3002\u3059\u307f\u307e\u305b\u3093\u3002<\/span><br \/>\n\u30d0\u30fc\u30b8\u30e7\u30f32000\u3060\u3068\u3001\u3082\u3057\u304b\u3057\u305f\u3089\u300cCommandText\u300d\u306e\u30c7\u30fc\u30bf\u306e\u578b\u304c\u914d\u5217\u304b\u3082\u3057\u308c\u307e\u305b\u3093\u3002<br \/>\n\u3082\u3057\u304f\u306f\u3001\u30d4\u30dc\u30c3\u30c8\u30c6\u30fc\u30d6\u30eb\u306e\u300cCommandText\u300d\u306f\u914d\u5217\u3067\u3001Microsoft Query\u306e\u300cCommandText\u300d\u306f\u30c6\u30ad\u30b9\u30c8\u578b\u3001\u3068\u3044\u3046\u3053\u3068\u306a\u306e\u304b\u3082\u3057\u308c\u307e\u305b\u3093\u3002\u3044\u305a\u308c\u306b\u3057\u3066\u3082\u307e\u3060\u8abf\u67fb\u3057\u3066\u306a\u3044\u306e\u3067\u3001\u7686\u3055\u3093\u3054\u81ea\u8eab\u3067\u3082\u3001\u305d\u306e\u8fba\u306f\u8abf\u3079\u3066\u307f\u3066\u304f\u3060\u3055\u3044\u3002\u5f53\u65b9\u3082\u5206\u304b\u308a\u6b21\u7b2c\u3001\u3053\u306e\u8a18\u4e8b\u3092\u66f8\u304d\u63db\u3048\u305f\u3044\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n<p>\u4ee5\u964d\u306b\u6319\u3052\u305f\u4f8b\u306f\u3001\u300c\u30bd\u30fc\u30b92\u300d\u3068\u3044\u3046\u30b7\u30fc\u30c8\u306b\u3001\u3059\u3067\u306b\u4f5c\u3063\u3066\u3042\u308b\u3000Microsoft Query\u3000\u306e\u7d50\u679c\u306e\u8868\u306eSQL\uff08\u300cCommandText\u300d\uff09\u3092\u81ea\u52d5\u7684\u306b\u66f8\u304d\u63db\u3048\u307e\u3059\u3002<\/p>\n<p>\u3082\u3057\u3001\u300c\u30bd\u30fc\u30b92\u300d\u306eSQL\u5185\u5bb9\u304c\u3001\u30ea\u30ec\u30fc\u30b7\u30e7\u30f3\u304c\u306a\u3044\u5834\u5408\u3067\u3082\u3001\u4ee5\u4e0b\u306e\u30b3\u30fc\u30c9\u306e\u4f8b\u306e\u3088\u3046\u306bSQL\u6587\u306b\u3066\u30ea\u30ec\u30fc\u30b7\u30e7\u30f3\u3092\u7d44\u3093\u3067\u3001\u7968\u306e\u7d50\u679c\u3092\u66f4\u65b0\u3057\u305f\u308a\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002<\/p>\n<p>\u305d\u306e\u307b\u304b\u3001\u3059\u3079\u3066\u306e\u30b7\u30fc\u30c8\u306e\u3059\u3079\u3066\u306eMicrosoft Query\u3000\u306eSQL\uff08\u300cCommandText\u300d\uff09\u3092\u53d6\u5f97\u3057\u3066\u3001\u300cFROM\u300d\u53e5\u306eExcel\u30d5\u30a1\u30a4\u30eb\u306e\u540d\u524d\u3060\u3051\u3092\u81ea\u52d5\u7684\u306b\u5168\u90e8\u66f8\u304d\u63db\u3048\u308b\u30fb\u30fb\u30fb\u3001\u3068\u3046\u3044\u3046\u3053\u3068\u3082\u53ef\u80fd\u306b\u306a\u308b\u3068\u601d\u3044\u307e\u3059\u3002<br \/>\n\u305d\u308c\u304c\u3067\u304d\u308b\u3068\u3001\u3042\u308b\u3000Microsoft\u3000Query\u3000\u306eExcel\u30d5\u30a1\u30a4\u30eb\u3092\u3072\u306a\u304c\u305f\u3068\u3057\u3066\u4e00\u3064\u4f5c\u3063\u3066\u304a\u3051\u3070\u3001\u8907\u88fd\u3057\u3066\u30d5\u30a1\u30a4\u30eb\u540d\u3092\u5909\u3048\u3066\u3082\u305d\u308c\u3092\u6d41\u7528\u3067\u304d\u308b\u3053\u3068\u306b\u306a\u308b\u306e\u3067\u3001\u96c6\u8a08\u624b\u9806\u304c\u540c\u3058\u306a\u3089\u3001\u305d\u308c\u3092\u5171\u901a\u90e8\u54c1\u5316\uff08\u5171\u901a\u30df\u30cb\u30b7\u30b9\u30c6\u30e0\u5316\u3001\u5171\u901a\u30df\u30cb\u96c6\u8a08\u30d5\u30a1\u30a4\u30eb\u5316\u30fb\u30fb\u30fb\uff09\u306a\u3069\u3082\u3067\u304d\u308b\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n<pre class=\"lang:default decode:true \">\r\n'\r\n'\r\n'\r\nSub MSQueryCmdTxtRef01()\r\n\r\n\u3000\u3000'\u300c\u30bd\u30fc\u30b92\u300d\u3068\u3044\u3046\u30b7\u30fc\u30c8\u306b\u3001\u3059\u3067\u306b\u4f5c\u3063\u3066\u3042\u308bMicrosoft Query\u306e\u7d50\u679c\u8868\u306eSQL\u3092\u66f8\u304d\u63db\u3048\u307e\u3059\u3002\r\n\u3000\u3000'\u300cQueryTables(1)\u300d\u306f\u3001\u305d\u306e\u30b7\u30fc\u30c8\u4e0a\u306b\u300c\u4e00\u756a\u6700\u521d\u306b\u4f5c\u3089\u308c\u305fMicrosoft Query\u306e\u7d50\u679c\u8868\u300d\u3068\u3044\u3046\u610f\u5473\u3067\u3059\u3002\r\n\r\n    Dim SqlStr01 As String\u3000'\u300cCommandText\uff08SQL\u6587\uff09\u300d\u306e\u300cSQLECT\u300d\u53e5\u306e\u5185\u5bb9\u3092\u4ee3\u5165\u3059\u308b\u305f\u3081\u306e\u5909\u6570\r\n    Dim SqlStr02 As String\u3000'\u300cCommandText\uff08SQL\u6587\uff09\u300d\u306e\u300cFROM\u300d\u53e5\u306e\u5185\u5bb9\u3092\u4ee3\u5165\u3059\u308b\u305f\u3081\u306e\u5909\u6570\r\n    Dim SqlStr03 As String\u3000'\u300cCommandText\uff08SQL\u6587\uff09\u300d\u306e\u300cWHERE\u300d\u53e5\u306e\u5185\u5bb9\u3092\u4ee3\u5165\u3059\u308b\u305f\u3081\u306e\u5909\u6570\r\n    Dim SQLArrey As Variant\u3000'\u300cCommandText\u300d\u306e\u30c7\u30fc\u30bf\u306e\u578b\u304c\u3082\u3057\u914d\u5217\u3060\u3063\u305f\u3089\u4f7f\u3046\u5909\u6570\r\n    \r\n'    Debug.Print Worksheets(\"\u30bd\u30fc\u30b92\").QueryTables(1).Sql\r\n'    Debug.Print Worksheets(\"\u30bd\u30fc\u30b92\").QueryTables(1).CommandText\r\n    \r\n    SqlStr01 = \"SELECT \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u58f2\u4e0aID, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u58f2\u4e0a\u65e5, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u9867\u5ba2ID, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u304a\u540d\u524d, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u96fb\u8a71\u756a\u53f7, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u5546\u54c1ID, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u30a2\u30a4\u30c6\u30e0, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u5b9f\u58f2\u5358\u4fa1, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u4ed5\u5165\u5358\u4fa1, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u58f2\u4e0a\u70b9\u6570, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u58f2\u4e0a\u91d1\u984d\uff081\u884c\u5f53\u308a\uff09, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u4ed5\u5165\u91d1\u984d\uff081\u884c\u5f53\u308a\uff09, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.\u30ec\u30b7\u30fc\u30c8No, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.F14, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u58f2\u4e0a\u660e\u7d30$`.F15, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u9867\u5ba2ID, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u540d, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u59d3, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u6c0f\u540d, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u540d\u30d5\u30ea\u30ac\u30ca, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u59d3\u30d5\u30ea\u30ac\u30ca, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u56fd\u7c4d, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u6027\u5225, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u5e74\u9f62, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u90f5\u4fbf\u756a\u53f7, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u4f4f\u624001, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u4f4f\u624002, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.TEL, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u5e02, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u533a, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u90e1, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u753a, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u5b57\u7b49, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u756a\u5730, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u30d3\u30eb\u540d, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u68df\u306a\u3069, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u90e8\u5c4b\u540d, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u968e, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u304a\u4ed5\u4e8b, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u8da3\u5473, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u611b\u8aad\u66f8\u30ab\u30c6\u30b4\u30ea, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u30cd\u30c3\u30c8\u901a\u8ca9, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u5185\u30cd\u30c3\u30c8\u30aa\u30fc\u30af\u30b7\u30e7\u30f3, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u514d\u8a31\u66f4\u65b0\u65e5, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u30c0\u30a4\u30a8\u30c3\u30c8, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u30a8\u30b9\u30c6, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u30aa\u30b9\u30b9\u30e1\u6599\u7406\u5e97, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u5e74\u53ce_\u3054\u592b\u5a66\u8fbc\u307f, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u5546\u54c1ID, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u30e1\u30fc\u30ab\u30fc\u540d, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u30a2\u30a4\u30c6\u30e0, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u4e0a\u4ee3, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u4e0b\u4ee3, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u5165\u8377\u6570, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u8272\u7cfb\u7d71, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u30bf\u30fc\u30b2\u30c3\u30c8\u5e74\u9f62\u5c64, \"\r\n    SqlStr01 = SqlStr01 & \"`T\u5546\u54c1\u30de\u30b9\u30bf$`.\u5168\u5546\u54c1ID\u8868\u793a\u30d5\u30e9\u30b0 \"\r\n\r\n    SqlStr02 = \"FROM `C:\\pos\\pos`.`T\u9867\u5ba2\u30de\u30b9\u30bf$` `T\u9867\u5ba2\u30de\u30b9\u30bf$`, `C:\\pos\\pos`.`T\u5546\u54c1\u30de\u30b9\u30bf$` `T\u5546\u54c1\u30de\u30b9\u30bf$`, `C:\\pos\\pos`.`T\u58f2\u4e0a\u660e\u7d30$` `T\u58f2\u4e0a\u660e\u7d30$` \"\r\n\r\n    SqlStr03 = \"WHERE `T\u58f2\u4e0a\u660e\u7d30$`.\u9867\u5ba2ID = `T\u9867\u5ba2\u30de\u30b9\u30bf$`.\u9867\u5ba2ID AND `T\u58f2\u4e0a\u660e\u7d30$`.\u5546\u54c1ID = `T\u5546\u54c1\u30de\u30b9\u30bf$`.\u5546\u54c1ID\"\r\n    \r\n    Debug.Print SqlStr01\r\n    Debug.Print SqlStr02\r\n    Debug.Print SqlStr03\r\n    \r\n'    SQLArrey = Array(SqlStr01, SqlStr02, SqlStr03)\r\n        \r\n'    Worksheets(\"\u30bd\u30fc\u30b92\").QueryTables(1).CommandText = SQLArrey '\u30d0\u30fc\u30b8\u30e7\u30f32000\u3060\u3068\u3053\u308c\u304b\u3082\uff1f\u3082\u3057\u304f\u306f\u30d4\u30dc\u30c3\u30c8\u306eCommandText\u306f\u914d\u5217\u304b\u3082\uff1f\r\n    Worksheets(\"\u30bd\u30fc\u30b92\").QueryTables(1).CommandText = SqlStr01 & SqlStr02 & SqlStr03\r\n    Worksheets(\"\u30bd\u30fc\u30b92\").QueryTables(1).Refresh\u3000'\u3044\u3089\u306a\u3044\u304b\u3082\r\n'\r\nEnd Sub\r\n'\r\n'\r\n<\/pre>\n<p><SPAN>\u3000\u3000<\/SPAN><\/p>\n","protected":false},"excerpt":{"rendered":"\u25cf\u3000Excel2003\u3067\u3001Microsoft Query\u306eSQL\u5185\u5bb9\u3092\u66f8\u304d\u63db\u3048\u308bVBA\u30d7\u30ed\u30b0\u30e9\u30e0\u306e\u3072\u306a\u578b\u30b5\u30f3\u30d7\u30eb \u203b\u307e\u3060\u66f8\u304d\u304b\u3051\u30fb\u8abf\u67fb\u4e2d\u3067\u3059\u3002\u3059\u307f\u307e\u305b\u3093\u3002 \u30d0\u30fc\u30b8\u30e7\u30f32000\u3060\u3068\u3001\u3082\u3057\u304b\u3057\u305f\u3089\u300cCommandText\u300d\u306e ...","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":[],"categories":[1,108],"_links":{"self":[{"href":"https:\/\/euc-access-excel-db.com\/tips\/wp-json\/wp\/v2\/posts\/1182"}],"collection":[{"href":"https:\/\/euc-access-excel-db.com\/tips\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/euc-access-excel-db.com\/tips\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/euc-access-excel-db.com\/tips\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/euc-access-excel-db.com\/tips\/wp-json\/wp\/v2\/comments?post=1182"}],"version-history":[{"count":0,"href":"https:\/\/euc-access-excel-db.com\/tips\/wp-json\/wp\/v2\/posts\/1182\/revisions"}],"wp:attachment":[{"href":"https:\/\/euc-access-excel-db.com\/tips\/wp-json\/wp\/v2\/media?parent=1182"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/euc-access-excel-db.com\/tips\/wp-json\/wp\/v2\/categories?post=1182"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}