{"id":5372,"date":"2015-03-04T14:41:46","date_gmt":"2015-03-04T05:41:46","guid":{"rendered":"http:\/\/www.ka-net.org\/blog\/?p=5372"},"modified":"2015-03-04T14:41:46","modified_gmt":"2015-03-04T05:41:46","slug":"converttotext%e3%83%a1%e3%82%bd%e3%83%83%e3%83%89%e3%82%92%e4%bd%bf%e3%81%a3%e3%81%a6%e3%83%86%e3%83%bc%e3%83%96%e3%83%ab%e3%82%92%e4%ba%8c%e6%ac%a1%e5%85%83%e9%85%8d%e5%88%97%e3%81%ab%e5%a4%89","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=5372","title":{"rendered":"ConvertToText\u30e1\u30bd\u30c3\u30c9\u3092\u4f7f\u3063\u3066\u30c6\u30fc\u30d6\u30eb\u3092\u4e8c\u6b21\u5143\u914d\u5217\u306b\u5909\u63db\u3059\u308bWord\u30de\u30af\u30ed"},"content":{"rendered":"<p>Word\u306eTable\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306b\u306f\u3001\u30c6\u30fc\u30d6\u30eb\u3092\u89e3\u9664\u3057\u3066\u6587\u5b57\u5217\u306b\u5909\u63db\u3059\u308b\u300c<a href=\"https:\/\/msdn.microsoft.com\/ja-jp\/library\/ff820974.aspx\" title=\"Table.ConvertToText \u30e1\u30bd\u30c3\u30c9 (Word)(\u6a5f\u68b0\u7ffb\u8a33)\" target=\"_blank\">ConvertToText<\/a>\u300d\u30e1\u30bd\u30c3\u30c9\u304c\u3042\u308b\u306e\u3067\u3001\u3053\u308c\u3092\u4f7f\u3063\u3066\u4e0b\u56f3\u306e\u3088\u3046\u306a\u30c6\u30fc\u30d6\u30eb\u3092\u4e8c\u6b21\u5143\u914d\u5217\u306b\u5909\u63db\u3059\u308b\u30de\u30af\u30ed\u3092\u8003\u3048\u3066\u307f\u307e\u3057\u305f\u3002<\/p>\n<p><a href=\"\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Word_TableToArray_01.jpg\"><img loading=\"lazy\" decoding=\"async\" src=\"\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Word_TableToArray_01.jpg\" alt=\"Word_TableToArray_01\" width=\"366\" height=\"187\" class=\"alignnone size-full wp-image-5374\" srcset=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Word_TableToArray_01.jpg 366w, https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Word_TableToArray_01-300x153.jpg 300w\" sizes=\"auto, (max-width: 366px) 100vw, 366px\" \/><\/a><\/p>\n<pre class=\"brush: vb; title: ; notranslate\" title=\"\">Option Explicit\r\n\r\nPublic Sub Sample()\r\n  Dim v As Variant\r\n  \r\n  v = TableToArray(ActiveDocument.Tables(1))\r\n  Stop\r\nEnd Sub\r\n\r\nPrivate Function TableToArray(ByVal tbl As Word.Table) As Variant\r\n'Word\u306e\u30c6\u30fc\u30d6\u30eb\u3092\u4e8c\u6b21\u5143\u914d\u5217\u306b\u5909\u63db\u3059\u308b\r\n  Dim r As Word.Range\r\n  Dim v As Variant\r\n  Dim vv As Variant\r\n  Dim i As Long, j As Long\r\n  \r\n  ActiveDocument.UndoClear\r\n  '\u30bc\u30ed\u5e45\u306e\u30ce\u30fc\u30d6\u30ec\u30fc\u30af\u30b9\u30da\u30fc\u30b9(U+FEFF)\u3092\u533a\u5207\u308a\u6587\u5b57\u306b\u3057\u3066\u30c6\u30fc\u30d6\u30eb\u304b\u3089\u6587\u5b57\u5217\u306b\u5909\u63db\r\n  Set r = tbl.ConvertToText(Separator:=ChrW(&amp;HFEFF&amp;))\r\n  r.SetRange r.Start, r.End - 1 '\u4e0d\u8981\u306a\u6539\u884c\u9664\u5916\r\n  v = Split(r.Text, ChrW(&amp;HD)) '\u6539\u884c\u3067\u5206\u5272\r\n  ReDim vv(UBound(v))\r\n  j = LBound(vv)\r\n  For i = LBound(v) To UBound(v)\r\n    '\u30bc\u30ed\u5e45\u306e\u30ce\u30fc\u30d6\u30ec\u30fc\u30af\u30b9\u30da\u30fc\u30b9(U+FEFF)\u3067\u5206\u5272\r\n    vv(j) = Split(v(i), ChrW(&amp;HFEFF&amp;))\r\n    j = j + 1\r\n  Next\r\n  ActiveDocument.Undo '\u30c6\u30fc\u30d6\u30eb\u5909\u63db\u3092\u5143\u306b\u623b\u3059\r\n  TableToArray = vv\r\nEnd Function<\/pre>\n<ol>\n<li><a href=\"http:\/\/www.fileformat.info\/info\/unicode\/char\/feff\/index.htm\" title=\"Unicode Character 'ZERO WIDTH NO-BREAK SPACE' (U+FEFF)\" target=\"_blank\">\u30bc\u30ed\u5e45\u306e\u30ce\u30fc\u30d6\u30ec\u30fc\u30af\u30b9\u30da\u30fc\u30b9(U+FEFF)<\/a>\u3092\u533a\u5207\u308a\u6587\u5b57\u306b\u3057\u3066\u30c6\u30fc\u30d6\u30eb\u3092\u6587\u5b57\u5217\u306b\u5909\u63db\u3059\u308b\u3002<\/li>\n<li>\u6539\u884c\u6587\u5b57\u3067Split\u3059\u308b\u3002<\/li>\n<li>\u30bc\u30ed\u5e45\u306e\u30ce\u30fc\u30d6\u30ec\u30fc\u30af\u30b9\u30da\u30fc\u30b9(U+FEFF)\u3067\u3055\u3089\u306bSplit\u3057\u3066\u3001Variant\u578b\u306e\u5909\u6570\u306b\u683c\u7d0d\u3059\u308b\u3002<\/li>\n<\/ol>\n<p>\u3068\u3044\u3046\u3088\u3046\u306a\u51e6\u7406\u3092\u884c\u3063\u3066\u3044\u3066\u3001\u30ed\u30fc\u30ab\u30eb\u30a6\u30a3\u30f3\u30c9\u30a6\u3067\u5909\u6570\u3092\u78ba\u8a8d\u3057\u3066\u307f\u308b\u3068\u3001\u4e00\u5fdc\u4e0a\u624b\u304f\u52d5\u4f5c\u3057\u3066\u3044\u308b\u3088\u3046\u3067\u3059\u3002<\/p>\n<p><a href=\"\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Word_TableToArray_02.jpg\"><img loading=\"lazy\" decoding=\"async\" src=\"\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Word_TableToArray_02.jpg\" alt=\"Word_TableToArray_02\" width=\"352\" height=\"377\" class=\"alignnone size-full wp-image-5373\" srcset=\"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Word_TableToArray_02.jpg 352w, https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/Word_TableToArray_02-280x300.jpg 280w\" sizes=\"auto, (max-width: 352px) 100vw, 352px\" \/><\/a><\/p>\n<p>\u30bb\u30eb\u4e2d\u306b\u30bc\u30ed\u5e45\u306e\u30ce\u30fc\u30d6\u30ec\u30fc\u30af\u30b9\u30da\u30fc\u30b9\u304c\u542b\u307e\u308c\u3066\u3044\u305f\u3089\u610f\u56f3\u901a\u308a\u52d5\u4f5c\u3057\u307e\u305b\u3093\u304c\u3001\u3053\u306e\u6587\u5b57\u304c\u666e\u901a\u306eWord\u6587\u66f8\u4e2d\u306b\u51fa\u3066\u304f\u308b\u3053\u3068\u306f\u307b\u307c\u7121\u3044\u306e\u3067\u3001\u5927\u4e08\u592b\u3060\u308d\u3046\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"Word\u306eTable\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306b\u306f\u3001\u30c6\u30fc\u30d6\u30eb\u3092\u89e3\u9664\u3057\u3066\u6587\u5b57\u5217\u306b\u5909\u63db\u3059\u308b\u300cConvertToText\u300d\u30e1\u30bd\u30c3\u30c9\u304c\u3042\u308b\u306e\u3067\u3001\u3053\u308c\u3092\u4f7f\u3063\u3066\u4e0b\u56f3\u306e\u3088\u3046\u306a\u30c6\u30fc\u30d6\u30eb\u3092\u4e8c\u6b21\u5143\u914d\u5217\u306b\u5909\u63db\u3059\u308b\u30de\u30af\u30ed\u3092\u8003\u3048\u3066\u307f\u307e\u3057\u305f\u3002 Option Ex [&hellip;]","protected":false},"author":1,"featured_media":7134,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"\u3069\u3046\u3044\u3063\u305f\u5834\u9762\u3067\u4f7f\u3048\u308b\u306e\u304b\u306f\u4e0d\u660e\u3067\u3059\u3002 [ConvertToText\u30e1\u30bd\u30c3\u30c9\u3092\u4f7f\u3063\u3066\u30c6\u30fc\u30d6\u30eb\u3092\u4e8c\u6b21\u5143\u914d\u5217\u306b\u5909\u63db\u3059\u308bWord\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,49],"tags":[],"class_list":["post-5372","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-office","category-word-office"],"aioseo_notices":[],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-Word.png","jetpack_shortlink":"https:\/\/wp.me\/p4UZZr-1oE","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5372","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=5372"}],"version-history":[{"count":2,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5372\/revisions"}],"predecessor-version":[{"id":5376,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5372\/revisions\/5376"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/media\/7134"}],"wp:attachment":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=5372"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=5372"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=5372"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}