{"id":5237,"date":"2015-01-16T16:23:13","date_gmt":"2015-01-16T07:23:13","guid":{"rendered":"http:\/\/www.ka-net.org\/blog\/?p=5237"},"modified":"2015-01-16T16:23:13","modified_gmt":"2015-01-16T07:23:13","slug":"%e3%82%a2%e3%83%97%e3%83%aa%e3%82%b1%e3%83%bc%e3%82%b7%e3%83%a7%e3%83%b3%e8%b5%b7%e5%8b%95%e6%99%82%e3%81%ab%e3%82%af%e3%82%a4%e3%83%83%e3%82%af-%e3%82%a2%e3%82%af%e3%82%bb%e3%82%b9-%e3%83%84%e3%83%bc","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=5237","title":{"rendered":"\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u8d77\u52d5\u6642\u306b\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306b\u30de\u30af\u30ed\u5b9f\u884c\u7528\u30dc\u30bf\u30f3\u3092\u52d5\u7684\u306b\u8ffd\u52a0\u3059\u308bOutlook\u30de\u30af\u30ed"},"content":{"rendered":"<p><a href=\"https:\/\/social.msdn.microsoft.com\/Forums\/ja-JP\/home?forum=vbajp\" title=\"Msdn \u30d5\u30a9\u30fc\u30e9\u30e0 - Visual Basic for Application(VBA)\" target=\"_blank\">Msdn \u30d5\u30a9\u30fc\u30e9\u30e0<\/a>\u306b\u300c<a href=\"https:\/\/social.msdn.microsoft.com\/Forums\/ja-JP\/vbajp\/thread\/e5f8d48f-453d-48fc-a942-d37eb59997bd\" title=\"Outlook2010\u306eVBA\u30e1\u30cb\u30e5\u30fc\u30d0\u30fc\u8ffd\u52a0\u51e6\u7406\u306b\u95a2\u3057\u3066\" target=\"_blank\">Outlook2010\u306eVBA\u30e1\u30cb\u30e5\u30fc\u30d0\u30fc\u8ffd\u52a0\u51e6\u7406\u306b\u95a2\u3057\u3066<\/a>\u300d\u3068\u3044\u3046\u8cea\u554f\u304c\u3042\u308a\u307e\u3057\u305f\u3002<\/p>\n<p>Outlook 2010\u3067\u30de\u30af\u30ed\u3092\u547c\u3073\u51fa\u3059\u305f\u3081\u306e\u30e1\u30cb\u30e5\u30fc\u3092\u30ea\u30dc\u30f3\u306b\u8ffd\u52a0\u3057\u305f\u3044\u3001\u3068\u3044\u3046\u3088\u3046\u306a\u8cea\u554f\u3067\u3059\u304c\u3001Outlook\u304c\u30ea\u30dc\u30f3UI\u306b\u5909\u66f4\u3055\u308c\u305f\u3053\u3068\u3067\u3001\u30b3\u30de\u30f3\u30c9\u30d0\u30fc\u3092\u5229\u7528\u3057\u305f\u30de\u30af\u30ed\u304c\u610f\u56f3\u901a\u308a\u306b\u52d5\u304b\u306a\u304f\u306a\u3063\u3066\u3057\u307e\u3063\u305f\u3088\u3046\u3067\u3059\u3002<\/p>\n<p>\u8cea\u554f\u8005\u306e\u65b9\u306f\u3001Application\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e<span style=\"color: #ff0000; font-weight: bold;\">ItemLoad<\/span>\u30a4\u30d9\u30f3\u30c8\u3092\u5229\u7528\u3059\u308b\u3053\u3068\u3067\u3001Outlook\u30a2\u30a4\u30c6\u30e0\u304c\u8aad\u307f\u8fbc\u307e\u308c\u305f\u6642\u70b9\u3067CommandBars\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306eAdd\u30e1\u30bd\u30c3\u30c9\u3092\u4f7f\u3063\u3066\u30e1\u30cb\u30e5\u30fc\u3092\u8ffd\u52a0\u3059\u308b\u65b9\u6cd5\u3092\u8a66\u3055\u308c\u3066\u3044\u308b\u3088\u3046\u3067\u3057\u305f\u304c\u3001\u3053\u306e\u65b9\u6cd5\u3060\u3068\u30e1\u30fc\u30eb\u3092\u30d7\u30ec\u30d3\u30e5\u30fc\u8868\u793a\u3057\u305f\u3060\u3051\u3067\u30de\u30af\u30ed\u304c\u5b9f\u884c\u3055\u308c\u3066\u3057\u307e\u3044\u307e\u3059\u3002<\/p>\n<p>\u79c1\u306e\u65b9\u304b\u3089\u306fInspectors\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e<span style=\"color: #ff0000; font-weight: bold;\">NewInspector<\/span>\u30a4\u30d9\u30f3\u30c8\u3092\u5229\u7528\u3059\u308b\u65b9\u6cd5\u3092\u63d0\u6848\u3057\u307e\u3057\u305f\u304c\u3001\u30de\u30af\u30ed\u4e0a\u3067\u4f55\u3089\u304b\u306e\u30a8\u30e9\u30fc\u304c\u767a\u751f\u3057\u3066\u3057\u307e\u3046\u3068\u3001Outlook\u3092\u518d\u8d77\u52d5\u3057\u306a\u304f\u3066\u306f\u306a\u3089\u306a\u3044\u305f\u3081\u3001\u3053\u3061\u3089\u3082\u3042\u307e\u308a\u4f7f\u3044\u52dd\u624b\u304c\u3088\u304f\u3042\u308a\u307e\u305b\u3093\u3002<\/p>\n<p>\u300c<a href=\"http:\/\/msdn.microsoft.com\/ja-jp\/library\/ff865324.aspx\" title=\"CommandBars \u306e\u4ee5\u524d\u306e\u30b3\u30fc\u30c9\u306e\u66f4\u65b0(\u6a5f\u68b0\u7ffb\u8a33)\" target=\"_blank\">CommandBars \u306e\u4ee5\u524d\u306e\u30b3\u30fc\u30c9\u306e\u66f4\u65b0<\/a>\u300d\u306b\u3088\u308b\u3068\u3001<strong>\u201cCommandBars\u3092\u4f7f\u3046\u4ee3\u308f\u308a\u306b\u30ea\u30dc\u30f3\u306e\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3092\u4f7f\u3046\u3088\u3046\u306b\uff01\u201d<\/strong>\u3068\u3044\u3046\u3053\u3068\u304c\u66f8\u304b\u308c\u3066\u3044\u307e\u3059\u304c\u3001\u30a2\u30c9\u30a4\u30f3\u3092\u4f7f\u7528\u3057\u3066IRibbonExtensibility\u30a4\u30f3\u30bf\u30fc\u30d5\u30a7\u30a4\u30b9\u3092\u5b9f\u88c5\u3059\u308b\u5fc5\u8981\u304c\u3042\u308b\u305f\u3081\u3001Word\u3084Excel\u3001PowerPoint\u3068\u306f\u9055\u3063\u3066\u3001Outlook\u306e\u5834\u5408\u306f\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3057\u305f\u30ea\u30dc\u30f3\u3092\u9069\u7528\u3059\u308b\u3053\u3068\u304c\u5bb9\u6613\u3067\u306f\u3042\u308a\u307e\u305b\u3093\u3002<\/p>\n<p>\u3082\u3061\u308d\u3093\u3001Visual Studio\u3084SharpDevelop\u3092\u4f7f\u3063\u3066COM\u30a2\u30c9\u30a4\u30f3\u3092\u4f5c\u3063\u3066\u3057\u307e\u3048\u3070\u826f\u3044\u306e\u3067\u3059\u304c\u3001VBA\u3060\u3051\u3067\u51e6\u7406\u3057\u306a\u304f\u3066\u306f\u306a\u3089\u306a\u3044\u5834\u5408\u306f\u3001\u4f55\u304b\u3057\u3089\u5de5\u592b\u3059\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002<\/p>\n<p>\u305d\u3053\u3067\u8003\u3048\u305f\u306e\u304c<span style=\"color: #ff0000; font-weight: bold;\">\u201cofficeUI\u30d5\u30a1\u30a4\u30eb\u3092\u52d5\u7684\u306b\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3059\u308b\u65b9\u6cd5\u201d<\/span>\u3067\u3059\u3002<\/p>\n<p>officeUI\u30d5\u30a1\u30a4\u30eb\u306f\u300c<a href=\"http:\/\/msdn.microsoft.com\/ja-jp\/library\/ee704589.aspx\" title=\"Office 2010 \u3067\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3057\u305f\u30ea\u30dc\u30f3\u3068\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u3092\u5c55\u958b\u3059\u308b\" target=\"_blank\">Office 2010 \u3067\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3057\u305f\u30ea\u30dc\u30f3\u3068\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u3092\u5c55\u958b\u3059\u308b<\/a>\u300d\u306b\u3042\u308b\u901a\u308a\u3001\u30ea\u30dc\u30f3\u3084\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306e\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u60c5\u5831\u304c\u8a18\u9332\u3055\u308c\u305f\u30d5\u30a1\u30a4\u30eb\u3067\u3059\u3002<\/p>\n<p>\u901a\u5e38\u306f\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u306e\u30aa\u30d7\u30b7\u30e7\u30f3\u753b\u9762\u306b\u3042\u308b\u300c<span style=\"color: #ff0000; font-weight: bold;\">\u30ea\u30dc\u30f3\u306e\u30e6\u30fc\u30b6\u30fc\u8a2d\u5b9a<\/span>\u300d\u3084\u300c<span style=\"color: #ff0000; font-weight: bold;\">\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc<\/span>\u300d\u304b\u3089\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3092\u884c\u3046\u308f\u3051\u3067\u3059\u304c\u3001officeUI\u30d5\u30a1\u30a4\u30eb\u306e\u5b9f\u4f53\u306fXML\u30d5\u30a1\u30a4\u30eb\u306a\u306e\u3067\u3001\u52d5\u7684\u306b\u8aad\u307f\u8fbc\u3093\u3067\u5185\u5bb9\u3092\u66f8\u304d\u63db\u3048\u308b\u3053\u3068\u304c\u53ef\u80fd\u3067\u3059\u3002<\/p>\n<p>\u3068\u3044\u3046\u308f\u3051\u3067\u3001\u65e9\u901f\u30b3\u30fc\u30c9\u3092\u8003\u3048\u3066\u307f\u307e\u3057\u305f\u3002<\/p>\n<p><span style=\"color: #ff0000; font-weight: bold;\">\u203b \u4e0b\u8a18\u30b3\u30fc\u30c9\u306fOffice 2007\u3067\u306f\u52d5\u4f5c\u3057\u307e\u305b\u3093\u3002<\/span><br \/>\n<span style=\"color: #ff0000; font-weight: bold;\">\u203b \u4e0b\u8a18\u30b3\u30fc\u30c9\u306fOutlook 2010\u3067\u52d5\u4f5c\u78ba\u8a8d\u3092\u884c\u3044\u307e\u3057\u305f\u3002<\/span><\/p>\n<pre class=\"brush: vb; title: ; notranslate\" title=\"\">'ThisOutlookSession\r\nOption Explicit\r\n\r\nPrivate Sub Application_Startup()\r\n  Dim officeUIFolderPath As String\r\n  Dim officeUIFilePath As String\r\n  Dim d As Object\r\n  Dim elmBtn As Object\r\n  Dim elmScs As Object\r\n  Dim elmQat As Object\r\n  Dim elmRbn As Object\r\n  Dim elmCui As Object\r\n  Dim atrMacroNs As Object\r\n  Dim macroNsName As String\r\n  \r\n  '\u30de\u30af\u30ed\u547c\u3073\u51fa\u3057\u7528button\u8981\u7d20\u306e\u5c5e\u6027\u5024\r\n  Const button_idQ As String = &quot;btnExecuteProc&quot;\r\n  Const button_label As String = &quot;\u30de\u30af\u30ed\u5b9f\u884c&quot;\r\n  Const button_imageMso As String = &quot;HappyFace&quot; '\u30a2\u30a4\u30b3\u30f3\u6307\u5b9a\r\n  Const button_onAction As String = &quot;Project1.ThisOutlookSession.btnExecuteProc_onAction&quot; '\u5b9f\u884c\u3059\u308b\u30de\u30af\u30ed\u6307\u5b9a\r\n  \r\n  Const CSIDL_LOCAL_APPDATA = &amp;H1C&amp;\r\n  \r\n  '\u521d\u671f\u5316\r\n  macroNsName = &quot;&quot;\r\n  Set d = CreateObject(&quot;Msxml2.DOMDocument&quot;)\r\n  d.async = False\r\n  \r\n  'officeUI\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u53d6\u5f97\r\n  officeUIFolderPath = AddPathSeparator(CreateObject(&quot;Shell.Application&quot;) _\r\n                                        .NameSpace(CSIDL_LOCAL_APPDATA).Self.Path)\r\n  officeUIFolderPath = officeUIFolderPath &amp; &quot;Microsoft\\Office\\&quot;\r\n  officeUIFilePath = officeUIFolderPath &amp; &quot;olkmailitem.officeUI&quot;\r\n  \r\n  On Error GoTo Err\r\n  With CreateObject(&quot;Scripting.FileSystemObject&quot;)\r\n    'officeUI\u30d5\u30a1\u30a4\u30eb\u304c\u3042\u308b\u5834\u5408\r\n    If .FileExists(officeUIFilePath) = True Then\r\n      If d.Load(officeUIFilePath) = True Then\r\n        'customUI\u8981\u7d20\u306b\u30de\u30af\u30ed\u547c\u3073\u51fa\u3057\u7528\u540d\u524d\u7a7a\u9593\u304c\u7121\u3051\u308c\u3070\u8ffd\u52a0\r\n        macroNsName = HasMacroNameSpace(d.FirstChild)\r\n        If Len(Trim(macroNsName)) &lt; 1 Then\r\n          macroNsName = &quot;x1&quot;\r\n          Set atrMacroNs = d.createAttribute(&quot;xmlns:&quot; &amp; macroNsName)\r\n          atrMacroNs.NodeValue = &quot;http:\/\/schemas.microsoft.com\/office\/2009\/07\/customui\/macro&quot;\r\n          d.FirstChild.Attributes.setNamedItem atrMacroNs\r\n        End If\r\n        \r\n        If d.getElementsByTagName(&quot;mso:sharedControls&quot;).Length &gt; 0 Then\r\n          Set elmScs = d.getElementsByTagName(&quot;mso:sharedControls&quot;)(0)\r\n          'sharedControls\u8981\u7d20\u306e\u5b50\u8981\u7d20\u3068\u3057\u3066button\u8981\u7d20\u304c\u7121\u3051\u308c\u3070\u8ffd\u52a0\r\n          If elmScs.getElementsByTagName(&quot;mso:button&quot;).Length &lt; 1 Then\r\n            Set elmBtn = d.createElement(&quot;mso:button&quot;)\r\n            elmBtn.setAttribute &quot;idQ&quot;, macroNsName &amp; &quot;:&quot; &amp; button_idQ\r\n            elmBtn.setAttribute &quot;label&quot;, button_label\r\n            elmBtn.setAttribute &quot;imageMso&quot;, button_imageMso\r\n            elmBtn.setAttribute &quot;onAction&quot;, button_onAction\r\n            elmScs.appendChild elmBtn\r\n          Else\r\n            If HasMacroButtonElement(elmScs, button_idQ) = False Then\r\n              Set elmBtn = d.createElement(&quot;mso:button&quot;)\r\n              elmBtn.setAttribute &quot;idQ&quot;, macroNsName &amp; &quot;:&quot; &amp; button_idQ\r\n              elmBtn.setAttribute &quot;label&quot;, button_label\r\n              elmBtn.setAttribute &quot;imageMso&quot;, button_imageMso\r\n              elmBtn.setAttribute &quot;onAction&quot;, button_onAction\r\n              elmScs.appendChild elmBtn\r\n            End If\r\n          End If\r\n          'Debug.Print d.XML '\u78ba\u8a8d\u7528\r\n          d.Save officeUIFilePath 'officeUI\u30d5\u30a1\u30a4\u30eb(XML)\u4fdd\u5b58\r\n        Else: GoTo Err\r\n        End If\r\n      Else: GoTo Err\r\n      End If\r\n    Else\r\n    'officeUI\u30d5\u30a1\u30a4\u30eb\u304c\u7121\u3044\u5834\u5408\r\n      'button\u8981\u7d20\r\n      Set elmBtn = d.createElement(&quot;mso:button&quot;)\r\n      elmBtn.setAttribute &quot;idQ&quot;, &quot;x1:&quot; &amp; button_idQ\r\n      elmBtn.setAttribute &quot;label&quot;, button_label\r\n      elmBtn.setAttribute &quot;imageMso&quot;, button_imageMso\r\n      elmBtn.setAttribute &quot;onAction&quot;, button_onAction\r\n      'sharedControls\u8981\u7d20\r\n      Set elmScs = d.createElement(&quot;mso:sharedControls&quot;)\r\n      elmScs.appendChild elmBtn\r\n      'qat\u8981\u7d20\r\n      Set elmQat = d.createElement(&quot;mso:qat&quot;)\r\n      elmQat.appendChild elmScs\r\n      'ribbon\u8981\u7d20\r\n      Set elmRbn = d.createElement(&quot;mso:ribbon&quot;)\r\n      elmRbn.appendChild elmQat\r\n      'customUI\u8981\u7d20\r\n      Set elmCui = d.createElement(&quot;mso:customUI&quot;)\r\n      elmCui.setAttribute &quot;xmlns:x1&quot;, &quot;http:\/\/schemas.microsoft.com\/office\/2009\/07\/customui\/macro&quot;\r\n      elmCui.setAttribute &quot;xmlns:mso&quot;, &quot;http:\/\/schemas.microsoft.com\/office\/2009\/07\/customui&quot;\r\n      elmCui.appendChild elmRbn\r\n      d.appendChild elmCui\r\n      d.Save officeUIFilePath 'officeUI\u30d5\u30a1\u30a4\u30eb(XML)\u4fdd\u5b58\r\n    End If\r\n  End With\r\n  On Error GoTo 0\r\n  \r\n  Exit Sub\r\nErr:\r\n  MsgBox &quot;\u51e6\u7406\u304c\u5931\u6557\u3057\u307e\u3057\u305f\u3002&quot;, vbExclamation + vbSystemModal\r\nEnd Sub\r\n\r\nPublic Sub btnExecuteProc_onAction()\r\n'\u52d5\u7684\u306b\u8ffd\u52a0\u3057\u305f\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306e\u30dc\u30bf\u30f3\u304b\u3089\u547c\u3073\u51fa\u3055\u308c\u308b\u30de\u30af\u30ed\r\n  MsgBox &quot;OK&quot;, vbInformation + vbSystemModal\r\nEnd Sub\r\n\r\nPrivate Function HasMacroNameSpace(ByVal elmCui As Object) As String\r\n'\u30de\u30af\u30ed\u547c\u3073\u51fa\u3057\u7528\u540d\u524d\u7a7a\u9593\u304c\u3042\u308b\u5834\u5408\u306fprefix\u3092\u8fd4\u3059\r\n  Dim ret As String\r\n  Dim n As Object\r\n  \r\n  ret = &quot;&quot; '\u521d\u671f\u5316\r\n  For Each n In elmCui.Attributes\r\n    If n.NodeValue = &quot;http:\/\/schemas.microsoft.com\/office\/2009\/07\/customui\/macro&quot; Then\r\n      ret = n.nodeName\r\n      ret = Replace(ret, &quot;xmlns:&quot;, &quot;&quot;)\r\n      Exit For\r\n    End If\r\n  Next\r\n  HasMacroNameSpace = ret\r\nEnd Function\r\n\r\nPrivate Function HasMacroButtonElement(ByVal elmScs As Object, _\r\n                                       ByVal idQValue As String) As Boolean\r\n'\u30de\u30af\u30ed\u547c\u3073\u51fa\u3057\u7528button\u8981\u7d20\u306e\u6709\u7121\u3092\u5224\u65ad\r\n  Dim ret As Boolean\r\n  Dim n As Object\r\n  \r\n  ret = False '\u521d\u671f\u5316\r\n  For Each n In elmScs.getElementsByTagName(&quot;mso:button&quot;)\r\n    If InStr(n.Attributes.getNamedItem(&quot;idQ&quot;).NodeValue, idQValue) Then\r\n      ret = True\r\n      Exit For\r\n    End If\r\n  Next\r\n  HasMacroButtonElement = ret\r\nEnd Function\r\n\r\nPrivate Function AddPathSeparator(ByVal s As String) As String\r\n  If Right(s, 1) &lt;&gt; ChrW(&amp;H5C) Then s = s &amp; ChrW(&amp;H5C)\r\n  AddPathSeparator = s\r\nEnd Function<\/pre>\n<p>\u4e0a\u8a18\u30de\u30af\u30ed\u306f\u3001Application\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e<span style=\"color: #ff0000; font-weight: bold;\">Startup<\/span>\u30a4\u30d9\u30f3\u30c8\u3092\u4f7f\u3063\u3066\u3001<\/p>\n<ol>\n<li>olkmailitem.officeUI\u30d5\u30a1\u30a4\u30eb(\u300c<a href=\"http:\/\/msdn.microsoft.com\/ja-jp\/library\/ee704589.aspx\" title=\"Office 2010 \u3067\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3057\u305f\u30ea\u30dc\u30f3\u3068\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u3092\u5c55\u958b\u3059\u308b\" target=\"_blank\">Office 2010 \u3067\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3057\u305f\u30ea\u30dc\u30f3\u3068\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u3092\u5c55\u958b\u3059\u308b<\/a>\u300d\u53c2\u7167)\u306e\u6709\u7121\u3092\u78ba\u8a8d\u3057\u3001\u30d5\u30a1\u30a4\u30eb\u304c\u7121\u3051\u308c\u3070\u52d5\u7684\u306b\u4f5c\u6210\u3059\u308b\u3002<\/li>\n<li>olkmailitem.officeUI\u30d5\u30a1\u30a4\u30eb\u304c\u5b58\u5728\u3059\u308b\u5834\u5408\u306f\u3001\u30de\u30af\u30ed\u3092\u547c\u3073\u51fa\u3059\u305f\u3081\u306e\u8981\u7d20(button)\u306e\u6709\u7121\u3092\u78ba\u8a8d\u3059\u308b\u3002<\/li>\n<li>\u30de\u30af\u30ed\u3092\u547c\u3073\u51fa\u3059\u305f\u3081\u306e\u8981\u7d20\u304c\u5b58\u5728\u3057\u306a\u3044\u5834\u5408\u306b\u306f\u3001\u52d5\u7684\u306b\u8981\u7d20\u3092\u8ffd\u52a0\u3059\u308b\u3002<\/li>\n<\/ol>\n<p>\u3068\u3044\u3046\u3088\u3046\u306a\u51e6\u7406\u3092Outlook\u8d77\u52d5\u6642\u306b\u884c\u3044\u307e\u3059\u3002<\/p>\n<p>\u5f93\u3063\u3066\u4e0a\u8a18\u30de\u30af\u30ed\u304c\u4e0a\u624b\u304f\u52d5\u4f5c\u3057\u305f\u5834\u5408\u306f\u3001\u30e1\u30fc\u30eb\u4f5c\u6210\u753b\u9762\u306e\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306b\u3001\u30de\u30af\u30ed\u3092\u547c\u3073\u51fa\u3059\u305f\u3081\u306e\u30dc\u30bf\u30f3\u304c\u81ea\u52d5\u7684\u306b\u8ffd\u52a0\u3055\u308c\u307e\u3059\u3002<\/p>\n<p><a href=\"\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Customize_OfficeUIFile_01.jpg\"><img loading=\"lazy\" decoding=\"async\" src=\"\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Customize_OfficeUIFile_01.jpg\" alt=\"Customize_OfficeUIFile_01\" width=\"499\" height=\"475\" class=\"alignnone size-full wp-image-5238\" srcset=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Customize_OfficeUIFile_01.jpg 499w, https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Customize_OfficeUIFile_01-300x286.jpg 300w\" sizes=\"auto, (max-width: 499px) 100vw, 499px\" \/><\/a><\/p>\n<p>\u52d5\u4f5c\u78ba\u8a8d\u3057\u305f\u9650\u308a\u3067\u306f\u3001\u4e00\u5fdc\u610f\u56f3\u901a\u308a\u306b\u52d5\u4f5c\u3059\u308b\u3088\u3046\u3067\u3059\u3002<br \/>\n\u305f\u3060\u3001officeUI\u30d5\u30a1\u30a4\u30eb\u306e\u52d5\u7684\u306a\u66f8\u304d\u63db\u3048\u3068\u3044\u3046\u306e\u306f\u3001\u4e0a\u8a18\u30b3\u30fc\u30c9\u306e\u901a\u308a\u7169\u96d1\u306a\u51e6\u7406\u306b\u306a\u308a\u307e\u3059\u306e\u3067\u3001\u3053\u306e\u65b9\u6cd5\u3082\u3042\u307e\u308a\u52b9\u7387\u306e\u826f\u3044\u65b9\u6cd5\u3068\u306f\u8a00\u3048\u306a\u3044\u3067\u3057\u3087\u3046\u3002<\/p>\n<p>\u3084\u306f\u308a\u3001Outlook\u306e\u30a2\u30c9\u30a4\u30f3\u3092\u4f5c\u6210\u3067\u304d\u308b\u74b0\u5883\u304c\u3042\u308b\u306e\u3067\u3042\u308c\u3070\u3001\u300c<a href=\"http:\/\/msdn.microsoft.com\/ja-jp\/library\/ff865324.aspx\" title=\"CommandBars \u306e\u4ee5\u524d\u306e\u30b3\u30fc\u30c9\u306e\u66f4\u65b0(\u6a5f\u68b0\u7ffb\u8a33)\" target=\"_blank\">CommandBars \u306e\u4ee5\u524d\u306e\u30b3\u30fc\u30c9\u306e\u66f4\u65b0<\/a>\u300d\u306b\u3042\u308b\u901a\u308a\u3001\u30a2\u30c9\u30a4\u30f3\u3092\u4f5c\u6210\u3057\u3066\u5bfe\u5fdc\u3059\u308b\u306e\u304c\u826f\u3044\u3060\u308d\u3046\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"Msdn \u30d5\u30a9\u30fc\u30e9\u30e0\u306b\u300cOutlook2010\u306eVBA\u30e1\u30cb\u30e5\u30fc\u30d0\u30fc\u8ffd\u52a0\u51e6\u7406\u306b\u95a2\u3057\u3066\u300d\u3068\u3044\u3046\u8cea\u554f\u304c\u3042\u308a\u307e\u3057\u305f\u3002 Outlook 2010\u3067\u30de\u30af\u30ed\u3092\u547c\u3073\u51fa\u3059\u305f\u3081\u306e\u30e1\u30cb\u30e5\u30fc\u3092\u30ea\u30dc\u30f3\u306b\u8ffd\u52a0\u3057\u305f\u3044\u3001\u3068\u3044\u3046\u3088\u3046\u306a\u8cea\u554f\u3067\u3059\u304c\u3001Outl [&hellip;]","protected":false},"author":1,"featured_media":7124,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"\u9014\u4e2d\u304b\u3089\u9762\u5012\u304f\u3055\u304f\u306a\u3063\u3066\u96d1\u306a\u30b3\u30fc\u30c9\u306b\u306a\u308a\u307e\u3057\u305f\u3002 [\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u8d77\u52d5\u6642\u306b\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306b\u30de\u30af\u30ed\u5b9f\u884c\u7528\u30dc\u30bf\u30f3\u3092\u52d5\u7684\u306b\u8ffd\u52a0\u3059\u308bOutlook\u30de\u30af\u30ed]","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[4,68],"tags":[],"class_list":["post-5237","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-office","category-outlook"],"aioseo_notices":[],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-Outlook.png","jetpack_shortlink":"https:\/\/wp.me\/p4UZZr-1mt","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5237","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=5237"}],"version-history":[{"count":1,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5237\/revisions"}],"predecessor-version":[{"id":5239,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5237\/revisions\/5239"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/media\/7124"}],"wp:attachment":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=5237"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=5237"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=5237"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}