Excel VBA縺ｧ縺ｯ濶ｲ縲�↑讓ｪ譁�ｭ励′逋ｻ蝣ｴ縺吶ｋ縺ｮ縺�縺代←縲√↑繧薙°縺､縺九∩縺ｩ縺薙ｍ縺ｪ縺�腰隱槭′螟壹＞��
縺ｨ縲∝腰縺ｫ繝懊く繝｣繝悶Λ繝ｪ繝ｼ縺檎┌縺�□縺代↑縺ｮ繧呈｣壹↓荳翫￡繧九�縺�縺代←縲�
縺ｨ縲∝腰縺ｫ繝懊く繝｣繝悶Λ繝ｪ繝ｼ縺檎┌縺�□縺代↑縺ｮ繧呈｣壹↓荳翫￡繧九�縺�縺代←縲�
縺ｨ縺�≧縺薙→縺ｧ縲√≠縺ｾ繧頑ｷｱ蝣縺ｯ蜃ｺ譚･縺ｪ縺�￠縺ｩ邁｡蜊倥↓縺ｾ縺ｨ繧√※縺ｿ縺滂ｼ�
繝励Ο繧ｸ繧ｧ繧ｯ繝�
�代▽縺ｮ繝ｯ繝ｼ繧ｯ繝悶ャ繧ｯ��Excel繝輔ぃ繧､繝ｫ�峨�繝槭け繝ｭ鄒､縺ｫ縺ｪ繧翫∪縺吶�
VBA縺ｮ邱ｨ髮�判髱｢縺ｧ縺ｯ蟾ｦ荳翫�繝励Ο繧ｸ繧ｧ繧ｯ繝医お繧ｯ繧ｹ繝励Ο繝ｼ繝ｩ縺ｫ縺ｮ荳逡ｪ荳翫�螟ｪ蟄励〒陦ｨ遉ｺ縺輔ｌ縺ｦ縺�ｋ窶弖BAProject�� �俄昴↓縺ｪ繧翫∪縺吶ゑｼ医�牙�縺ｯ繝輔ぃ繧､繝ｫ蜷阪↓縺ｪ縺｣繧翫∪縺吶�
繝励Ο繧ｸ繧ｧ繧ｯ繝医↓窶懊Δ繧ｸ繝･繝ｼ繝ｫ窶昴≫懊�繝ｭ繧ｷ繝ｼ繧ｸ繝｣窶昴≫懊せ繝��繝医Γ繝ｳ繝遺昴′讒区�縺輔ｌ縺ｾ縺吶�
繝｢繧ｸ繝･繝ｼ繝ｫ
VBA縺ｮ繧ｳ繝ｼ繝峨ｒ譖ｸ縺�※菫晏ｭ倥☆繧句�ｴ謇縺ｮ縺薙→縺ｧ縲√％縺薙↓繝槭け繝ｭ縺ｮ繝励Ο繧ｰ繝ｩ繝�縲√�繝ｭ繧ｷ繝ｼ繧ｸ繝｣縺御ｽ懊ｉ繧後∪縺吶�
�代▽縺ｮ繝｢繝ｼ繧ｸ繝･繝ｼ繝ｫ縺ｫ縺ｯ隍�焚縺ｮ繝励Ο繧ｷ繝ｼ繧ｸ繝｣繧剃ｽ懊ｋ縺薙→縺後〒縺阪∪縺吶�
荳闊ｬ逧�↑VBA縺ｮ繧ｳ繝ｼ繝峨�窶懈ｨ呎ｺ悶Δ繝ｼ繧ｸ繝･繝ｼ繝ｫ窶昴↓譖ｸ縺崎ｾｼ縺ｿ縺ｾ縺吶ゅ∪縺溘◎繧後→縺ｯ蛻･縺ｫ繧ｪ繝悶ず繧ｧ繧ｯ繝医↓莉倬囂縺吶ｋ繝｢繧ｸ繝･繝ｼ繝ｫ縺後≠繧翫√Ρ繝ｼ繧ｯ繧ｷ繝ｼ繝井ｻ倬囂縺吶ｋ窶懊す繝ｼ繝医Δ繧ｸ繝･繝ｼ繝ｫ窶昴√Ρ繝ｼ繧ｯ繝悶ャ繧ｯ縺ｫ莉倬囂縺吶ｋ窶懊ヶ繝�け繝｢繧ｸ繝･繝ｼ繝ｫ窶昴√ヵ繧ｩ繝ｼ繝�縺ｫ莉倬囂縺吶ｋ窶懊ヵ繧ｩ繝ｼ繝�繝｢繧ｸ繝･繝ｼ繝ｫ窶昴′縺ゅｊ縺ｾ縺吶�
VBA縺ｮ繧ｳ繝ｼ繝峨ｒ譖ｸ縺�※菫晏ｭ倥☆繧句�ｴ謇縺ｮ縺薙→縺ｧ縲√％縺薙↓繝槭け繝ｭ縺ｮ繝励Ο繧ｰ繝ｩ繝�縲√�繝ｭ繧ｷ繝ｼ繧ｸ繝｣縺御ｽ懊ｉ繧後∪縺吶�
�代▽縺ｮ繝｢繝ｼ繧ｸ繝･繝ｼ繝ｫ縺ｫ縺ｯ隍�焚縺ｮ繝励Ο繧ｷ繝ｼ繧ｸ繝｣繧剃ｽ懊ｋ縺薙→縺後〒縺阪∪縺吶�
荳闊ｬ逧�↑VBA縺ｮ繧ｳ繝ｼ繝峨�窶懈ｨ呎ｺ悶Δ繝ｼ繧ｸ繝･繝ｼ繝ｫ窶昴↓譖ｸ縺崎ｾｼ縺ｿ縺ｾ縺吶ゅ∪縺溘◎繧後→縺ｯ蛻･縺ｫ繧ｪ繝悶ず繧ｧ繧ｯ繝医↓莉倬囂縺吶ｋ繝｢繧ｸ繝･繝ｼ繝ｫ縺後≠繧翫√Ρ繝ｼ繧ｯ繧ｷ繝ｼ繝井ｻ倬囂縺吶ｋ窶懊す繝ｼ繝医Δ繧ｸ繝･繝ｼ繝ｫ窶昴√Ρ繝ｼ繧ｯ繝悶ャ繧ｯ縺ｫ莉倬囂縺吶ｋ窶懊ヶ繝�け繝｢繧ｸ繝･繝ｼ繝ｫ窶昴√ヵ繧ｩ繝ｼ繝�縺ｫ莉倬囂縺吶ｋ窶懊ヵ繧ｩ繝ｼ繝�繝｢繧ｸ繝･繝ｼ繝ｫ窶昴′縺ゅｊ縺ｾ縺吶�
繝励Ο繧ｷ繝ｼ繧ｸ繝｣
sub �� End sub 縺ｧ譖ｸ縺九ｌ繧具ｼ代▽縺ｮ繝槭け繝ｭ繧貞ｮ溯｡後☆繧九�繝ｭ繧ｰ繝ｩ繝�縺ｮ縺ｾ縺ｨ縺ｾ繧翫�縺薙→縺ｧ縺吶�
窶懊�繧ｯ繝ｭ窶昴→險縺��縺ｯ繧ｽ繝輔ヨ縺ｮ謫堺ｽ懊ｒ閾ｪ蜍募喧縺輔○縺溘ｂ縺ｮ縺ｮ邱冗ｧｰ縺ｪ縺ｮ縺ｧ縲�1縺､縺ｮ繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｧ�代▽縺ｮ繝槭け繝ｭ繧剃ｽ懊ｋ蝣ｴ蜷医ｂ縺ゅｊ縺ｾ縺吶＠縲∬､�焚縺ｮ繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｧ�代▽縺ｮ繝槭け繝ｭ繧呈ｧ区�縺吶ｋ蝣ｴ蜷医ｂ縺ゅｊ縺ｾ縺吶ゅ〒縺吶′縲≫懊�繝ｭ繧ｷ繝ｼ繧ｸ繝｣窶昴→險縺��縺ｯ繝励Ο繧ｰ繝ｩ繝溘Φ繧ｰ繧ｵ繧､繝峨�逕ｨ隱槭〒迚�ｄ窶懊�繧ｯ繝ｭ窶昴�繝ｦ繝ｼ繧ｶ繝ｼ繧ｵ繧､繝会ｼ医お繧ｯ繧ｻ繝ｫ蟇�ｊ�峨�逕ｨ隱槭↓縺ｪ繧翫∪縺吶�
縲讓呎ｺ悶Δ繧ｸ繝･繝ｼ繝ｫ縺ｫ菴懊ｉ繧後ｋ繝励Ο繧ｰ繝ｩ繝�繧停懈ｨ呎ｺ悶�繝ｭ繧ｷ繝ｼ繧ｸ繝｣窶昴→險縺�√熊5縲阪く繝ｼ繧�後�繧ｯ繝ｭ縺ｮ螳溯｡後阪〒螳溯｡後＆繧後ｋ繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｧ縺吶ゅ∪縺溘が繝悶ず繧ｧ繧ｯ繝医↓莉倬囂縺吶ｋ繝｢繧ｸ繝･繝ｼ繝ｫ縺ｫ菴懊ｉ繧後ｋ繝励Ο繧ｰ繝ｩ繝�繧停懊う繝吶Φ繝医�繝ｭ繧ｷ繝ｼ繧ｸ繝｣窶昴→險縺�√Θ繝ｼ繧ｶ繝ｼ縺ｮ謫堺ｽ懊↓繧医▲縺ｦ襍ｷ縺阪ｋ繧､繝吶Φ繝医↓繧医ｊ閾ｪ蜍輔〒螳溯｡後☆繧九�繝ｭ繧ｷ繝ｼ繧ｸ繝｣縺ｧ縺吶�
萓九∴縺ｰ縲√ヶ繝�け繝｢繧ｸ繝･繝ｼ繝ｫ縺ｫ縺ｯExcel繧定ｵｷ蜍輔＠縺滓凾縲∽ｿ晏ｭ倥＠縺滓凾遲峨�繧､繝吶Φ繝医�繝ｭ繧ｷ繝ｼ繧ｸ繝｣
sub �� End sub 縺ｧ譖ｸ縺九ｌ繧具ｼ代▽縺ｮ繝槭け繝ｭ繧貞ｮ溯｡後☆繧九�繝ｭ繧ｰ繝ｩ繝�縺ｮ縺ｾ縺ｨ縺ｾ繧翫�縺薙→縺ｧ縺吶�
窶懊�繧ｯ繝ｭ窶昴→險縺��縺ｯ繧ｽ繝輔ヨ縺ｮ謫堺ｽ懊ｒ閾ｪ蜍募喧縺輔○縺溘ｂ縺ｮ縺ｮ邱冗ｧｰ縺ｪ縺ｮ縺ｧ縲�1縺､縺ｮ繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｧ�代▽縺ｮ繝槭け繝ｭ繧剃ｽ懊ｋ蝣ｴ蜷医ｂ縺ゅｊ縺ｾ縺吶＠縲∬､�焚縺ｮ繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｧ�代▽縺ｮ繝槭け繝ｭ繧呈ｧ区�縺吶ｋ蝣ｴ蜷医ｂ縺ゅｊ縺ｾ縺吶ゅ〒縺吶′縲≫懊�繝ｭ繧ｷ繝ｼ繧ｸ繝｣窶昴→險縺��縺ｯ繝励Ο繧ｰ繝ｩ繝溘Φ繧ｰ繧ｵ繧､繝峨�逕ｨ隱槭〒迚�ｄ窶懊�繧ｯ繝ｭ窶昴�繝ｦ繝ｼ繧ｶ繝ｼ繧ｵ繧､繝会ｼ医お繧ｯ繧ｻ繝ｫ蟇�ｊ�峨�逕ｨ隱槭↓縺ｪ繧翫∪縺吶�
縲讓呎ｺ悶Δ繧ｸ繝･繝ｼ繝ｫ縺ｫ菴懊ｉ繧後ｋ繝励Ο繧ｰ繝ｩ繝�繧停懈ｨ呎ｺ悶�繝ｭ繧ｷ繝ｼ繧ｸ繝｣窶昴→險縺�√熊5縲阪く繝ｼ繧�後�繧ｯ繝ｭ縺ｮ螳溯｡後阪〒螳溯｡後＆繧後ｋ繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｧ縺吶ゅ∪縺溘が繝悶ず繧ｧ繧ｯ繝医↓莉倬囂縺吶ｋ繝｢繧ｸ繝･繝ｼ繝ｫ縺ｫ菴懊ｉ繧後ｋ繝励Ο繧ｰ繝ｩ繝�繧停懊う繝吶Φ繝医�繝ｭ繧ｷ繝ｼ繧ｸ繝｣窶昴→險縺�√Θ繝ｼ繧ｶ繝ｼ縺ｮ謫堺ｽ懊↓繧医▲縺ｦ襍ｷ縺阪ｋ繧､繝吶Φ繝医↓繧医ｊ閾ｪ蜍輔〒螳溯｡後☆繧九�繝ｭ繧ｷ繝ｼ繧ｸ繝｣縺ｧ縺吶�
萓九∴縺ｰ縲√ヶ繝�け繝｢繧ｸ繝･繝ｼ繝ｫ縺ｫ縺ｯExcel繧定ｵｷ蜍輔＠縺滓凾縲∽ｿ晏ｭ倥＠縺滓凾遲峨�繧､繝吶Φ繝医�繝ｭ繧ｷ繝ｼ繧ｸ繝｣
繧ｷ繝ｼ繝医Δ繧ｸ繝･繝ｼ繝ｫ縺ｫ縺ｯ繧ｻ繝ｫ縺ｮ蛟､繧貞､画峩縺励◆譎ゅ√す繝ｼ繝医ｒ霑ｽ蜉�縺励◆譎らｭ峨�繧､繝吶Φ繝医�繝ｭ繧ｷ繝ｼ繧ｸ繝｣
Sub繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｨFunction繝励Ο繧ｷ繝ｼ繧ｸ繝｣
Sub 繝槭け繝ｭ蜷�() �� End Sub縺ｧ險倩ｿｰ縺輔ｌ繧鬼ub繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｮ莉悶↓縲：unction 髢｢謨ｰ蜷�() �� End Function縺ｧ險倩ｿｰ縺輔ｌ繧祈unction繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺後≠繧翫∪縺吶�Function繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｯ謌ｻ繧雁､縺ｧ邨先棡繧定ｿ斐☆縺薙→縺後〒縺阪∪縺吶�
Sub 繝槭け繝ｭ蜷�() �� End Sub縺ｧ險倩ｿｰ縺輔ｌ繧鬼ub繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｮ莉悶↓縲：unction 髢｢謨ｰ蜷�() �� End Function縺ｧ險倩ｿｰ縺輔ｌ繧祈unction繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺後≠繧翫∪縺吶�Function繝励Ο繧ｷ繝ｼ繧ｸ繝｣縺ｯ謌ｻ繧雁､縺ｧ邨先棡繧定ｿ斐☆縺薙→縺後〒縺阪∪縺吶�
繧ｹ繝��繝医Γ繝ｳ繝�
VBA縺ｧ險倩ｿｰ縺輔ｌ繧区怙蟆丞腰菴阪�1陦悟腰菴阪�繝励Ο繧ｰ繝ｩ繝�縲Ｊf�柎hen縲’or�柤ext 遲峨�隍�焚陦後↓縺ｾ縺溘′繧翫∪縺吶�
萓九∴縺ｰ縲≫彜ub窶昴≫廡unctoin窶昴≫廛im窶昴≫廚all窶昴≫廢nd窶昴≫廡or�� Next窶昴≫廨oTo窶昴≫廬f�杁hen�昿lse窶� 遲峨′縺ゅｊ縺ｾ縺吶�
VBA縺ｧ險倩ｿｰ縺輔ｌ繧区怙蟆丞腰菴阪�1陦悟腰菴阪�繝励Ο繧ｰ繝ｩ繝�縲Ｊf�柎hen縲’or�柤ext 遲峨�隍�焚陦後↓縺ｾ縺溘′繧翫∪縺吶�
萓九∴縺ｰ縲≫彜ub窶昴≫廡unctoin窶昴≫廛im窶昴≫廚all窶昴≫廢nd窶昴≫廡or�� Next窶昴≫廨oTo窶昴≫廬f�杁hen�昿lse窶� 遲峨′縺ゅｊ縺ｾ縺吶�
縺ｾ縺�縺ｾ縺�縲∬�縺阪↑繧後↑縺�畑隱槭′蜃ｺ縺ｦ縺阪∪縺吶′縲∽ｻ頑律縺ｯ縺薙％縺�ｉ縺ｧ蜍伜ｼ√＠縺ｦ繧�ｍ縺�ｼ�ｼ�
縺ｻ縺ｪ縺ｾ縺滂ｼ�
縺ｻ縺ｪ縺ｾ縺滂ｼ�
蜑阪�繝壹�繧ｸ��
谺｡縺ｮ繝壹�繧ｸ��
髢｢騾｣繝壹�繧ｸ