{"id":4156,"date":"2017-05-23T06:00:00","date_gmt":"2017-05-22T21:00:00","guid":{"rendered":"http:\/\/www.tokyostyling.com\/pc\/?p=4156"},"modified":"2017-05-22T23:10:21","modified_gmt":"2017-05-22T14:10:21","slug":"post-4156","status":"publish","type":"post","link":"http:\/\/www.tokyostyling.com\/pc\/archives\/4156","title":{"rendered":"\u3053\u308c\u3082\u4fbf\u5229\uff01\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u8fd4\u4fe1\u30e1\u30fc\u30eb\u3092\u30de\u30af\u30ed\uff08VBA\uff09\u3067\u4f5c\u6210\u3059\u308b\u306e\u5dfb"},"content":{"rendered":"<p><a href=\"http:\/\/www.tokyostyling.com\/pc\/?attachment_id=4157\"><img loading=\"lazy\" decoding=\"async\" data-attachment-id=\"4157\" data-permalink=\"http:\/\/www.tokyostyling.com\/pc\/archives\/4156\/computer_mail\" data-orig-file=\"http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail.png\" data-orig-size=\"400,398\" data-comments-opened=\"1\" data-image-meta=\"{&quot;aperture&quot;:&quot;0&quot;,&quot;credit&quot;:&quot;&quot;,&quot;camera&quot;:&quot;&quot;,&quot;caption&quot;:&quot;&quot;,&quot;created_timestamp&quot;:&quot;0&quot;,&quot;copyright&quot;:&quot;&quot;,&quot;focal_length&quot;:&quot;0&quot;,&quot;iso&quot;:&quot;0&quot;,&quot;shutter_speed&quot;:&quot;0&quot;,&quot;title&quot;:&quot;&quot;,&quot;orientation&quot;:&quot;0&quot;}\" data-image-title=\"computer_mail\" data-image-description=\"\" data-image-caption=\"\" data-medium-file=\"http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail.png\" data-large-file=\"http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail.png\" src=\"http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail.png\" alt=\"computer_mail\" width=\"400\" height=\"398\" class=\"alignnone size-full wp-image-4157\" srcset=\"http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail.png 400w, http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail-150x150.png 150w, http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail-100x100.png 100w, http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail-110x110.png 110w\" sizes=\"auto, (max-width: 400px) 100vw, 400px\" \/><\/a><\/p>\n<h2>\u306f\u3058\u3081\u306b<\/h2>\n<p>VBA\u3067\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u306e\u8fd4\u4fe1\u30e1\u30fc\u30eb\u3092\u4f5c\u6210\u3057\u3088\u3046\u3068\u3057\u305f\u3068\u3053\u308d\u3001\u4e00\u767a\u3067\u306f\u4f5c\u308c\u307e\u305b\u3093\u3067\u3057\u305f<br \/>\n\u3060\u3082\u3093\u3067\u3001\u81ea\u5206\u3067\u4f5c\u3063\u3066\u3057\u307e\u3044\u307e\u3057\u3087\u3046<\/p>\n<h2>\u5185\u5bb9<\/h2>\n<p>\u6700\u521d\u306b\u53c2\u8003\u306b\u3057\u305f\u30b5\u30a4\u30c8\u306f\u3053\u3061\u3089<\/p>\n<p><iframe style=\"width:100%;height:155px;max-width:100%;margin:0 0 1.7rem;display:block;\"title=\"\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u3064\u3051\u3066\u5168\u54e1\u306b\u8fd4\u4fe1\u3059\u308b\u30de\u30af\u30ed | Outlook \u7814\u7a76\u6240\"src=\"http:\/\/hatenablog.com\/embed?url=https:\/\/outlooklab.wordpress.com\/2015\/04\/04\/%E6%B7%BB%E4%BB%98%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E3%81%A4%E3%81%91%E3%81%A6%E5%85%A8%E5%93%A1%E3%81%AB%E8%BF%94%E4%BF%A1%E3%81%99%E3%82%8B%E3%83%9E%E3%82%AF%E3%83%AD\/\"width=\"300\"height=\"150\"frameborder=\"0\"scrolling=\"no\"><\/iframe><\/p>\n<p>\u6b8b\u5ff5\u306a\u304c\u3089OUTLOOK2013\u3067\u306f\u52d5\u4f5c\u3057\u307e\u305b\u3093\u3067\u3057\u305f<br \/>\n\u3046\uff5e\u3093<br \/>\n\u3067\u3082\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u898b\u308b\u3068\u3084\u308a\u65b9\u304c\u5224\u3063\u305f\u306e\u3067\u4f5c\u6210\u3067\u3059<\/p>\n<p>\u5b9f\u73fe\u65b9\u6cd5\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059<\/p>\n<ul>\n<li>\u8fd4\u4fe1\u30e1\u30fc\u30eb\u3001\u8ee2\u9001\u30e1\u30fc\u30eb\u3092\u4f5c\u6210<\/li>\n<li>\u8fd4\u4fe1\u30e1\u30fc\u30eb\u306b\u306f\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u304c\u306a\u304f\u3001\u8ee2\u9001\u30e1\u30fc\u30eb\u306b\u306f\u5b9b\u5148\u3001\u4ef6\u540d\u304c\u306a\u3044\u72b6\u614b<\/li>\n<li>\u306a\u306e\u3067\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u304c\u4ed8\u3044\u305f\u8ee2\u9001\u30e1\u30fc\u30eb\u306b\u8fd4\u4fe1\u30e1\u30fc\u30eb\u306e\u5b9b\u5148\u3001\u4ef6\u540d\u3092\u30b3\u30d4\u30fc\u3059\u308c\u3070\u3001\u554f\u984c\u89e3\u6c7a\uff57<\/li>\n<\/ul>\n<p>\u3082\u3068\u3082\u3068\u3001VBA\u3067\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u8fd4\u4fe1\u30e1\u30fc\u30eb\u306f\u30b5\u30dd\u30fc\u30c8\u3055\u308c\u3066\u3044\u307e\u305b\u3093<br \/>\n\u8fd4\u4fe1\u30e1\u30fc\u30eb\u3001\u8ee2\u9001\u30e1\u30fc\u30eb\u3092\u7d44\u5408\u308f\u305b\u308b\u3068\u7c21\u5358\u306b\u3067\u304d\u307e\u3059<br \/>\n\u30a2\u30eb\u30b4\u30ea\u30ba\u30e0\u306f\u7c21\u5358\u3067\u3059\u306d\uff57<\/p>\n<h2>\u4ed5\u69d8<\/h2>\n<p>\u5185\u5bb9\uff1a<br \/>\n\u3000\u30ab\u30fc\u30bd\u30eb\u306b\u3042\u308b\u30e1\u30fc\u30eb\u3092\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u3067\u8fd4\u4fe1\u30e1\u30fc\u30eb\u3068\u3057\u3066\u4f5c\u6210<\/p>\n<p>\u52d5\u4f5c\u78ba\u8a8d\uff1a<br \/>\n\u3000Outlook2013<br \/>\n\u3000Windows7<\/p>\n<h2>\u30bd\u30fc\u30b9<\/h2>\n<pre class=\"brush: vb; title: ; notranslate\" title=\"\">\r\nPublic Sub \u30ea\u30d7\u30e9\u30a4()\r\n\r\n '\u5185\u5bb9\uff1a\r\n '\u3000\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u30ea\u30d7\u30e9\u30a4\u30e1\u30fc\u30eb\u306e\u4f5c\u6210\r\n '\u30d7\u30ed\u30b0\u30e9\u30e0\uff1a\r\n '\u3000\u5143\u30e1\u30fc\u30eb\u304b\u3089\u8ee2\u9001\u30e1\u30fc\u30eb\u3068\u8fd4\u4fe1\u30e1\u30fc\u30eb\u3092\u4f5c\u6210\r\n '\u3000\u8ee2\u9001\u30e1\u30fc\u30eb\u306b\u8fd4\u4fe1\u30e1\u30fc\u30eb\u306e\u5b9b\u5148\u3068\u4ef6\u540d\u3092\u30b3\u30d4\u30fc\u3057\u3066\u51fa\u6765\u4e0a\u304c\u308a\r\n\r\n '\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u4f5c\u6210\r\n Dim objMail As Outlook.MailItem\r\n Dim objReply As Outlook.MailItem\r\n Dim objForward As Outlook.MailItem\r\n \r\n '\u30ea\u30d7\u30e9\u30a4\u30e1\u30fc\u30eb\u78ba\u5b9a\r\n If TypeName(Application.ActiveWindow) = &quot;Inspector&quot; Then\r\n  Set objMail = ActiveInspector.CurrentItem\r\n Else\r\n  Set objMail = ActiveExplorer.Selection(1)\r\n End If\r\n \r\n '\u8fd4\u4fe1\u5185\u5bb9\u30b3\u30d4\u30fc\r\n Set objReply = objMail.ReplyAll\r\n Set objForward = objMail.Forward\r\n \r\n '\u5b9b\u5148\u3001\u4ef6\u540d\u30b3\u30d4\u30fc\r\n objForward.Subject = objReply.Subject\r\n objForward.To = objReply.To\r\n objForward.CC = objReply.CC\r\n \r\n '\u8868\u793a\r\n objForward.Display\r\n objReply.Close olDiscard\r\n \r\nEnd Sub\r\n<\/pre>\n<h2>\u307e\u3068\u3081<\/h2>\n<p>\u3084\u308a\u65b9\u306f\u5224\u3063\u3066\u3057\u307e\u3048\u3070\u7c21\u5358\u3067\u3059<br \/>\nMS\u306f\u3001\u306a\u305c\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u8fd4\u4fe1\u30e1\u30fc\u30eb\u3092VBA\u3067\u30b5\u30dd\u30fc\u30c8\u3057\u306a\u3044\u3093\u3067\u3057\u3087\u3046\u306d<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u306f\u3058\u3081\u306b VBA\u3067\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u306e\u8fd4\u4fe1\u30e1\u30fc\u30eb\u3092\u4f5c\u6210\u3057\u3088\u3046\u3068\u3057\u305f\u3068\u3053\u308d\u3001\u4e00\u767a\u3067\u306f\u4f5c\u308c\u307e\u305b\u3093\u3067\u3057\u305f \u3060\u3082\u3093\u3067\u3001\u81ea\u5206\u3067\u4f5c\u3063\u3066\u3057\u307e\u3044\u307e\u3057\u3087\u3046 \u5185\u5bb9 \u6700\u521d\u306b\u53c2\u8003\u306b\u3057\u305f\u30b5\u30a4\u30c8\u306f\u3053\u3061\u3089 \u6b8b\u5ff5\u306a\u304c\u3089OUTLOOK2013\u3067\u306f\u52d5\u4f5c\u3057\u307e\u305b [&hellip;]<\/p>\n","protected":false},"author":2,"featured_media":4157,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","enabled":false},"version":2}},"categories":[8],"tags":[],"class_list":["post-4156","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-experience"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"http:\/\/www.tokyostyling.com\/pc\/wp-content\/uploads\/2017\/05\/computer_mail.png","jetpack_shortlink":"https:\/\/wp.me\/p1TwBu-152","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/posts\/4156","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/comments?post=4156"}],"version-history":[{"count":1,"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/posts\/4156\/revisions"}],"predecessor-version":[{"id":4158,"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/posts\/4156\/revisions\/4158"}],"wp:featuredmedia":[{"embeddable":true,"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/media\/4157"}],"wp:attachment":[{"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/media?parent=4156"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/categories?post=4156"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.tokyostyling.com\/pc\/wp-json\/wp\/v2\/tags?post=4156"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}