{"id":6531,"date":"2016-01-08T10:21:23","date_gmt":"2016-01-08T01:21:23","guid":{"rendered":"http:\/\/www.ka-net.org\/blog\/?p=6531"},"modified":"2017-01-08T12:52:51","modified_gmt":"2017-01-08T03:52:51","slug":"sendkeys%e3%81%a7windows%e3%82%ad%e3%83%bc%e3%82%92%e9%80%81%e4%bf%a1%e3%81%99%e3%82%8bvba%e3%83%9e%e3%82%af%e3%83%ad","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=6531","title":{"rendered":"SendKeys\u3067Windows\u30ad\u30fc\u3092\u9001\u4fe1\u3059\u308bVBA\u30de\u30af\u30ed"},"content":{"rendered":"<p>\u300c<span style=\"color: #ff0000; font-weight: bold;\">VBA SendKeys Windows\u30ad\u30fc<\/span>\u300d\u3068\u3044\u3063\u305f\u30ad\u30fc\u30ef\u30fc\u30c9\u691c\u7d22\u3067\u306e\u30a2\u30af\u30bb\u30b9\u304c\u3042\u308a\u307e\u3057\u305f\u3002<\/p>\n<p>\u305f\u3057\u304b\u306b\u300cSendKeys &#8220;{WIN}&#8221;\u300d\u3084\u300cSendKeys &#8220;{LWIN}&#8221;\u300d\u3068\u3044\u3063\u305f\u30b3\u30fc\u30c9\u3092\u5b9f\u884c\u3057\u3066\u3082\u30a8\u30e9\u30fc\u306b\u306a\u308b\u3060\u3051\u306a\u306e\u3067\u3001Windows\u30ad\u30fc\u3092\u9001\u4fe1\u3057\u305f\u3044\u3068\u304d\u306f\u3069\u3046\u3059\u308c\u3070\u826f\u3044\u306e\u304b\u60a9\u3093\u3067\u3057\u307e\u3046\u304b\u3082\u3057\u308c\u307e\u305b\u3093\u304c\u3001<a href=\"https:\/\/en.wikipedia.org\/wiki\/Table_of_keyboard_shortcuts\" title=\"Table of keyboard shortcuts - Wikipedia, the free encyclopedia\" target=\"_blank\">Wikipedia<\/a>\u306b\u3082\u66f8\u304b\u308c\u3066\u3044\u308b\u3088\u3046\u306b\u3001\u300c<span style=\"color: #ff0000; font-weight: bold;\">Ctrl + Esc<\/span>\u300d\u30ad\u30fc\u3092\u62bc\u3059\u3053\u3068\u3067\u3082Windows\u30ad\u30fc\u3092\u62bc\u3057\u305f\u3068\u304d\u3068\u540c\u69d8\u306b\u30b9\u30bf\u30fc\u30c8\u30e1\u30cb\u30e5\u30fc\u3092\u8868\u793a\u3055\u305b\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002<\/p>\n<pre class=\"brush: vb; title: ; notranslate\" title=\"\">Public Sub Sample()\r\n  SendKeys &quot;^{ESC}&quot; 'Ctrl + Esc\u30ad\u30fc\r\nEnd Sub<\/pre>\n<p>\u3057\u304b\u3057\u3001Windows\u30ad\u30fc\u3092\u7d44\u307f\u5408\u308f\u305b\u305f\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc\u3001\u305f\u3068\u3048\u3070\u300cWindows + M\u300d\u30ad\u30fc\u3092\u62bc\u3057\u305f\u3044\u5834\u5408\u3001\u300cSendKeys &#8220;^{ESC}M&#8221;\u300d\u3092\u5b9f\u884c\u3057\u3066\u3082\u4e0a\u624b\u304f\u3044\u304d\u307e\u305b\u3093\u3002<\/p>\n<p>\u305d\u3046\u3044\u3063\u305f\u5834\u5408\u306f\u4e0b\u8a18\u306e\u3088\u3046\u306b<a href=\"https:\/\/msdn.microsoft.com\/ja-jp\/library\/cc364822.aspx\" title=\"keybd_event \u95a2\u6570\" target=\"_blank\">keybd_event\u95a2\u6570<\/a>\u3092\u4f7f\u3046\u3053\u3068\u3067\u51e6\u7406\u3092\u5b9f\u884c\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059(\u4e0b\u8a18\u30b3\u30fc\u30c9\u306f32\u30d3\u30c3\u30c8\u74b0\u5883\u5411\u3051\u3067\u3059)\u3002<\/p>\n<pre class=\"brush: vb; title: ; notranslate\" title=\"\">Private Declare Sub keybd_event Lib &quot;user32.dll&quot; ( _\r\n  ByVal bVk As Byte, _\r\n  ByVal bScan As Byte, _\r\n  ByVal dwFlags As Long, _\r\n  ByVal dwExtraInfo As Long)\r\n\r\nPrivate Const KEYEVENTF_KEYUP = &amp;H2\r\nPrivate Const VK_LWIN = &amp;H5B\r\n\r\nPublic Sub Sample2()\r\n  keybd_event VK_LWIN, 0, 0, 0\r\n  keybd_event vbKeyM, 0, 0, 0\r\n  keybd_event VK_LWIN, 0, KEYEVENTF_KEYUP, 0\r\n  keybd_event vbKeyM, 0, KEYEVENTF_KEYUP, 0\r\nEnd Sub<\/pre>\n<p>\u305f\u3060\u3001\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u6700\u5c0f\u5316\u3092\u3057\u305f\u3044\u3060\u3051\u306a\u3089\u3001Shell\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e<a href=\"https:\/\/msdn.microsoft.com\/ja-jp\/library\/bb774083.aspx\" title=\"Shell.MinimizeAll method (Windows)\" target=\"_blank\">MinimizeAll<\/a>\u3092\u4f7f\u3063\u305f\u65b9\u304c\u7c21\u5358\u3067\u78ba\u5b9f\u3067\u3059\u3002<\/p>\n<pre class=\"brush: vb; title: ; notranslate\" title=\"\">Public Sub Sample3()\r\n  CreateObject(&quot;Shell.Application&quot;).MinimizeAll\r\nEnd Sub<\/pre>\n<p>SendKeys\u3067Windows\u30ad\u30fc\u3092\u9001\u4fe1\u3057\u3066\u4f55\u304b\u3092\u5b9f\u884c\u3057\u305f\u3044\u3068\u304d\u306f\u3001\u307e\u305a\u306f\u4e0a\u8a18\u306e\u3088\u3046\u306a\u5225\u306e\u65b9\u6cd5\u3092\u63a2\u3057\u3066\u307f\u308b\u3053\u3068\u3092\u304a\u85a6\u3081\u3057\u307e\u3059\u3002<\/p>\n<hr \/>\n<p><span style=\"color: #ff0000; font-weight: bold;\">2017\/1\/8 \u8ffd\u8a18\uff1a<\/span><br \/>\nWindows 10\u3067\u30b9\u30b1\u30c3\u30c1\u30d1\u30c3\u30c9\u3092\u8d77\u52d5\u3059\u308b\u5834\u5408\u306f\u3001\u4e0b\u8a18\u8a18\u4e8b\u3092\u3054\u53c2\u7167\u304f\u3060\u3055\u3044\u3002<br \/>\n(<a href=\"http:\/\/detail.chiebukuro.yahoo.co.jp\/qa\/question_detail\/q10168521005\" title=\"VBScript - \u300cWindows\u30dc\u30bf\u30f3 + W\u300d\u3092Sendkey\u3057\u305f\u3044\u3002 - \u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8... - Yahoo!\u77e5\u6075\u888b\" target=\"_blank\">VBScript &#8211; \u300cWindows\u30dc\u30bf\u30f3 + W\u300d\u3092Sendkey\u3057\u305f\u3044\u3002<\/a>)<\/p>\n<div class=\"cardlink\"><a href=\"https:\/\/www.ka-net.org\/blog\/?p=7802\"><div class=\"cardlink_thumbnail\"><img src='https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-Windows-120x120.png' alt='[Windows 10]\u30b9\u30b1\u30c3\u30c1\u30d1\u30c3\u30c9\u3092\u8d77\u52d5\u3059\u308b\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8' width=120 height=120 \/><\/a><\/div><div class=\"cardlink_content\"><span class=\"timestamp\">2017.01.06<\/span><div class=\"cardlink_title\"><a href=\"https:\/\/www.ka-net.org\/blog\/?p=7802\">[Windows 10]\u30b9\u30b1\u30c3\u30c1\u30d1\u30c3\u30c9\u3092\u8d77\u52d5\u3059\u308b\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8 <\/a><\/div><div class=\"cardlink_excerpt\">Yahoo!\u77e5\u6075\u888b\u306b\u300cVBScript - \u300cWindows\u30dc\u30bf\u30f3 + W\u300d\u3092Sendkey\u3057\u305f\u3044\u300d\u3068\u3044\u3063\u305f\u8cea\u554f\u304c\u3042\u308a\u307e\u3057\u305f\u3002\r\n\r\nVBScript\u304b\u3089\u3001\u30b9\u30b1\u30c3\u30c1\u30d1\u30c3\u30c9\u3092\u8d77\u52d5\u3059\u308b\u305f\u3081\u306e\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc(Win + W \u2192 Tab \u2192 Enter)\u3092\u9001\u4fe1\u3057\u305f...<\/div><\/div><div class=\"cardlink_footer\"><\/div><\/div>\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":"\u300cVBA SendKeys Windows\u30ad\u30fc\u300d\u3068\u3044\u3063\u305f\u30ad\u30fc\u30ef\u30fc\u30c9\u691c\u7d22\u3067\u306e\u30a2\u30af\u30bb\u30b9\u304c\u3042\u308a\u307e\u3057\u305f\u3002 \u305f\u3057\u304b\u306b\u300cSendKeys &#8220;{WIN}&#8221;\u300d\u3084\u300cSendKeys &#8220;{LWIN}&#038;#8 [&hellip;]","protected":false},"author":1,"featured_media":7111,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"SendKeys\u3092\u4f7f\u3046\u524d\u306b\u3001\u307e\u305a\u306f\u4ed6\u306e\u65b9\u6cd5\u3092\u63a2\u3057\u3066\u307f\u3088\u3046\uff01 [SendKeys\u3067Windows\u30ad\u30fc\u3092\u9001\u4fe1\u3059\u308bVBA\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":[48,4,49,58],"tags":[],"class_list":["post-6531","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-excel-office","category-office","category-word-office","category-powerpoint"],"aioseo_notices":[],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-Excel.png","jetpack_shortlink":"https:\/\/wp.me\/p4UZZr-1Hl","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/6531","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=6531"}],"version-history":[{"count":4,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/6531\/revisions"}],"predecessor-version":[{"id":7822,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/6531\/revisions\/7822"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/media\/7111"}],"wp:attachment":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=6531"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=6531"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=6531"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}