{"id":51,"date":"2021-02-02T08:09:10","date_gmt":"2021-02-01T23:09:10","guid":{"rendered":"http:\/\/192.168.0.97\/bibouroku\/2021\/02\/02\/vlookup-2\/"},"modified":"2021-02-02T08:09:10","modified_gmt":"2021-02-01T23:09:10","slug":"vlookup-2","status":"publish","type":"post","link":"https:\/\/www.donijan.com\/bibouroku\/2021\/02\/vlookup-2.html","title":{"rendered":"VlookUp\u3092\u4f7f\u308f\u306a\u3044\u3067\u8868\u8a18\u3000-\u305d\u306e2-"},"content":{"rendered":"

\u30a8\u30af\u30bb\u30eb\u3092\u4f7f\u3063\u3066\u3044\u3066\u30fb\u30fb\u826f\u304f\u4f7f\u3046\u306e\u304cVlookUp\u3067\u3059\u304c\u30fb\u30fb
\u3069\u3046\u3057\u3066\u3082\u8868\u8a08\u7b97\u95a2\u6570\u304c\u52d5\u304f\u306e\u3067\u9045\u3044!
\u30d5\u30a1\u30a4\u30eb\u81ea\u4f53\u304c\u91cd\u304f\u306a\u308b\u30fb\u30fb\u3068\u3044\u3046\u4e8b\u304c\u3042\u308a\u307e\u3059\u3002<\/p>\n

VlookUp\u3092\u4f7f\u308f\u306a\u3044\u3067\u5546\u54c1\u3092\u8868\u8a18\u3055\u305b\u308b\u70ba\u306b\u306f\u30fb\u30fb<\/p>\n

<\/p>\n

<\/p>\n

\u30a8\u30af\u30bb\u30eb\u3092\u4f7f\u3063\u3066\u3044\u3066\u30fb\u30fb\u826f\u304f\u4f7f\u3046\u306e\u304cVlookUp\u3067\u3059\u304c\u30fb\u30fb
\u3069\u3046\u3057\u3066\u3082\u8868\u8a08\u7b97\u95a2\u6570\u304c\u52d5\u304f\u306e\u3067\u9045\u3044!
\u30d5\u30a1\u30a4\u30eb\u81ea\u4f53\u304c\u91cd\u304f\u306a\u308b\u30fb\u30fb\u3068\u3044\u3046\u4e8b\u304c\u3042\u308a\u307e\u3059\u3002<\/p>\n

VlookUp\u3092\u4f7f\u308f\u306a\u3044\u3067\u5546\u54c1\u3092\u8868\u8a18\u3055\u305b\u308b\u70ba\u306b\u306f\u30fb\u30fb<\/p>\n

\uff11\uff0e\u308f\u3056\u3068\u8a08\u7b97\u65b9\u6cd5\u3092\u624b\u52d5\u306b\u5207\u308a\u63db\u3048\u307e\u3059\u3002
<\/a><\/p>\n

\uff12\uff0e\u624b\u52d5\u306b\u304d\u308a\u304b\u3048\u307e\u3057\u305f\u3002
 <\/a><\/p>\n

\uff13\uff0e\uff36\uff22\uff21\u3092\u958b\u3044\u3066\u3001\uff36\uff22\uff21\uff30\uff52\uff4f\uff4a\uff45\uff43\uff54\u306e\u4e2d\u306e\uff33\uff48\uff45\uff45\uff54\uff11\u306e\u4e2d\u306b
\u3000\u3000\uff37\uff4f\uff52\uff4b\uff53\uff48\uff45\uff45\uff54\u3000\uff23\uff48\uff41\uff4e\uff47\uff45\u306e\u30b3\u30de\u30f3\u30c9\u3092\u8a18\u8f09\u3057\u307e\u3059\u3002<\/p>\n

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

\uff14\uff0e\u958b\u304d\u65b9\u306f\u3001\u30a8\u30af\u30bb\u30eb\u3092\u958b\u3044\u3066\u3044\u308b\u6642\u306b\u3001\uff21\uff4c\uff54\u3000\uff0b\u3000\uff26\uff11\uff11\u3000\u306e\u30ad\u30fc\u3092\u540c\u6642\u306b\u62bc\u3059\u3068\u958b\u304d\u307e\u3059\u3002
\u3000\u3000\u3053\u306e\uff33\uff48\uff45\uff45\uff54\uff11\uff08\uff33\uff48\uff45\uff45\uff54\uff11\uff09\u3092\u30c0\u30d6\u30eb\u30af\u30ea\u30c3\u30af\u3059\u308b\u3068<\/p>\n

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

\uff15\uff0e\u3053\u3093\u306a\u753b\u9762\u306b\u306a\u308b\u3001\u305d\u3053\u3067\u30fb\u30fb<\/p>\n

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

\uff16\uff0e\u4ee5\u4e0b\u306e\u69d8\u306b\uff37\uff4f\uff52\uff4b\uff53\uff48\uff45\uff45\uff54\u3092\u9078\u3076\u3068<\/p>\n

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

\uff17\uff0e\u4ee5\u4e0b\u306e\u69d8\u306a\uff33\uff45\uff4c\uff45\uff43\uff54\uff49\uff4f\uff4e\uff23\uff48\uff41\uff4e\uff47\uff45\u304c\u958b\u304f\u306e\u3067<\/p>\n

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

\uff18\uff0e\uff33\uff45\uff4c\uff45\uff43\uff54\uff49\uff4f\uff4e\uff23\uff48\uff41\uff4e\uff47\uff45\u3067\u306f\u306a\u304f\uff23\uff48\uff41\uff4e\uff47\uff45\u3092\u9078\u629e\u3002<\/p>\n

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

\uff19\uff0e\uff37\uff4f\uff52\uff4b\uff53\uff48\uff45\uff45\uff54\uff3f\uff33\uff45\uff4c\uff45\uff43\uff54\uff49\uff4f\uff4e\uff23\uff48\uff41\uff4e\uff47\uff45\u306f\u4f7f\u308f\u306a\u3044\u306e\u3067\u3001\u6d88\u53bb\u3057\u3000\uff37\uff4f\uff52\uff4b\uff53\uff48\uff45\uff45\uff54\uff3f\uff23\uff48\uff41\uff4e\uff47\uff45\u306b\u30b3\u30fc\u30c9\u3092\u66f8\u304d\u307e\u3059\u3002<\/p>\n

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

\uff11\uff10\uff0e\u4ee5\u4e0b\u306e\u69d8\u306b\u3057\u3066<\/p>\n

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

\uff11\uff11\uff0e\u3042\u3068\u306f\u30b3\u30fc\u30c9\u3092\u66f8\u304d\u8fbc\u3080<\/p>\n

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

\u3000<\/p>\n

\uff11\uff12\uff0e\u30b3\u30fc\u30c9\u306f\u4ee5\u4e0b\u306e\u3068\u304a\u308a<\/p>\n

‘—————————————————————<\/p>\n

‘\u8a72\u5f53\u306e\u5217\u306e\u5024\u304c\u5909\u66f4\u3055\u308c\u305f\u5834\u5408
Private Sub Worksheet_Change(ByVal Target As Range)<\/p>\n

‘\u5909\u6570\u306e\u5ba3\u8a00
Dim i As Long ‘\u30eb\u30fc\u30d7\u306e\u884c\u30ab\u30a6\u30f3\u30c8
Dim col As Long ‘\u30eb\u30fc\u30d7\u306e\u5217\u30ab\u30a6\u30f3\u30c8
Dim Sh1LastCol As Long ‘\u30b7\u30fc\u30c82\u306e\u6700\u7d42\u5217
Dim Sh2LastRow As Long ‘\u30b7\u30fc\u30c82\u306e\u6700\u7d42\u884c
Dim Sh2LastCol As Long ‘\u30b7\u30fc\u30c82\u306e\u6700\u7d42\u5217<\/p>\n

‘\u6700\u7d42\u884c\u3068\u6700\u7d42\u5217\u306e\u53d6\u5f97
Sh1LastCol = 11 ‘\u7d0d\u54c1\u66f8\u306e\u6700\u7d42\u5217\u306f11\u5217\u76ee
Sh2LastRow = Sheets(“Sheet2”).Cells(Rows.Count, 2).End(xlUp).Row
Sh2LastCol = Sheets(“Sheet2”).Cells(3, Columns.Count).End(xlToLeft).Column<\/p>\n

Select Case Target.Column ‘\u5909\u66f4\u3055\u308c\u305f\u5217\u304c
Case 3 ‘3\u5217\u76ee(\u3059\u306a\u308f\u3061C\u306e\u5217)\u306e\u5834\u5408\u3067
Select Case Target.Value
Case “” ‘\u7a7a\u767d\u306e\u5834\u5408
For col = 4 To Sh1LastCol ‘\u5217\u756a\u53f7\u304c2\u5217\u76ee\u304b\u3089\u6700\u7d42\u5217\u307e\u3067\u306e\u9593\u30eb\u30fc\u30d7\u3059\u308b
Cells(Target.Row, col) = “” ‘4\u5217\u76ee\u304b\u3089\u306e\u5024\u3092\u6d88\u53bb
Next col
Case Else ‘\u7a7a\u767d\u3067\u7121\u3044\u5834\u5408
‘\u30eb\u30fc\u30d7\u306e\u958b\u59cb
For i = 3 To Sh2LastRow ‘\u30b7\u30fc\u30c82\u306e3\u884c\u76ee\u304b\u3089\u6700\u7d42\u884c\u307e\u3067\u306e\u9593\u3067<\/p>\n

Select Case Sheets(“Sheet2”).Cells(i, 2) ‘\u30b7\u30fc\u30c82\u306e2\u5217\u76ee\u306e\u30b3\u30fc\u30c9\u304c
Case Right(“0000000000000” & Target.Value, 13) ‘\u30b7\u30fc\u30c81\u306e\u5909\u66f4\u3055\u308c\u305f\u8a72\u5f53\u30bb\u30eb\u306e\u5024\u3060\u3063\u305f\u3089<\/p>\n

‘\u5217\u306e\u5024\u3092\u66f8\u304d\u8fbc\u3080
For col = 2 To Sh2LastCol ‘\u5217\u756a\u53f7\u304c2\u5217\u76ee\u304b\u3089\u6700\u7d42\u5217\u307e\u3067\u306e\u9593\u30eb\u30fc\u30d7\u3059\u308b<\/p>\n

Select Case col ‘\u5217\u306e\u756a\u53f7\u304c
Case 3: Cells(Target.Row, 4) = Sheets(“Sheet2”).Cells(i, col) ‘Sheet2\u306e3\u5217\u76ee \u3059\u306a\u308f\u3061 \u5546\u54c1\u540d\u3092 Sheet1\u306e4\u5217\u76ee\u306b\u66f8\u304d\u8fbc\u3080
Case 4: Cells(Target.Row, 5) = Sheets(“Sheet2”).Cells(i, col) ‘Sheet2\u306e4\u5217\u76ee \u3059\u306a\u308f\u3061 \u5165\u308a\u6570\u3092 Sheet1\u306e5\u5217\u76ee\u306b\u66f8\u304d\u8fbc\u3080
Case 5
Case 6: Cells(Target.Row, 9) = Sheets(“Sheet2”).Cells(i, col) ‘Sheet2\u306e6\u5217\u76ee \u3059\u306a\u308f\u3061 \u58f2\u4fa1\u3092 Sheet1\u306e9\u5217\u76ee\u306b\u66f8\u304d\u8fbc\u3080
Case 7
Case 8: Cells(Target.Row, 11) = Sheets(“Sheet2”).Cells(i, col) ‘Sheet2\u306e8\u5217\u76ee \u3059\u306a\u308f\u3061 \u7a0e\u533a\u5206\u3092 Sheet1\u306e11\u5217\u76ee\u306b\u66f8\u304d\u8fbc\u3080
End Select<\/p>\n

Next col ‘\u5217\u306e\u51e6\u7406\u306e\u30eb\u30fc\u30d7\u3053\u3053\u307e\u3067
Cells(Target.Row + 1, Target.Column).Select ‘\u6b21\u306e\u884c\u3092Select \u3059\u308b
Exit For ‘\u8a72\u5f53\u3059\u308b\u884c\u3067\u306e\u51e6\u7406\u304c\u304a\u308f\u3063\u305f\u3089\u30eb\u30fc\u30d7\u3092\u629c\u3051\u308b
End Select<\/p>\n

Next i ‘\u884c\u306e\u51e6\u7406\u306e\u30eb\u30fc\u30d7\u3053\u3053\u307e\u3067<\/p>\n

End Select
End Select
End Sub<\/p>\n

‘————————————————————–<\/p>\n

\u3053\u3093\u306a\u304b\u3093\u3058\u3067\u3059\u306d\u3002<\/p>\n

\u3000<\/p>\n

\u3042\u3068\u30fb\u30fb\u30fb
\u30a8\u30af\u30bb\u30eb\u306e\u5834\u5408\u306f\u30fb\u30fb\u30fb<\/p>\n

\u30b3\u30fc\u30c9\u306a\u3069\u3092\u53d6\u308a\u6271\u3046\u3068\u304d\u30fb\u30fb\u52dd\u624b\u306b\u30bb\u30eb\u3092\u6570\u5024\u306b\u5909\u3048\u305f\u308a
\u6587\u5b57\u5316\u3051\u3059\u308b\u4e8b\u304c\u3042\u308b\u306e\u3067\u30fb\u30fb\u30fb<\/p>\n

\u3082\u3046\u4e00\u3064\u3053\u308c\u3092\u4ed8\u3051\u52a0\u3048\u3066\u304a\u304d\u307e\u3059\u3002
\u3000<\/p>\n

‘————————————————————-<\/p>\n

‘\u30ef\u30fc\u30af\u30b7\u30fc\u30c8\u304c\u30a2\u30af\u30c6\u30a3\u30d6\u306b\u306a\u3063\u305f\u3068\u304d\u306b
‘\u6587\u5b57\u5316\u3051\u3092\u9632\u3050\u305f\u3081\u306b\u66f8\u5f0f\u3092\u8a2d\u5b9a\u3057\u3066\u304a\u304f
Private Sub Worksheet_Activate()
Columns(“C:C”).NumberFormatLocal = “@”
End Sub<\/p>\n

‘————————————————————-<\/p>\n","protected":false},"excerpt":{"rendered":"

\u30a8\u30af\u30bb\u30eb\u3092\u4f7f\u3063\u3066\u3044\u3066\u30fb\u30fb\u826f\u304f\u4f7f\u3046\u306e\u304cVlookUp\u3067\u3059\u304c\u30fb\u30fb\u3069\u3046\u3057\u3066\u3082\u8868\u8a08\u7b97\u95a2\u6570\u304c\u52d5\u304f\u306e\u3067\u9045\u3044!\u30d5\u30a1\u30a4\u30eb\u81ea\u4f53\u304c\u91cd\u304f\u306a\u308b\u30fb\u30fb\u3068\u3044\u3046\u4e8b\u304c\u3042\u308a\u307e\u3059\u3002 VlookUp\u3092\u4f7f\u308f\u306a\u3044\u3067\u5546\u54c1\u3092\u8868\u8a18\u3055\u305b\u308b\u70ba\u306b\u306f\u30fb\u30fb<\/p>\n","protected":false},"author":7,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[16,17],"tags":[],"class_list":["post-51","post","type-post","status-publish","format-standard","hentry","category-excel","category-vba"],"_links":{"self":[{"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/posts\/51"}],"collection":[{"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/users\/7"}],"replies":[{"embeddable":true,"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/comments?post=51"}],"version-history":[{"count":0,"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/posts\/51\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/media?parent=51"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/categories?post=51"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.donijan.com\/bibouroku\/wp-json\/wp\/v2\/tags?post=51"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}