\u623b\u308a\u5024<\/td> \u30a6\u30a3\u30f3\u30c9\u30a6\u30cf\u30f3\u30c9\u30eb\u3092\u8fd4\u3059<\/td><\/tr><\/tbody><\/table><\/figure>\n\n\n\n\u3010\u4f7f\u7528\u4f8b\u3011\u30af\u30e9\u30b9\u540d\u304c\u4e0d\u660e\u3067\u3001\u30a6\u30a3\u30f3\u30c9\u30a6\u540d\u306f\u5224\u3063\u3066\u3044\u308b\u5834\u5408\u3002
\u2461 FindWindowEx<\/h5>\n\n\n\n \u3000\u89aa\u30cf\u30f3\u30c9\u30eb\u30fb\u30af\u30e9\u30b9\u540d\u30fb\u30a6\u30a3\u30f3\u30c9\u30a6\u540d\u304b\u3089\u5b50\u30cf\u30f3\u30c9\u30eb\u3092\u63a2\u3057\u307e\u3059\u3002button \u7b49\u3001\u30a6\u30a3\u30f3\u30c9\u30a6\u540d\u304c\u5909\u308f\u3089\u306a\u3044\u5834\u5408\u306f\u691c\u7d22\u3057\u3084\u3059\u3044\u3067\u3059\u304c\u3001\u30c6\u30ad\u30b9\u30c8\u30dc\u30c3\u30af\u30b9\u3001\u30c1\u30a7\u30c3\u30af\u30dc\u30c3\u30af\u30b9\u7b49\u306e\u30a6\u30a3\u30f3\u30c9\u30a6\u540d\u304c\u5909\u308f\u308b\u5834\u5408\u306e\u691c\u7d22\u306f\u4e0d\u5411\u304d\u3068\u601d\u3044\u307e\u3059\u3002\uff08\u4f7f\u3048\u308b\uff1f\uff09<\/p>\n\n\n\n
\u3010\u5ba3\u8a00\u3011hwndParent<\/td> \u89aa\u30cf\u30f3\u30c9\u30eb\u6307\u5b9a<\/td><\/tr> hwndChildAfter<\/td> \u540c\u540d\u30af\u30e9\u30b9\u30fb\u30bf\u30a4\u30c8\u30eb\u306e\u30cf\u30f3\u30c9\u30eb\u691c\u7d22\u6642\u3001\u201c0\u201d \u6307\u5b9a\u3067\u3001Z\u30aa\u30fc\u30c0\u30fc\u6700\u521d\u306e\u30cf\u30f3\u30c9\u30eb\u306e\u307f\u691c\u7d22\u3002 lpszClass<\/td> \u30a6\u30a3\u30f3\u30c9\u30a6\u30af\u30e9\u30b9\u540d\u3092\u6307\u5b9a<\/td><\/tr> lpszWindow<\/td> \u30a6\u30a3\u30f3\u30c9\u30a6\u30bf\u30a4\u30c8\u30eb\u3092\u6307\u5b9a<\/td><\/tr> \u623b\u308a\u5024<\/td> \u30a6\u30a3\u30f3\u30c9\u30a6\u30cf\u30f3\u30c9\u30eb\u3092\u8fd4\u3059<\/td><\/tr><\/tbody><\/table><\/figure>\n\n\n\n\u3010\u4f7f\u7528\u4f8b\u3011\u30af\u30e9\u30b9\u540d\u304c\u4e0d\u660e\u3067\u3001\u30a6\u30a3\u30f3\u30c9\u30a6\u540d\u306f\u5224\u3063\u3066\u3044\u308b\u5834\u5408\u3002
\u2462 GetWindow<\/h5>\n\n\n\n \u3000\u30a6\u30a3\u30f3\u30c9\u30a6\u3068\u95a2\u4fc2\uff08Z\u30aa\u30fc\u30c0\u30fc\u7b49\uff09\u3092\u6307\u5b9a\u3057\u3001\u691c\u7d22\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u30cf\u30f3\u30c9\u30eb\u3092\u8fd4\u3057\u307e\u3059\u3002\u201cSpy++\u201d \u7b49\u3067\u4e88\u3081\u30a6\u30a3\u30f3\u30c9\u30a6\u69cb\u6210\u3092\u628a\u63e1\u3057\u3066\u3044\u308c\u3070\u3001\u30a6\u30a3\u30f3\u30c9\u30a6\u540d\u304c\u5909\u308f\u308b\u30c6\u30ad\u30b9\u30c8\u30dc\u30c3\u30af\u30b9\u7b49\u3067\u3082\u3001\u5bfe\u8c61\u30a6\u30a3\u30f3\u30c9\u30a6\u3092\u691c\u7d22\u3067\u304d\u308b\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n\n\n\n
\u3010\u5ba3\u8a00\u3011hwnd<\/td> \u57fa\u6e96\u3068\u306a\u308b\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u30cf\u30f3\u30c9\u30eb\u3092\u6307\u5b9a<\/td><\/tr> wCmd<\/td> \u6b21\u306e\u4f8b\u306e\u901a\u308a\u3001\u57fa\u6e96\u30a6\u30a3\u30f3\u30c9\u30a6\u306b\u5bfe\u3059\u308b\u95a2\u4fc2\u6307\u5b9a \u623b\u308a\u5024<\/td> \u30a6\u30a3\u30f3\u30c9\u30a6\u30cf\u30f3\u30c9\u30eb\u3092\u8fd4\u3059<\/td><\/tr><\/tbody><\/table><\/figure>\n\n\n\n\u3010\u4f7f\u7528\u4f8b\u3011
\u2463 SendMessage \u3001SendMessageStr<\/h5>\n\n\n\n \u3000\u30a6\u30a3\u30f3\u30c9\u30a6\u3078\u3001\u6307\u5b9a\u3055\u308c\u305f\u30e1\u30c3\u30bb\u30fc\u30b8\u3092\u9001\u4fe1\u3057\u307e\u3059\u3002button \u3092\u30af\u30ea\u30c3\u30af\u3059\u308b\u6642\u3001\u30c6\u30ad\u30b9\u30c8\u30dc\u30c3\u30af\u30b9\u306e\u5024\u3092\u8a2d\u5b9a\u3059\u308b\u6642\u3084\u3001\u53cd\u5bfe\u306b\u30a6\u30a3\u30f3\u30c9\u30a6\u540d\u3092\u53d6\u5f97\u3059\u308b\u6642\u306a\u3069\u306b\u3082\u4f7f\u7528\u3057\u3066\u3044\u307e\u3059\u3002<\/p>\n\n\n\n
\u3010\u5ba3\u8a00\u3011
Declare Function SendMessageStr Lib “user32.dll” Alias “SendMessageA” (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As String) As Long<\/p>\n\n\n\nhwnd<\/td> \u30e1\u30c3\u30bb\u30fc\u30b8\u9001\u308a\u5148\u306e\u30a6\u30a3\u30f3\u30c9\u30a6\u30cf\u30f3\u30c9\u30eb\u3092\u6307\u5b9a<\/td><\/tr> wMsg<\/td> \u30e1\u30c3\u30bb\u30fc\u30b8 \u30b3\u30fc\u30c9\u6307\u5b9a<\/td><\/tr> wParam<\/td> \u30e1\u30c3\u30bb\u30fc\u30b8\u4ed8\u52a0\u60c5\u5831\u6307\u5b9a<\/td><\/tr> lParam<\/td> \u30e1\u30c3\u30bb\u30fc\u30b8\u4ed8\u52a0\u60c5\u5831\u6307\u5b9a<\/td><\/tr> \u623b\u308a\u5024<\/td> \u51e6\u7406\u7d50\u679c\u3092\u8fd4\u3059\u3002<\/td><\/tr><\/tbody><\/table><\/figure>\n\n\n\n\u2464 SetForegroundWindow<\/h5>\n\n\n\n \u3000\u6307\u5b9a\u30cf\u30f3\u30c9\u30eb\u306e\u30a6\u30a3\u30f3\u30c9\u30a6\u3092\u6700\u524d\u9762\u306b\u30a2\u30af\u30c6\u30a3\u30d6\u5316\u3057\u307e\u3059\u3002<\/p>\n\n\n\n
\u3010\u5ba3\u8a00\u3011
\u30d7\u30ed\u30b0\u30e9\u30e0<\/h2>\n\n\n\n(1) C#\u30d5\u30a9\u30fc\u30e0\u30a2\u30d7\u30ea<\/h3>\n\n\n\n \u3000\u540c\u4e00\u30a2\u30d7\u30ea\u5185\u306e\u30a6\u30a3\u30f3\u30c9\u30a6\u69cb\u6210\uff08\u9806\u756a\uff09\u306f\u3001Z\u30aa\u30fc\u30c0\u30fc\u306b\u3088\u3063\u3066\u78ba\u5b9a\u3059\u308b\u69d8\u3067\u3059\u3002Z\u30aa\u30fc\u30c0\u30fc\u306f\u30d5\u30a9\u30fc\u30e0\u306b\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u3092\u8ffd\u52a0\u3057\u305f\u9806\u756a\u306e\u69d8\u3067\u3059\u3002\u78ba\u8a8d\u3057\u306a\u304c\u3089\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u4f5c\u6210\u3059\u308b\u70ba\u3001\u5f8c\u304b\u3089\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u3092\u8ffd\u52a0\u3059\u308b\u3068\u30a6\u30a3\u30f3\u30c9\u30a6\u69cb\u6210\uff08\u9806\u756a\uff09\u304c\u5909\u5316\u3057\u3001\u30a8\u30af\u30bb\u30ebVBA\u5074\u3067\u306e\u30d7\u30ed\u30b0\u30e9\u30e0\u4fee\u6b63\u304c\u5fc5\u8981\u3068\u306a\u308a\u307e\u3057\u305f\u3002\u884c\u756a\uff12\uff14\uff5e\uff13\uff12\u3067\u306f\u3001C#\u30d7\u30ed\u30b0\u30e9\u30e0\u3067\u64cd\u4f5c\u5bfe\u8c61\u3068\u306a\u308b\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u3092\u6700\u524d\u9762\u306b\u79fb\u52d5\u3057\u3001\u30a6\u30a3\u30f3\u30c9\u30a6\u69cb\u6210\uff08\u9806\u756a\uff09\u3092\u4e00\u5b9a\u306b\u3057\u3066\u3044\u307e\u3059\u3002\u3053\u306e\u69d8\u306b\u3059\u308b\u3053\u3068\u3067\u3001\u30a8\u30af\u30bb\u30ebVBA\u5074\u3067\u306e\u30d7\u30ed\u30b0\u30e9\u30e0\u5909\u66f4\u3092\u4e0d\u8981\u306b\u3057\u3066\u3044\u307e\u3059\u3002
using System;\nusing System.Collections.Generic;\nusing System.ComponentModel;\nusing System.Data;\nusing System.Drawing;\nusing System.Linq;\nusing System.Text;\nusing System.Threading.Tasks;\nusing System.Windows.Forms;\n\nnamespace VBA_Ope_TEST\n{\n public partial class Form1 : Form\n {\n public Form1()\n {\n InitializeComponent();\n\n this.checkBox1.Checked = false;\n this.checkBox1.Text = "OFF";\n this.checkBox2.Checked = false;\n this.checkBox2.Text = "OFF";\n\n this.button3.BringToFront();\n this.button2.BringToFront();\n this.button1.BringToFront();\n\n this.checkBox2.BringToFront();\n this.checkBox1.BringToFront();\n \n this.textBox2.BringToFront();\n this.textBox1.BringToFront();\n }\n\n private void checkBox1_CheckedChanged(object sender, EventArgs e)\n {\n if (this.checkBox1.Checked)\n {\n this.checkBox1.Text = "ON";\n }\n else {\n this.checkBox1.Text = "OFF";\n }\n }\n\n private void checkBox2_CheckedChanged(object sender, EventArgs e)\n {\n if (this.checkBox2.Checked)\n {\n this.checkBox2.Text = "ON";\n }\n else\n {\n this.checkBox2.Text = "OFF";\n }\n }\n\n private void button1_Click(object sender, EventArgs e)\n {\n MessageBox.Show("\u30dc\u30bf\u30f3 \uff11 \u304c\u30af\u30ea\u30c3\u30af\u3055\u308c\u307e\u3057\u305f\u3002","button1_click",MessageBoxButtons.OK,MessageBoxIcon.Information);\n }\n\n private void button2_Click(object sender, EventArgs e)\n {\n MessageBox.Show("\u30dc\u30bf\u30f3 \uff12 \u304c\u30af\u30ea\u30c3\u30af\u3055\u308c\u307e\u3057\u305f\u3002", "button2_click", MessageBoxButtons.OK, MessageBoxIcon.Information);\n }\n\n private void button3_Click(object sender, EventArgs e)\n {\n MessageBox.Show("\u30dc\u30bf\u30f3 \uff13 \u304c\u30af\u30ea\u30c3\u30af\u3055\u308c\u307e\u3057\u305f\u3002", "button3_click", MessageBoxButtons.OK, MessageBoxIcon.Information);\n }\n\n }\n}<\/code><\/pre><\/div>\n\n\n\n(2) \u30a8\u30af\u30bb\u30ebVBA<\/h2>\n\n\n\n \u3000\u30b7\u30fc\u30c8\u306b\u8cbc\u308a\u4ed8\u3051\u3089\u308c\u305f\u30dc\u30bf\u30f3\u306e\u30af\u30ea\u30c3\u30af\u30a4\u30d9\u30f3\u30c8\u3067\u5404\u51e6\u7406\u95a2\u6570\u3092\u547c\u3073\u51fa\u3057\u3066\u3044\u307e\u3059\u3002<\/p>\n\n\n\n
Option Explicit\n\n\u2019\u30c6\u30ad\u30b9\u30c8\u30dc\u30c3\u30af\u30b9\u30fb\u30c1\u30a7\u30c3\u30af\u30dc\u30c3\u30af\u30b9\u306e\u5185\u5bb9\u78ba\u8a8d\u30fb\u5909\u66f4\nPrivate Sub CommandButton1_Click() \n Call TEST_GetWindowCaption \nEnd Sub\n\n\u2019\u30dc\u30bf\u30f3\uff11\u30af\u30ea\u30c3\u30af\nPrivate Sub CommandButton2_Click()\n Call TEST_ClikFormButton(0)\nEnd Sub\n\n\u2019\u30dc\u30bf\u30f3\uff12\u30af\u30ea\u30c3\u30af\nPrivate Sub CommandButton3_Click()\n Call TEST_ClikFormButton(1)\nEnd Sub\n\n\u2019\u30dc\u30bf\u30f3\uff13\u30af\u30ea\u30c3\u30af\nPrivate Sub CommandButton4_Click()\n Call TEST_ClikFormButton(2)\nEnd Sub<\/code><\/pre><\/div>\n\n\n\n\u3000\u30b7\u30fc\u30c8\u306e\u30dc\u30bf\u30f3\u30af\u30ea\u30c3\u30af\u30a4\u30d9\u30f3\u30c8\u767a\u751f\u6642\u306b\u547c\u3073\u51fa\u3059\u95a2\u6570\u3067\u3059\u3002\u3000\u3000<\/p>\n\n\n\n
\u3010 Sub TEST_ClikFormButton(btn) \u3011\u884c\u756a24\uff5e41
\u3010 Sub TEST_GetWindowCaption() \u3011\u884c\u756a45\uff5e126
Option Explicit\n\nPrivate Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long\nPrivate Declare Function FindWindowEx Lib "user32.dll" Alias "FindWindowExA" (ByVal hwndParent As Long, ByVal hwndChildAfter As Long, ByVal lpszClass As String, ByVal lpszWindow As String) As Long\nPrivate Declare Function GetWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal wCmd As Long) As Long\nPrivate Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long\nPrivate Declare Function SendMessageStr Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As String) As Long\nPrivate Declare Sub SetForegroundWindow Lib "user32.dll" (ByVal ms As Long)\n\nConst BM_CLICK = &HF5 '\u30dc\u30bf\u30f3\u30af\u30ea\u30c3\u30af\nConst WM_SETTEXT = &HC '\u30a6\u30a3\u30f3\u30c9\u30a6(\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb)\u306e\u30c6\u30ad\u30b9\u30c8\u3092\u5909\u66f4\nConst WM_GETTEXT = &HD '\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u306e\u30ad\u30e3\u30d7\u30b7\u30e7\u30f3\u30fb\u30c6\u30ad\u30b9\u30c8\u3092\u30d0\u30c3\u30d5\u30a1\u306b\u30b3\u30d4\u30fc\nConst WM_GETTEXTLENGTH = &HE 'WM_GETTEXT\u306e\u524d\u306b\u6587\u5b57\u6570\u3092\u8abf\u3079\u308b\n\nConst GW_HWNDFIRST = 0 '\u6700\u524d\u9762\u30a6\u30a3\u30f3\u30c9\u30a6\u691c\u7d22\nConst GW_HWNDLAST = 1 '\u6700\u80cc\u9762\u30a6\u30a3\u30f3\u30c9\u30a6\u691c\u7d22\nConst GW_HWNDNEXT = 2 '\u57fa\u6e96\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u6b21\u30a6\u30a3\u30f3\u30c9\u30a6\u691c\u7d22\nConst GW_HWNDPREV = 3 '\u57fa\u6e96\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u524d\u30a6\u30a3\u30f3\u30c9\u30a6\u691c\u7d22\nConst GW_OWNER = 4 '\u57fa\u6e96\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u30aa\u30fc\u30ca\u30fc\u30a6\u30a3\u30f3\u30c9\u30a6\u691c\u7d22\nConst GW_CHILD = 5 '\u57fa\u6e96\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u5b50\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u30c8\u30c3\u30d7\u30ec\u30d9\u30eb\u30a6\u30a3\u30f3\u30c9\u30a6\u691c\u7d22\n\n'\u30b7\u30fc\u30c8\u4e0a\u306e\u30dc\u30bf\u30f3\u3092\u30af\u30ea\u30c3\u30af\u3057\u305f\u6642\u306b\u547c\u3073\u51fa\u3059\u95a2\u6570\n'\u30dc\u30bf\u30f3\u756a\u53f7\u3092\u6307\u5b9a\u3057\u3001\u5bfe\u8c61\u30a6\u30a3\u30f3\u30c9\u30a6\u691c\u7d22\u30fb\u30dc\u30bf\u30f3\u30af\u30ea\u30c3\u30af\u30e1\u30c3\u30bb\u30fc\u30b8\u9001\u4fe1\nSub TEST_ClikFormButton(btn) \n Dim hParent As Long\n Dim h_wnd(2) As Long\n Dim rtn\n Dim sht\n \n sht = ActiveSheet.Name\n hParent = FindWindow(vbNullString, "VBA_TEST") \n SetForegroundWindow (hParent)\n \n h_wnd(0) = FindWindowEx(hParent, 0, vbNullString, "button1")\n h_wnd(1) = FindWindowEx(hParent, 0, vbNullString, "button2")\n h_wnd(2) = FindWindowEx(hParent, 0, vbNullString, "button3")\n\n rtn = SendMessage(h_wnd(btn), BM_CLICK, 0, 0) \n Worksheets(sht).Cells(1, 1).Select\n \nEnd Sub\n\n'C#\u30d5\u30a9\u30fc\u30e0\u30a2\u30d7\u30ea\u306e\u30c8\u30c3\u30d7\u30a6\u30a3\u30f3\u30c9\u30a6\u3092\u691c\u7d22\u5f8c\u3001\n\u2019\u5bfe\u8c61\u30a6\u30a3\u30f3\u30c9\u30a6\u3092\u691c\u7d22\u3001\u30c7\u30fc\u30bf\u5185\u5bb9\u78ba\u8a8d\u30fb\u5909\u66f4\u5b9f\u65bd\nSub TEST_GetWindowCaption()\n \n Dim sht\n Dim hParent As Long\n Dim hwnd(7) As Long\n Dim hwnd_hex(7)\n Dim cnt\n Dim rtn\n Dim strText As String\n Dim msg\n\n sht = ActiveSheet.Name\n \n hParent = FindWindow(vbNullString, "VBA_TEST")\n SetForegroundWindow (hParent)\n \n '\u30c6\u30ad\u30b9\u30c8\u30dc\u30c3\u30af\u30b9\u5185\u5bb9\u3092\u78ba\u8a8d\u3057\u3001\u7570\u306a\u308b\u6587\u5b57\u3092\u8a2d\u5b9a\n cnt = 0\n Do\n If cnt = 0 Then\n hwnd(cnt) = GetWindow(hParent, GW_CHILD)\n Else\n hwnd(cnt) = GetWindow(hwnd(cnt - 1), GW_HWNDNEXT)\n End If\n \n hwnd_hex(cnt) = Hex(hwnd(cnt))\n \n msg = ""\n strText = Space(500)\n rtn = SendMessageStr(hwnd(cnt), WM_GETTEXT, Len(strText), strText)\n strText = Trim(strText)\n If strText <> "" Then strText = Left(strText, Len(strText) - 1)\n \n If cnt = 0 Then\n If strText = "Open" Then\n msg = "Closed"\n Else\n msg = "Open"\n End If\n \n rtn = SendMessageStr(hwnd(cnt), WM_SETTEXT, 0, msg)\n \n ElseIf cnt = 1 Then\n If strText = "\u6e96\u5099\u4e2d" Then\n msg = "\u55b6\u696d\u4e2d"\n Else\n msg = "\u6e96\u5099\u4e2d"\n End If\n \n rtn = SendMessageStr(hwnd(cnt), WM_SETTEXT, 0, msg)\n \n ElseIf cnt = 2 Then\n msg = strText\n \n ElseIf cnt = 3 Then\n rtn = SendMessage(hwnd(cnt), BM_CLICK, 0, 0)\n \n strText = Space(500)\n rtn = SendMessageStr(hwnd(cnt), WM_GETTEXT, Len(strText), strText)\n strText = Trim(strText)\n If strText <> "" Then strText = Left(strText, Len(strText) - 1)\n \n msg = strText\n \n Else\n Exit Do\n \n End If\n \n If msg <> "" Then\n Worksheets(sht).Cells(5 + cnt, 4).Value = msg\n End If\n \n If hwnd(cnt) = 0 Then Exit Do\n \n cnt = cnt + 1\n DoEvents\n Loop\n\n Worksheets(sht).Cells(1, 1).Select\n \nEnd Sub<\/code><\/pre><\/div>\n\n\n\n\u3000\u3000<\/p>\n\n\n\n
\u307e\u3068\u3081<\/h2>\n\n\n\n \u3000\u304b\u306a\u308a\u524d\u306b\u540c\u3058\u69d8\u306a\u3053\u3068\u3092\u3057\u307e\u3057\u305f\u304c\u3059\u3063\u304b\u308a\u5fd8\u308c\u3066\u3044\u307e\u3059\u3002\u3068\u3044\u3046\u3053\u3068\u3067\u3001\u4eca\u56de\u306f\u8003\u3048\u65b9\u3092\u6b8b\u3057\u3066\u304a\u304f\u3053\u3068\u306b\u3057\u307e\u3057\u305f\u3002
\u6982\u8981 \u3000\u30a8\u30af\u30bb\u30ebVBA\u304b\u3089\u3001Visual Studio \u30d5\u30a9\u30fc\u30e0\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u3092\u64cd\u4f5c\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u78ba\u8a8d\u3057\u307e\u3057\u305f\u3002 \u3000\u6b21\u306e\u52d5\u753b\u3067\u306f\u3001\u30a8\u30af\u30bb\u30ebVBA\u304b\u3089\u3001C#\u30d5\u30a9\u30fc\u30e0\u306e\u30dc\u30bf\u30f3\u3092\u30af\u30ea\u30c3\u30af\u3059\u308b\u51e6\u7406 \u3068 \u30c6\u30ad\u30b9\u30c8\u30dc\u30c3\u30af\u30b9\u30fb\u30c1\u30a7 … \u7d9a\u304d\u3092\u8aad\u3080 \u30a8\u30af\u30bb\u30eb VBA\u3067 VS\u30d5\u30a9\u30fc\u30e0\u30a2\u30d7\u30ea\u64cd\u4f5c<\/span> →<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":6057,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[98],"tags":[80,96,95],"_links":{"self":[{"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/posts\/6042"}],"collection":[{"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/comments?post=6042"}],"version-history":[{"count":44,"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/posts\/6042\/revisions"}],"predecessor-version":[{"id":6091,"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/posts\/6042\/revisions\/6091"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/media\/6057"}],"wp:attachment":[{"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/media?parent=6042"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/categories?post=6042"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/kats-eye.net\/info\/wp-json\/wp\/v2\/tags?post=6042"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}