{"id":12938,"date":"2020-07-14T12:00:38","date_gmt":"2020-07-14T03:00:38","guid":{"rendered":"https:\/\/www.ka-net.org\/blog\/?p=12938"},"modified":"2020-09-03T16:08:44","modified_gmt":"2020-09-03T07:08:44","slug":"%e8%a1%a8%e7%a4%ba%e3%83%a2%e3%83%bc%e3%83%89%e3%82%92%e5%a4%89%e6%9b%b4%e3%81%99%e3%82%8bpowerpoint%e3%83%9e%e3%82%af%e3%83%ad","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=12938","title":{"rendered":"\u8868\u793a\u30e2\u30fc\u30c9\u3092\u5909\u66f4\u3059\u308bPowerPoint\u30de\u30af\u30ed"},"content":{"rendered":"

PowerPoint\u306b\u306f\u69d8\u3005\u306a\u8868\u793a\u30e2\u30fc\u30c9<\/a>\u304c\u3042\u308a\u307e\u3059\u304c\u3001\u79c1\u306e\u304a\u6c17\u306b\u5165\u308a\u306f\u300c\u30b9\u30e9\u30a4\u30c9<\/span>\u300d\u8868\u793a\u2193\u3067\u3059\u3002<\/p>\n

\"\"<\/a><\/p>\n

\u30a2\u30af\u30c6\u30a3\u30d6\u306a\u30b9\u30e9\u30a4\u30c9\u4ee5\u5916\u8868\u793a\u3055\u308c\u306a\u3044\u306e\u3067\u3001\u767b\u58c7\u3059\u308b\u969b\u3082\u30cd\u30bf\u30d0\u30ec\u3092\u9632\u3050\u3053\u3068\u304c\u3067\u304d\u307e\u3059(\u7b11)<\/p>\n

\u30ea\u30dc\u30f3\u3084\u30e1\u30cb\u30e5\u30fc\u304b\u3089\u3053\u306e\u300c\u30b9\u30e9\u30a4\u30c9\u300d\u8868\u793a\u306b\u5207\u308a\u66ff\u3048\u308b\u65b9\u6cd5\u304c\u5206\u304b\u3089\u305a\u3001\u5927\u4f53\u3044\u3064\u3082\u30a4\u30df\u30c7\u30a3\u30a8\u30a4\u30c8\u30a6\u30a3\u30f3\u30c9\u30a6\u3067\u4e0b\u8a18\u30b3\u30fc\u30c9\u3092\u5b9f\u884c\u3057\u3066\u5207\u308a\u66ff\u3048\u3066\u3044\u305f\u306e\u3067\u3059\u304c\u3001\u6bce\u56de\u3053\u308c\u3092\u3084\u308b\u306e\u3082\u624b\u9593\u304c\u639b\u304b\u308b\u306e\u3067\u3001\u30dc\u30bf\u30f3\u4e00\u3064\u3067\u8868\u793a\u30e2\u30fc\u30c9\u3092\u5207\u308a\u66ff\u3048\u308b\u305f\u3081\u306e\u30a2\u30c9\u30a4\u30f3\u3092\u4f5c\u308b\u3053\u3068\u306b\u3057\u307e\u3057\u305f\u3002<\/p>\n

Application.ActiveWindow.ViewType = ppViewSlide<\/pre>\n
VBA\u30b3\u30fc\u30c9<\/h4>\n
DocumentWindow<\/a>\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306eViewType<\/a>\u30d7\u30ed\u30d1\u30c6\u30a3\u3092\u8a2d\u5b9a\u3059\u308b\u3060\u3051\u306e\u7c21\u5358\u306a\u30b3\u30fc\u30c9\u3067\u3059\u3002<\/p>\n
Option Explicit\r\n\r\nPublic Sub btnChangeWindowViewType_onAction(control As IRibbonControl)\r\n  ChangeWindowViewType\r\nEnd Sub\r\n\r\nPrivate Sub ChangeWindowViewType()\r\n  Static vt As Integer\r\n  \r\n  If vt >= 12 Then vt = 0\r\n  vt = vt + 1\r\n  On Error Resume Next\r\n  Application.ActiveWindow.ViewType = vt\r\nEnd Sub<\/pre>\n
\"\"<\/div>
docs.microsoft.com<\/div><\/div>
\"\"<\/figure>
\u30da\u30a4\u30f3\u3068\u30d3\u30e5\u30fc\u3092\u64cd\u4f5c\u3059\u308b<\/div>
https:\/\/docs.microsoft.com\/ja-jp\/office\/vba\/powerpoint\/how-to\/work-with-panes-and-views?WT.mc_id=M365-MVP-4029057<\/div><\/div>
<\/div><\/div><\/a><\/div><\/div>\n
\"\"<\/div>
docs.microsoft.com<\/div><\/div>
\"\"<\/figure>
PpViewType \u5217\u6319 (PowerPoint)<\/div>
https:\/\/docs.microsoft.com\/ja-jp\/office\/vba\/api\/powerpoint.ppviewtype?WT.mc_id=M365-MVP-4029057<\/div><\/div>
<\/div><\/div><\/a><\/div><\/div>\n
\u30ea\u30dc\u30f3XML<\/h4>\n
<?xml version="1.0" encoding="utf-8"?>\r\n<customUI xmlns="http:\/\/schemas.microsoft.com\/office\/2006\/01\/customui">\r\n  <ribbon>\r\n    <tabs>\r\n      <tab id="tabChangeWindowViewType" label="Change Window ViewType Tab" visible="false">\r\n        <group id="grpChangeWindowViewType" label="Change Window ViewType Group">\r\n          <button id="btnChangeWindowViewType" label="Change Window ViewType" imageMso="SlideReset" screentip="Change Window ViewType" supertip="\u30a2\u30af\u30c6\u30a3\u30d6\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u8868\u793a\u30e2\u30fc\u30c9\u3092\u5909\u66f4\u3057\u307e\u3059\u3002" onAction="btnChangeWindowViewType_onAction" \/>\r\n        <\/group>\r\n      <\/tab>\r\n    <\/tabs>\r\n  <\/ribbon>\r\n<\/customUI><\/pre>\n
\n
\n