{"id":10659,"date":"2018-07-24T11:40:30","date_gmt":"2018-07-24T02:40:30","guid":{"rendered":"https:\/\/www.ka-net.org\/blog\/?p=10659"},"modified":"2018-07-24T11:40:30","modified_gmt":"2018-07-24T02:40:30","slug":"%e5%9b%b3%e5%bd%a2%e3%81%ae%e6%9b%b8%e5%bc%8f%e8%a8%ad%e5%ae%9a%e3%82%a6%e3%82%a3%e3%83%b3%e3%83%89%e3%82%a6%e5%86%85%e3%81%ae%e3%82%b3%e3%83%b3%e3%83%88%e3%83%ad%e3%83%bc%e3%83%ab%e3%82%92%e3%81%99","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=10659","title":{"rendered":"\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u30a6\u30a3\u30f3\u30c9\u30a6\u5185\u306e\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u3092\u3059\u3079\u3066\u5c55\u958b\u3059\u308bPowerPoint\u30de\u30af\u30ed"},"content":{"rendered":"<p>Twitter\u306e\u30bf\u30a4\u30e0\u30e9\u30a4\u30f3\u306b\u4e0b\u8a18<a href=\"https:\/\/twitter.com\/excelspeedup\" title=\"\u306f\u3051\u305f\uff20Excel\u6700\u9ad8\u306e\u5b66\u3073\u65b9\u767a\u58f2\u4e2d(@excelspeedup)\u3055\u3093\" target=\"_blank\">\u306f\u3051\u305f(@excelspeedup)<\/a>\u6c0f\u306e\u30c4\u30a4\u30fc\u30c8\u304c\u6d41\u308c\u3066\u304d\u307e\u3057\u305f\u3002<\/p>\n<blockquote class=\"twitter-tweet\" data-lang=\"ja\">\n<p lang=\"ja\" dir=\"ltr\">\u3010\u7de9\u52df\u3011\u30d1\u30ef\u30fc\u30dd\u30a4\u30f3\u30c8\u3067\u3001\u8d77\u52d5\u76f4\u5f8c\u306b\u3001\u81ea\u52d5\u3067\u4e0b\u8a18\u3092\u958b\u3044\u305f\u72b6\u614b\u306b\u3059\u308b\u65b9\u6cd5\u306f\u306a\u3044\u3067\u3057\u3087\u3046\u304b\uff1f<\/p>\n<p>\u30fb\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u30a6\u30a3\u30f3\u30c9\u30a6<br \/>\u30fb\u305d\u306e\u4e2d\u306e\u5168\u3066\u306e\u9805\u76ee\uff08\u5857\u308a\u3064\u3076\u3057\u3068\u304b\u7dda\u3068\u304b\uff09<\/p>\n<p>\u3044\u3061\u3044\u3061\u3001\u5168\u90e8\u958b\u304f\u306e\u304c\u9762\u5012\u304f\u3055\u3044\u3067\u3059\u3002<\/p>\n<p>&mdash; \u306f\u3051\u305f\uff20Excel\u6700\u9ad8\u306e\u5b66\u3073\u65b9\u767a\u58f2\u4e2d (@excelspeedup) <a href=\"https:\/\/twitter.com\/excelspeedup\/status\/1021214714368483329?ref_src=twsrc%5Etfw\">2018\u5e747\u670823\u65e5<\/a><\/p><\/blockquote>\n<p><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script><\/p>\n<p>\u4eca\u307e\u3067\u7279\u306b\u610f\u8b58\u3057\u305f\u3053\u3068\u304c\u3042\u308a\u307e\u305b\u3093\u3067\u3057\u305f\u304c\u3001\u306a\u308b\u307b\u3069\u3001\u305f\u3057\u304b\u306b\u9762\u5012\u304f\u3055\u3044\u304b\u3082\u3057\u308c\u307e\u305b\u3093\u3002<\/p>\n<p><a href=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_01.jpg\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_01.jpg\" alt=\"\" width=\"717\" height=\"576\" class=\"alignnone size-full wp-image-10660\" srcset=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_01.jpg 717w, https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_01-300x241.jpg 300w\" sizes=\"auto, (max-width: 717px) 100vw, 717px\" \/><\/a><\/p>\n<p>\u6a19\u6e96\u6a5f\u80fd\u306b\u306f\u305d\u3046\u3044\u3063\u305f\u30aa\u30d7\u30b7\u30e7\u30f3\u304c\u7528\u610f\u3055\u308c\u3066\u3044\u306a\u3044\u3068\u601d\u3046\u306e\u3067\u3001\u3053\u3053\u306f\u30de\u30af\u30ed\u3067\u306e\u51e6\u7406\u3092\u8003\u3048\u3066\u307f\u307e\u3059\u3002\u3053\u3046\u3044\u3063\u305fUI\u5468\u308a\u306e\u64cd\u4f5c\u3067\u4f7f\u3046\u306e\u306f\u3001\u6bce\u5ea6\u304a\u306a\u3058\u307f\u300c<a href=\"https:\/\/www.ka-net.org\/blog\/?p=4628\" title=\"UI Automation\u306e\u53c2\u8003\u8cc7\u6599 | \u521d\u5fc3\u8005\u5099\u5fd8\u9332\" target=\"_blank\">UI Automation<\/a>\u300d\u3002\u7c21\u5358\u306a\u51e6\u7406\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\u306fWindows 10 Pro 64\u30d3\u30c3\u30c8\u7248\u3068Office Professional Plus 2016 32\u30d3\u30c3\u30c8\u7248\u3067\u52d5\u4f5c\u78ba\u8a8d\u3092\u884c\u3063\u3066\u3044\u307e\u3059\u3002<\/span><\/p>\n<pre class=\"brush: vb; title: ; notranslate\" title=\"\">'UIAutomationClient(UIAutomationCore.dll)\u8981\u53c2\u7167\r\nOption Explicit\r\n\r\nPrivate Sub ToggleFormatDlgItems()\r\n'\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u30a6\u30a3\u30f3\u30c9\u30a6\u5185\u306e\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u3092\u3059\u3079\u3066\u5c55\u958b\r\n  Dim uiAuto As CUIAutomation\r\n  Dim app As IUIAutomationElement\r\n  Dim customCtrl As IUIAutomationElement\r\n  Dim grpCtrl As IUIAutomationElement\r\n  Dim cndBtn As IUIAutomationCondition\r\n  Dim aryBtn As IUIAutomationElementArray\r\n  Dim elmBtn As IUIAutomationElement\r\n  Dim iptn As IUIAutomationInvokePattern\r\n  Dim d As Date, i As Long\r\n  Const CtrlID As String = &quot;PictureFormatDialog&quot;\r\n  \r\n  '\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u8868\u793a\r\n  With Application.CommandBars\r\n    If .GetEnabledMso(CtrlID) Then\r\n      .ExecuteMso CtrlID\r\n    Else\r\n      Exit Sub\r\n    End If\r\n  End With\r\n  \r\n  'PowerPoint\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u53d6\u5f97\r\n  Set uiAuto = New CUIAutomation\r\n  Set app = GetElement(uiAuto, _\r\n                       uiAuto.GetRootElement, _\r\n                       UIA_ClassNamePropertyId, _\r\n                       &quot;PPTFrameClass&quot;)\r\n  If app Is Nothing Then Exit Sub\r\n  \r\n  '\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u30ab\u30b9\u30bf\u30e0 \u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u53d6\u5f97\r\n  d = DateAdd(&quot;s&quot;, 2, Now())  '\u30eb\u30fc\u30d7\u306e\u5236\u9650\u6642\u9593:2\u79d2\r\n  Do\r\n    Set customCtrl = GetElement(uiAuto, _\r\n                                app, _\r\n                                UIA_NamePropertyId, _\r\n                                &quot;\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a&quot;, _\r\n                                UIA_CustomControlTypeId)\r\n    If Now() &gt; d Then Exit Do  '\u5236\u9650\u6642\u9593\u3092\u904e\u304e\u305f\u3089\u30eb\u30fc\u30d7\u3092\u629c\u3051\u308b\r\n    DoEvents\r\n  Loop While customCtrl Is Nothing\r\n  If customCtrl Is Nothing Then Exit Sub\r\n  \r\n  '\u30ab\u30b9\u30bf\u30e0 \u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u5185\u306e\u30b0\u30eb\u30fc\u30d7\u53d6\u5f97\r\n  Set grpCtrl = GetElement(uiAuto, _\r\n                           customCtrl, _\r\n                           UIA_ClassNamePropertyId, _\r\n                           &quot;NetUIElement&quot;, _\r\n                           UIA_GroupControlTypeId)\r\n  If grpCtrl Is Nothing Then Exit Sub\r\n  \r\n  '\u30b0\u30eb\u30fc\u30d7\u5185\u306e\u30dc\u30bf\u30f3\u53d6\u5f97\u2192\u62bc\u4e0b\r\n  Set cndBtn = uiAuto.CreatePropertyCondition( _\r\n                 UIA_ClassNamePropertyId, _\r\n                 &quot;NetUIRibbonButton&quot; _\r\n               )\r\n  Set aryBtn = grpCtrl.FindAll( _\r\n                 TreeScope_Subtree, _\r\n                 cndBtn _\r\n               )\r\n  If aryBtn.Length &lt; 1 Then Exit Sub\r\n  For i = aryBtn.Length - 1 To 0 Step -1\r\n    Set elmBtn = aryBtn.GetElement(i)\r\n    If elmBtn.GetCurrentPropertyValue(UIA_IsInvokePatternAvailablePropertyId) Then\r\n      Set iptn = elmBtn.GetCurrentPattern(UIA_InvokePatternId)\r\n      iptn.Invoke: DoEvents\r\n      SelectListItems uiAuto, customCtrl\r\n    End If\r\n  Next\r\nEnd Sub\r\n\r\nPrivate Sub SelectListItems(ByVal uiAuto As CUIAutomation, _\r\n                            ByVal elmParent As IUIAutomationElement)\r\n'\u30c7\u30fc\u30bf \u30b0\u30ea\u30c3\u30c9\u53d6\u5f97\u2192\u30b0\u30ea\u30c3\u30c9\u5185\u306e\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u9078\u629e\r\n  Dim gridCtrl As IUIAutomationElement\r\n  Dim cndListItems As IUIAutomationCondition\r\n  Dim aryListItems As IUIAutomationElementArray\r\n  Dim elmListItem As IUIAutomationElement\r\n  Dim selptn As IUIAutomationSelectionItemPattern\r\n  Dim i As Long\r\n  \r\n  Set gridCtrl = GetElement(uiAuto, _\r\n                            elmParent, _\r\n                            UIA_ClassNamePropertyId, _\r\n                            &quot;NetUIGalleryButtonGroup&quot;, _\r\n                            UIA_DataGridControlTypeId)\r\n  If gridCtrl Is Nothing Then Exit Sub\r\n  Set cndListItems = uiAuto.CreatePropertyCondition( _\r\n                       UIA_ControlTypePropertyId, _\r\n                       UIA_ListItemControlTypeId _\r\n                     )\r\n  Set aryListItems = gridCtrl.FindAll( _\r\n                       TreeScope_Subtree, _\r\n                       cndListItems _\r\n                     )\r\n  If aryListItems.Length &lt; 1 Then Exit Sub\r\n  For i = aryListItems.Length - 1 To 0 Step -1\r\n    Set elmListItem = aryListItems.GetElement(i)\r\n    If elmListItem.GetCurrentPropertyValue(UIA_IsSelectionItemPatternAvailablePropertyId) Then\r\n      Set selptn = elmListItem.GetCurrentPattern(UIA_SelectionItemPatternId)\r\n      selptn.Select: DoEvents\r\n      ToggleElements uiAuto, elmParent\r\n    End If\r\n  Next\r\nEnd Sub\r\n\r\nPrivate Sub ToggleElements(ByVal uiAuto As CUIAutomation, _\r\n                           ByVal elmParent As IUIAutomationElement)\r\n'\u30dc\u30bf\u30f3(Toggle)\u53d6\u5f97\u2192\u5c55\u958b\r\n  Dim cndTglElements As IUIAutomationCondition\r\n  Dim aryTglElements As IUIAutomationElementArray\r\n  Dim elmTgl As IUIAutomationElement\r\n  Dim tglptn As IUIAutomationTogglePattern\r\n  Dim i As Long\r\n  \r\n  Set cndTglElements = uiAuto.CreatePropertyCondition( _\r\n                         UIA_ClassNamePropertyId, _\r\n                         &quot;NetUIRibbonButton&quot; _\r\n                       )\r\n  Set aryTglElements = elmParent.FindAll( _\r\n                         TreeScope_Subtree, _\r\n                         cndTglElements _\r\n                       )\r\n  If aryTglElements.Length &lt; 1 Then Exit Sub\r\n  For i = 0 To aryTglElements.Length - 1\r\n    Set elmTgl = aryTglElements.GetElement(i)\r\n    If elmTgl.GetCurrentPropertyValue(UIA_IsTogglePatternAvailablePropertyId) Then\r\n      If elmTgl.GetCurrentPropertyValue(UIA_ToggleToggleStatePropertyId) = False Then\r\n        Set tglptn = elmTgl.GetCurrentPattern(UIA_TogglePatternId)\r\n        tglptn.Toggle\r\n      End If\r\n    End If\r\n  Next\r\nEnd Sub\r\n\r\nPrivate Function GetElement(ByVal uiAuto As CUIAutomation, _\r\n                            ByVal elmParent As IUIAutomationElement, _\r\n                            ByVal propertyId As Long, _\r\n                            ByVal propertyValue As Variant, _\r\n                            Optional ByVal ctrlType As Long = 0) As IUIAutomationElement\r\n  Dim cndFirst As IUIAutomationCondition\r\n  Dim cndSecond As IUIAutomationCondition\r\n  \r\n  Set cndFirst = uiAuto.CreatePropertyCondition( _\r\n                   propertyId, _\r\n                   propertyValue _\r\n                 )\r\n  If ctrlType &lt;&gt; 0 Then\r\n    Set cndSecond = uiAuto.CreatePropertyCondition( _\r\n                      UIA_ControlTypePropertyId, _\r\n                      ctrlType _\r\n                    )\r\n    Set cndFirst = uiAuto.CreateAndCondition( _\r\n                     cndFirst, _\r\n                     cndSecond _\r\n                   )\r\n  End If\r\n  Set GetElement = elmParent.FindFirst(TreeScope_Subtree, cndFirst)\r\nEnd Function<\/pre>\n<p>ToggleFormatDlgItems\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u30fc\u3092\u5b9f\u884c\u3059\u308b\u3068\u3001\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u30a6\u30a3\u30f3\u30c9\u30a6\u3092\u958b\u304d\u3001\u30a6\u30a3\u30f3\u30c9\u30a6\u5185\u306e\u5404\u9805\u76ee\u3092\u9806\u756a\u306b\u5c55\u958b\u3057\u3066\u3044\u304d\u307e\u3059\u3002<br \/>\n(\u4f5c\u308a\u8fbc\u3093\u3067\u306f\u3044\u306a\u3044\u305f\u3081\u3001\u9805\u76ee\u304c\u5c55\u958b\u3055\u308c\u306a\u3044\u5834\u5408\u3082\u3042\u308a\u307e\u3059\u3002)<\/p>\n<p><a href=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_02.gif\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_02.gif\" alt=\"\" width=\"713\" height=\"573\" class=\"alignnone size-full wp-image-10661\" \/><\/a><\/p>\n<p>\u4ed5\u7d44\u307f\u306f\u5358\u7d14\u3067\u3001\u30a6\u30a3\u30f3\u30c9\u30a6\u5185\u306e\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u3092\u9806\u756a\u306b\u53d6\u5f97\u3057\u3001\u30af\u30ea\u30c3\u30af(\u3068\u3044\u3046\u3088\u308a\u306f\u5404\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u306b\u9069\u3057\u305f\u64cd\u4f5c\u3092\u5b9f\u884c)\u3057\u3066\u3044\u308b\u3060\u3051\u3067\u3059\u3002<\/p>\n<p><a href=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_03.jpg\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_03.jpg\" alt=\"\" width=\"600\" height=\"294\" class=\"alignnone size-full wp-image-10662\" srcset=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_03.jpg 600w, https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems_03-300x147.jpg 300w\" sizes=\"auto, (max-width: 600px) 100vw, 600px\" \/><\/a><\/p>\n<p>\u554f\u984c\u306f\u30de\u30af\u30ed\u306e\u5b9f\u884c\u65b9\u6cd5\u3067\u3001<a href=\"https:\/\/twitter.com\/excelspeedup\" title=\"\u306f\u3051\u305f\uff20Excel\u6700\u9ad8\u306e\u5b66\u3073\u65b9\u767a\u58f2\u4e2d(@excelspeedup)\u3055\u3093\" target=\"_blank\">\u306f\u3051\u305f(@excelspeedup)<\/a>\u6c0f\u306e<a href=\"https:\/\/twitter.com\/excelspeedup\/status\/1021214714368483329\" title=\"\u306f\u3051\u305f\uff20Excel\u6700\u9ad8\u306e\u5b66\u3073\u65b9\u767a\u58f2\u4e2d(@excelspeedup)\u3055\u3093\" target=\"_blank\">\u30c4\u30a4\u30fc\u30c8<\/a>\u306b\u3042\u308b\u3088\u3046\u306b\u3001PowerPoint\u8d77\u52d5\u6642\u306b\u30de\u30af\u30ed\u3092\u5b9f\u884c\u3059\u308b\u3053\u3068\u306f\u3067\u304d\u306a\u304f\u3082\u306a\u3044\u306e\u3067\u3059\u304c\u3001\u66f8\u5f0f\u8a2d\u5b9a\u306e\u30a6\u30a3\u30f3\u30c9\u30a6\u306f\u56f3\u5f62\u9078\u629e\u6642\u3067\u306a\u3044\u3068\u8868\u793a\u3067\u304d\u306a\u3044\u305f\u3081\u3001\u4e0b\u8a18\u8a18\u4e8b\u306e\u3088\u3046\u306a\u65b9\u6cd5\u3067\u3001\u30af\u30a4\u30c3\u30af\u30a2\u30af\u30bb\u30b9\u30c4\u30fc\u30eb\u30d0\u30fc\u304b\u3089\u597d\u304d\u306a\u30bf\u30a4\u30df\u30f3\u30b0\u3067\u5b9f\u884c\u3067\u304d\u308b\u3088\u3046\u306b\u3057\u305f\u65b9\u304c\u4f7f\u3044\u3084\u3059\u3044\u306e\u3067\u306f\u306a\u3044\u304b\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n<div class=\"cardlink\"><a href=\"https:\/\/www.ka-net.org\/blog\/?p=10464\"><div class=\"cardlink_thumbnail\"><img src='https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-Ribbon-120x120.png' alt='[\u30ea\u30dc\u30f3\u30fb\u30ab\u30b9\u30bf\u30de\u30a4\u30ba]\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306b\u72ec\u81ea\u30dc\u30bf\u30f3\u3092\u8ffd\u52a0\u3057\u3066\u30a2\u30c9\u30a4\u30f3\u5316\u3059\u308b\u65b9\u6cd5' width=120 height=120 \/><\/a><\/div><div class=\"cardlink_content\"><span class=\"timestamp\">2018.06.04<\/span><div class=\"cardlink_title\"><a href=\"https:\/\/www.ka-net.org\/blog\/?p=10464\">[\u30ea\u30dc\u30f3\u30fb\u30ab\u30b9\u30bf\u30de\u30a4\u30ba]\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306b\u72ec\u81ea\u30dc\u30bf\u30f3\u3092\u8ffd\u52a0\u3057\u3066\u30a2\u30c9\u30a4\u30f3\u5316\u3059\u308b\u65b9\u6cd5 <\/a><\/div><div class=\"cardlink_excerpt\">\u300c\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306b\u72ec\u81ea\u30de\u30af\u30ed(\u81ea\u4f5c\u30dc\u30bf\u30f3)\u3092\u8ffd\u52a0\u3057\u3066\u3001\u30a2\u30c9\u30a4\u30f3\u3068\u3057\u3066\u767b\u9332\u3057\u305f\u3044\u300d\u3068\u3044\u3046\u8cea\u554f\u3092\u3044\u305f\u3060\u304d\u307e\u3057\u305f\u3002\r\n\r\n\u3053\u308c\u307e\u3067\u3001\u30af\u30a4\u30c3\u30af \u30a2\u30af\u30bb\u30b9 \u30c4\u30fc\u30eb \u30d0\u30fc\u306b\u72ec\u81ea\u30de\u30af\u30ed\u3092\u8ffd\u52a0\u3059\u308b\u65b9\u6cd5\u306b\u95a2\u3057\u3066\u306f\u3001\u3044\u304f\u3064\u304b\u8a18\u4e8b\u3092\u66f8\u3044\u3066\u304d\u307e\u3057\u305f\u304c(\u4e0b\u8a18\u53c2\u7167)\u3001\u826f...<\/div><\/div><div class=\"cardlink_footer\"><\/div><\/div>\n<div class=\"cardlink\"><a href=\"https:\/\/www.ka-net.org\/blog\/?p=1636\"><div class=\"cardlink_thumbnail\"><img src='https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-Ribbon-120x120.png' alt='\u30af\u30a4\u30c3\u30af\u30a2\u30af\u30bb\u30b9\u30c4\u30fc\u30eb\u30d0\u30fc\u304b\u3089PowerPoint\u30de\u30af\u30ed\u3092\u5b9f\u884c\u3059\u308b\u30a2\u30c9\u30a4\u30f3\u306e\u7d39\u4ecb' width=120 height=120 \/><\/a><\/div><div class=\"cardlink_content\"><span class=\"timestamp\">2012.04.20<\/span><div class=\"cardlink_title\"><a href=\"https:\/\/www.ka-net.org\/blog\/?p=1636\">\u30af\u30a4\u30c3\u30af\u30a2\u30af\u30bb\u30b9\u30c4\u30fc\u30eb\u30d0\u30fc\u304b\u3089PowerPoint\u30de\u30af\u30ed\u3092\u5b9f\u884c\u3059\u308b\u30a2\u30c9\u30a4\u30f3\u306e\u7d39\u4ecb <\/a><\/div><div class=\"cardlink_excerpt\">\u5148\u65e5\u66f8\u3044\u305f\u300c[Mayhem]PowerPoint\u30de\u30af\u30ed\u306b\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc\u3092\u5272\u308a\u5f53\u3066\u308b\u3002\u300d\u3068\u3044\u3046\u8a18\u4e8b\u306b\u95a2\u9023\u3057\u3066\u3001Excel MVP\u306e\u4f0a\u85e4\u3055\u3093\u304c\u65b0\u3057\u304f\u30de\u30af\u30ed\u3092\u516c\u958b\u3055\u308c\u307e\u3057\u305f\u3002\r\n\r\n\"\u30de\u30af\u30ed\u3092\u5b9f\u884c\u3059\u308b\u30c0\u30a4\u30a2\u30ed\u30b0\"\u3067\u7d39\u4ecb\u3057\u3066\u3044\u308b\u30de\u30af\u30ed\u304c\u305d\u308c\u3067\u3001\u30e6\u30fc\u30b6\u30fc\u30d5\u30a9\u30fc\u30e0\u304b\u3089...<\/div><\/div><div class=\"cardlink_footer\"><\/div><\/div>\n<p>\u3068\u308a\u3042\u3048\u305a\u3001\u79c1\u306e\u65b9\u3067\u30af\u30a4\u30c3\u30af\u30a2\u30af\u30bb\u30b9\u30c4\u30fc\u30eb\u30d0\u30fc\u304b\u3089\u30de\u30af\u30ed\u3092\u5b9f\u884c\u3067\u304d\u308b\u3088\u3046\u306b\u3057\u305f\u30a2\u30c9\u30a4\u30f3\u30d5\u30a1\u30a4\u30eb\u3092\u4f5c\u6210\u3057\u307e\u3057\u305f\u306e\u3067\u3001\u8208\u5473\u304c\u3042\u308b\u65b9\u306f<a href=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/ToggleFormatDlgItems.zip\" title=\"\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u9805\u76ee\u5c55\u958bPowerPoint\u30a2\u30c9\u30a4\u30f3\" target=\"_blank\">\u3053\u3061\u3089<\/a>\u304b\u3089\u30c0\u30a6\u30f3\u30ed\u30fc\u30c9\u3057\u3066\u304a\u4f7f\u3044\u304f\u3060\u3055\u3044\u3002<\/p>\n<div id=\"single_banner_area2\" class=\"clearfix one_banner\">\n<div class=\"single_banner single_banner_left\">\n<script async src=\"https:\/\/pagead2.googlesyndication.com\/pagead\/js\/adsbygoogle.js\"><\/script>\r\n<!-- \u8a18\u4e8b\u4e2d(\u30c7\u30a3\u30b9\u30d7\u30ec\u30a4\u5e83\u544a\u30e6\u30cb\u30c3\u30c8) -->\r\n<ins class=\"adsbygoogle\"\r\n     style=\"display:block\"\r\n     data-ad-client=\"ca-pub-7306936664602087\"\r\n     data-ad-slot=\"5429724765\"\r\n     data-ad-format=\"auto\"\r\n     data-full-width-responsive=\"true\"><\/ins>\r\n<script>\r\n     (adsbygoogle = window.adsbygoogle || []).push({});\r\n<\/script>\n<\/div>\n<div class=\"single_banner single_banner_right\">\n<a href=\"\" target=\"_blank\"><img decoding=\"async\" src=\"\" alt=\"\" title=\"\" \/><\/a>\n<\/div>\n<\/div>\n\n","protected":false},"excerpt":{"rendered":"Twitter\u306e\u30bf\u30a4\u30e0\u30e9\u30a4\u30f3\u306b\u4e0b\u8a18\u306f\u3051\u305f(@excelspeedup)\u6c0f\u306e\u30c4\u30a4\u30fc\u30c8\u304c\u6d41\u308c\u3066\u304d\u307e\u3057\u305f\u3002 \u3010\u7de9\u52df\u3011\u30d1\u30ef\u30fc\u30dd\u30a4\u30f3\u30c8\u3067\u3001\u8d77\u52d5\u76f4\u5f8c\u306b\u3001\u81ea\u52d5\u3067\u4e0b\u8a18\u3092\u958b\u3044\u305f\u72b6\u614b\u306b\u3059\u308b\u65b9\u6cd5\u306f\u306a\u3044\u3067\u3057\u3087\u3046\u304b\uff1f \u30fb\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u30a6\u30a3\u30f3\u30c9\u30a6\u30fb [&hellip;]","protected":false},"author":1,"featured_media":7126,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"[\u56f3\u5f62\u306e\u66f8\u5f0f\u8a2d\u5b9a\u30a6\u30a3\u30f3\u30c9\u30a6\u5185\u306e\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u3092\u3059\u3079\u3066\u5c55\u958b\u3059\u308bPowerPoint\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,58],"tags":[],"class_list":["post-10659","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-office","category-powerpoint"],"aioseo_notices":[],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-PowerPointVBA.png","jetpack_shortlink":"https:\/\/wp.me\/p4UZZr-2LV","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/10659","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=10659"}],"version-history":[{"count":2,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/10659\/revisions"}],"predecessor-version":[{"id":10665,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/10659\/revisions\/10665"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/media\/7126"}],"wp:attachment":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=10659"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=10659"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=10659"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}