ΠΠ°ΠΊ Π² Excel ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°ΡΡ ΡΠΎΠ»ΡΠΊΠΎ ΡΡΡΠΎΠΊΠΈ Ρ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½Π½ΡΠΌ ΡΠ΅ΠΊΡΡΠΎΠΌ?
ΠΠ°ΠΊ Π·Π°ΠΏΡΠ΅ΡΠΈΡΡ ΠΏΠ΅ΡΠ°ΡΡ ΡΡΠ΅Π΅ΠΊ Π² Excel
ΠΠ°ΠΊ ΠΏΡΠ΅Π΄ΠΎΡΠ²ΡΠ°ΡΠΈΡΡ ΠΏΠ΅ΡΠ°ΡΡ ΡΠΎΠ΄Π΅ΡΠΆΠΈΠΌΠΎΠ³ΠΎ ΠΎΡΠ΄Π΅Π»ΡΠ½ΡΡ ΡΡΠ΅Π΅ΠΊ (ΠΈΠ»ΠΈ Π²ΡΠ΅ΠΉ ΡΡΡΠΎΠΊΠΈ ΠΈΠ»ΠΈ ΡΡΠΎΠ»Π±ΡΠ°) Π² Excel, ΠΎΡΡΠ°Π²ΠΈΠ² ΠΈΡ Π²ΠΈΠ΄ΠΈΠΌΡΠΌΠΈ Π½Π° ΡΠΊΡΠ°Π½Π΅ ΠΏΡΠΈ ΡΠ΅Π΄Π°ΠΊΡΠΈΡΠΎΠ²Π°Π½ΠΈΠΈ ΡΠ°ΠΉΠ»Π°? Π ΠΈΠ΄Π΅Π°Π»Π΅, Ρ Ρ ΠΎΡΠ΅Π» Π±Ρ ΠΈΠΌΠ΅ΡΡ Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎΡΡΡ Π΄Π΅Π»Π°ΡΡ ΡΡΠΎ Ρ ΡΡΠ΅ΠΉΠΊΠ°ΠΌΠΈ Π²Π½ΡΡΡΠ΅Π½Π½Π΅ΠΉ ΡΠ»Π΅ΠΊΡΡΠΎΠ½Π½ΠΎΠΉ ΡΠ°Π±Π»ΠΈΡΡ (Ρ.Π΅. Π½Π΅ ΡΠΎΠ»ΡΠΊΠΎ Ρ ΠΏΡΠ°Π²ΡΠΌ ΡΡΠΎΠ»Π±ΡΠΎΠΌ (ΡΡΠΎΠ»Π±ΡΠ°ΠΌΠΈ) ΠΈΠ»ΠΈ Π½ΠΈΠΆΠ½Π΅ΠΉ ΡΡΡΠΎΠΊΠΎΠΉ (ΡΡΡΠΎΠΊΠ°ΠΌΠΈ)). Π‘ΠΊΡΡΡΠΈΠ΅ ΡΡΡΠΎΠΊΠΈ (ΡΡΡΠΎΠΊ) ΠΈΠ»ΠΈ ΡΡΠΎΠ»Π±ΡΠ° (ΡΡΠΎΠ»Π±ΡΠΎΠ²) Π½Π΅ΠΏΡΠΈΠ΅ΠΌΠ»Π΅ΠΌΠΎ, ΠΏΠΎΡΠΊΠΎΠ»ΡΠΊΡ ΠΌΠ½Π΅ Π½ΡΠΆΠ½ΠΎ ΡΠΎΡ ΡΠ°Π½ΠΈΡΡ ΡΠ°Π·ΠΌΠ΅Ρ ΡΡΠ΅Π΅ΠΊ, ΡΡΠΎΠ±Ρ ΡΠΎΡ ΡΠ°Π½ΠΈΡΡ ΠΎΠ±ΡΠΈΠΉ Π²ΠΈΠ΄ Π»ΠΈΡΡΠ°.
ΠΡΠ»ΠΎ Π±Ρ Π½Π΅ΠΏΠ»ΠΎΡ ΠΎ, Π΅ΡΠ»ΠΈ Π±Ρ ΡΡΡΠ΅ΡΡΠ²ΠΎΠ²Π°Π» ΡΠΏΠΎΡΠΎΠ± ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΡ ΡΡΠ»ΠΎΠ²Π½ΠΎΠ³ΠΎ ΡΠΎΡΠΌΠ°ΡΠ° Π½Π° ΠΎΡΠ½ΠΎΠ²Π΅ ΡΠΎΠ³ΠΎ, ΠΏΠ΅ΡΠ°ΡΠ°Π΅Ρ Π»ΠΈ Excel Π² Π΄Π°Π½Π½ΡΠΉ ΠΌΠΎΠΌΠ΅Π½Ρ. Π― Π²ΡΡΡΠ½ΡΡ ΡΡΡΠ°Π½Π°Π²Π»ΠΈΠ²Π°Ρ Π±Π΅Π»ΡΠΉ ΡΠ²Π΅Ρ ΡΠ΅ΠΊΡΡΠ° ΠΏΠ΅ΡΠ΅Π΄ ΠΏΠ΅ΡΠ°ΡΡΡ (ΠΈ Π²ΡΡΡΠ½ΡΡ ΠΌΠ΅Π½ΡΡ Π΅Π³ΠΎ ΠΎΠ±ΡΠ°ΡΠ½ΠΎ ΠΏΠΎΡΠ»Π΅ ΠΏΠ΅ΡΠ°ΡΠΈ), Π½ΠΎ Ρ ΡΡΠΈΡΠ°Ρ, ΡΡΠΎ ΡΡΠΎ Π΄ΠΎΠ»ΠΆΠ΅Π½ Π±ΡΡΡ Π°Π²ΡΠΎΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΈΠΉ ΠΏΡΠΎΡΠ΅ΡΡ.
ΠΠ»Ρ ΡΡΠΎΠ³ΠΎ ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡΠΈΠΌΠ΅Π½ΠΈΡΡ ΠΎΠ±ΡΡΠ½ΠΎΠ΅ (Π½Π΅ ΡΡΠ»ΠΎΠ²Π½ΠΎΠ΅) ΡΠΎΡΠΌΠ°ΡΠΈΡΠΎΠ²Π°Π½ΠΈΠ΅. Π§ΡΠΎΠ±Ρ ΠΎΡΡΠΎΡΠΌΠ°ΡΠΈΡΠΎΠ²Π°ΡΡ ΡΡΠ΅ΠΉΠΊΡ, ΡΡΡΠΎΠΊΡ ΠΈ/ΠΈΠ»ΠΈ ΡΡΠΎΠ»Π±Π΅Ρ, ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠΉΡΠ΅ Π»Π΅Π½ΡΡ Π²Π½ΠΈΠ·Ρ («ΠΠ»Π°Π²Π½Π°Ρ» * «Π―ΡΠ΅ΠΉΠΊΠΈ» * «Π€ΠΎΡΠΌΠ°Ρ») ΠΈΠ»ΠΈ Π½Π°ΠΆΠΌΠΈΡΠ΅ Ctrl + 1.
ΠΠ° Π²ΠΊΠ»Π°Π΄ΠΊΠ΅ «Π§ΠΈΡΠ»ΠΎ» Π²ΡΠ±Π΅ΡΠΈΡΠ΅ ΠΠ°ΡΠ΅Π³ΠΎΡΠΈΡ = «ΠΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»ΡΡΠΊΠΈΠΉ» ΠΈ Π² ΠΏΠΎΠ»Π΅ «Π’ΠΈΠΏ» Π²Π²Π΅Π΄ΠΈΡΠ΅
Excel ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅Ρ ΠΏΡΡΡΡΡ ΡΡΡΠΎΠΊΡ Π² ΡΡΠ΅ΠΉΠΊΠ°Ρ , ΡΠΎΠ΄Π΅ΡΠΆΠ°ΡΠΈΡ ΠΏΠΎΠ»ΠΎΠΆΠΈΡΠ΅Π»ΡΠ½ΠΎΠ΅ ΡΠΈΡΠ»ΠΎ, ΠΎΡΡΠΈΡΠ°ΡΠ΅Π»ΡΠ½ΠΎΠ΅ ΡΠΈΡΠ»ΠΎ, Π½ΠΎΠ»Ρ ΠΈΠ»ΠΈ (Π½Π΅ΡΠΈΡΠ»ΠΎΠ²ΠΎΠΉ) ΡΠ΅ΠΊΡΡ. Π’Π°ΠΊΠΈΠΌ ΠΎΠ±ΡΠ°Π·ΠΎΠΌ, Π»ΡΠ±ΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅, Π½Π΅ ΡΠ²Π»ΡΡΡΠ΅Π΅ΡΡ ΠΎΡΠΈΠ±ΠΊΠΎΠΉ, Π±ΡΠ΄Π΅Ρ ΡΠΊΡΡΡΠΎ Π½Π° ΡΠΊΡΠ°Π½Π΅ ΠΈ ΠΏΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ.
ΠΡΠ»ΠΈ Π²Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΡΠ΅ Office 2010, Π² ΡΠ°Π·Π΄Π΅Π»Π΅ «Π€Π°ΠΉΠ» -> ΠΠ΅ΡΠ°ΡΡ -> ΠΠ°ΡΠ°ΠΌΠ΅ΡΡΡ ΡΡΡΠ°Π½ΠΈΡΡ -> ΠΠΈΡΡ (Π²ΠΊΠ»Π°Π΄ΠΊΠ°)» Π²Π°ΠΌ Π½ΡΠΆΠ½ΠΎ Π²ΡΠ±ΡΠ°ΡΡ ΠΎΠΏΡΠΈΡ «ΠΠ±Π»Π°ΡΡΡ ΠΏΠ΅ΡΠ°ΡΠΈ». Π ΠΌΠΎΠ΅ΠΌ ΠΏΡΠΈΠΌΠ΅ΡΠ΅ Π±ΡΠ΄ΡΡ Π½Π°ΠΏΠ΅ΡΠ°ΡΠ°Π½Ρ ΡΠΎΠ»ΡΠΊΠΎ ΡΡΠΎΠ»Π±ΡΡ A:J, ΠΎΠ΄Π½Π°ΠΊΠΎ Π½Π° ΡΠΊΡΠ°Π½ Π²ΡΠ²ΠΎΠ΄ΠΈΡΡΡ Π²ΡΠ΅.
ΠΡΠΎ — Π°ΡΠΏΠ΅ΠΊΡ Π΄ΠΈΠ°Π»ΠΎΠ³Π°:
(ΠΠ°ΠΆΠΌΠΈΡΠ΅ Π½Π° ΠΈΠ·ΠΎΠ±ΡΠ°ΠΆΠ΅Π½ΠΈΠ΅, ΡΡΠΎΠ±Ρ ΡΠ²Π΅Π»ΠΈΡΠΈΡΡ)
ΠΡΠΎ ΠΌΠΎΠΆΠ½ΠΎ ΡΠ°ΠΊΠΆΠ΅ ΠΎΡΠΊΡΡΡΡ ΠΊΠ°ΠΊ «Π Π°Π·ΠΌΠ΅ΡΠΊΠ° ΡΡΡΠ°Π½ΠΈΡΡ». β «ΠΠ°ΡΡΡΠΎΠΉΠΊΠΈ ΡΡΡΠ°Π½ΠΈΡΡ» β (ΡΠ³Π»ΠΎΠ²Π°Ρ ΠΊΠ½ΠΎΠΏΠΊΠ°) β «ΠΠ°ΡΡΡΠΎΠΉΠΊΠΈ ΡΡΡΠ°Π½ΠΈΡΡ» β «ΠΠΈΡΡ»:
ΠΡΠΎ ΡΠ΅ΡΠ΅Π½ΠΈΠ΅ Π½Π΅ ΡΡΠ΅Π±ΡΠ΅Ρ ΠΎΡ Π²Π°Ρ Π²ΡΠΏΠΎΠ»Π½Π΅Π½ΠΈΡ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½Π½ΡΡ Π΄Π΅ΠΉΡΡΠ²ΠΈΠΉ Π΄ΠΎ ΠΈ ΠΏΠΎΡΠ»Π΅ ΠΊΠ°ΠΆΠ΄ΠΎΠ³ΠΎ Π·Π°Π΄Π°Π½ΠΈΡ ΠΏΠ΅ΡΠ°ΡΠΈ. ΠΠ½ΠΎ ΠΎΡΠ½ΠΎΠ²Π°Π½ΠΎ Π½Π° ΠΊΠΎΠ½ΡΠ΅ΠΏΡΠΈΠΈ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ «ΠΎΠ±Π»Π°ΡΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ», ΠΏΡΠ΅Π΄Π»ΠΎΠΆΠ΅Π½Π½ΠΎΠΉ Π’Π΅ΡΠ΅Π½ΡΠΎΠΌ ΠΈ ΠΠΎΠ½ΠΎΠΌ ΠΠΈΠ²ΡΠΈ. Π£Π΄Π°Π»ΠΈΡΠ΅ ΡΡΠ΅ΠΉΠΊΠΈ, ΠΊΠΎΡΠΎΡΡΠ΅ Π²Ρ Π½Π΅ Ρ ΠΎΡΠΈΡΠ΅ ΠΏΠ΅ΡΠ°ΡΠ°ΡΡ, ΠΏΠΎΠΌΠ΅ΡΡΠΈΠ² ΠΈΡ Π·Π° ΠΏΡΠ΅Π΄Π΅Π»Ρ ΠΎΠ±Π»Π°ΡΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ. ΠΡΠ»ΠΈ Π²Π°ΠΌ ΡΡΠΎΠ³ΠΎ Π΄ΠΎΡΡΠ°ΡΠΎΡΠ½ΠΎ, ΡΠΎ Π²ΡΠ΅ Π³ΠΎΡΠΎΠ²ΠΎ.
ΠΡΠΈ ΡΠ΅Π΄Π°ΠΊΡΠΈΡΠΎΠ²Π°Π½ΠΈΠΈ Π»ΠΈΡΡΠ° Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π·Π°Ρ ΠΎΡΠ΅ΡΡ, ΡΡΠΎΠ±Ρ ΠΈΡΠΊΠ»ΡΡΠ΅Π½Π½ΡΠ΅ ΡΡΠ΅ΠΉΠΊΠΈ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π»ΠΈΡΡ Π² ΠΎΠ±Π»Π°ΡΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ. ΠΡΠ»ΠΈ Π²Ρ Ρ ΠΎΡΠΈΡΠ΅ ΠΎΡΠΎΠ±ΡΠ°Π·ΠΈΡΡ ΠΊΠ°ΠΆΠ΄ΡΡ ΡΡΠ΅ΠΉΠΊΡ, Π½ΠΎ Π½Π΅ ΠΏΠ΅ΡΠ°ΡΠ°ΡΡ Π΅Π΅, ΡΠ΄Π΅Π»Π°ΠΉΡΠ΅ ΡΠ»Π΅Π΄ΡΡΡΠ΅Π΅:
- ΠΡΡΠ°Π²ΠΈΡΡ «ΡΠΎΡΠΌΡ». (ΠΡΡΡΠ΅ Π²ΡΠ΅Π³ΠΎ ΠΏΠΎΠ΄Ρ ΠΎΠ΄ΠΈΡ ΠΏΡΡΠΌΠΎΡΠ³ΠΎΠ»ΡΠ½ΠΈΠΊ). ΠΠΎΠΌΠ΅ΡΡΠΈΡΠ΅ Π΅Π³ΠΎ Π½Π°Π΄ ΡΡΠ΅ΠΉΠΊΠΎΠΉ, Π² ΠΊΠΎΡΠΎΡΠΎΠΉ Π΄ΠΎΠ»ΠΆΠ½Ρ ΠΏΠΎΡΠ²ΠΈΡΡΡΡ Π΄Π°Π½Π½ΡΠ΅. ΠΠΈΠ·ΡΠ°Π»ΡΠ½ΠΎ ΠΎΡΡΠΎΡΠΌΠ°ΡΠΈΡΡΠΉΡΠ΅ Π΅Π³ΠΎ ΡΠ°ΠΊ, ΠΊΠ°ΠΊ Π²Ρ Ρ ΠΎΡΠΈΡΠ΅, ΡΡΠΎΠ±Ρ ΠΎΠ½ Π²ΡΠ³Π»ΡΠ΄Π΅Π». ΠΡΡΡΠ΅ Π²ΡΠ΅Π³ΠΎ Π½Π΅ ΠΈΠΌΠ΅ΡΡ Π³ΡΠ°Π½ΠΈΡ. Π£ΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ ΡΠ²Π΅Ρ Π·Π°Π»ΠΈΠ²ΠΊΠΈ Π½Π° Π²ΡΠ±ΡΠ°Π½Π½ΡΠΉ Π²Π°ΠΌΠΈ ΡΠ²Π΅Ρ ΡΠΎΠ½Π° ΠΈΠ»ΠΈ Π½Π΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠΉΡΠ΅ ΡΠ²Π΅Ρ Π·Π°Π»ΠΈΠ²ΠΊΠΈ, ΡΡΠΎΠ±Ρ ΡΠ²Π΅Ρ Π·Π°Π»ΠΈΠ²ΠΊΠΈ Π±Π°Π·ΠΎΠ²ΠΎΠΉ ΡΡΠ΅ΠΉΠΊΠΈ ΠΏΡΠΎΡΠ²Π΅ΡΠΈΠ²Π°Π» (Π° ΡΠ°ΠΌΠ° ΡΠΈΠ³ΡΡΠ° Π±ΡΠ»Π° Π½Π΅Π²ΠΈΠ΄ΠΈΠΌΠΎΠΉ).
- ΠΠ°ΡΡΡΠΎΠΉΡΠ΅ ΡΠΎΡΠΌΡ Π½Π° ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ΅Π½ΠΈΠ΅ ΡΠΎΠ΄Π΅ΡΠΆΠΈΠΌΠΎΠ³ΠΎ Π½ΡΠΆΠ½ΠΎΠΉ ΡΡΠ΅ΠΉΠΊΠΈ, Π²ΡΠ±ΡΠ°Π² ΡΠΎΡΠΌΡ ΠΈ Π½Π°Π±ΡΠ°Π² ΡΡΡΠ»ΠΊΡ (Π½Π°ΠΏΡΠΈΠΌΠ΅Ρ, =D15 ) Π² ΡΡΡΠΎΠΊΠ΅ ΡΠΎΡΠΌΡ Π² Π²Π΅ΡΡ Π½Π΅ΠΉ ΡΠ°ΡΡΠΈ. ΠΠ΅ Π²Π²ΠΎΠ΄ΠΈΡΠ΅ ΡΠΎΡΠΌΡ ΠΏΡΠΎΡΡΠΎ ΡΠ°ΠΊ; Π² ΡΡΠΎΠΌ ΡΠ»ΡΡΠ°Π΅ ΡΠΎΡΠΌΡΠ»Π° ( =D15 ) Π±ΡΠ΄Π΅Ρ Π²ΡΠ²Π΅Π΄Π΅Π½Π° Π΄ΠΎΡΠ»ΠΎΠ²Π½ΠΎ.
- Π©Π΅Π»ΠΊΠ½ΠΈΡΠ΅ ΡΠΎΡΠΌΡ ΠΏΡΠ°Π²ΠΎΠΉ ΠΊΠ½ΠΎΠΏΠΊΠΎΠΉ ΠΌΡΡΠΈ ΠΈ Π²ΡΠ±Π΅ΡΠΈΡΠ΅ Π€ΠΎΡΠΌΠ°Ρ ΡΠΎΡΠΌΡ. ΠΠ° Π²ΠΊΠ»Π°Π΄ΠΊΠ΅ «Π‘Π²ΠΎΠΉΡΡΠ²Π°» ΠΌΠΎΠΆΠ½ΠΎ Π²ΡΠ±ΡΠ°ΡΡ, ΠΏΠ΅ΡΠ°ΡΠ°ΡΡ ΠΈΠ»ΠΈ Π½Π΅Ρ ΡΠΎΡΠΌΡ (ΡΠ½ΡΠ² ΡΠ»Π°ΠΆΠΎΠΊ «ΠΠ΅ΡΠ°ΡΠ°ΡΡ ΠΎΠ±ΡΠ΅ΠΊΡ»). (Π Excel 2013 ΡΡΠΎ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°Π·Π΄Π΅Π»Π΅ ΠΠ°ΡΡΡΠΎΠΉΠΊΠΈ ΡΠΎΡΠΌΡ β Π Π°Π·ΠΌΠ΅Ρ ΠΈ ΡΠ²ΠΎΠΉΡΡΠ²Π° β Π‘Π²ΠΎΠΉΡΡΠ²Π°).
ΠΡΠ»ΠΈ Π±Ρ ΠΌΠ½Π΅ ΠΏΡΠΈΡΠ»ΠΎΡΡ ΡΠ»Π΅Π΄ΠΎΠ²Π°ΡΡ Π²Π°ΡΠΈΠΌ ΠΈΠ½ΡΡΡΡΠΊΡΠΈΡΠΌ, Ρ Π±Ρ ΠΏΠΎΡΡΡΠΏΠΈΠ» ΡΠ»Π΅Π΄ΡΡΡΠΈΠΌ ΠΎΠ±ΡΠ°Π·ΠΎΠΌ:
Π Π΅Π΄Π°ΠΊΡΠΎΡ ΠΊΠΎΠ΄Π° (VBA) ΠΏΡΠ΅Π΄ΠΎΡΡΠ°Π²Π»ΡΠ΅Ρ ΡΠ»Π΅Π΄ΡΡΡΡΡ ΡΡΠ½ΠΊΡΠΈΠΎΠ½Π°Π»ΡΠ½ΠΎΡΡΡ:
Π§ΡΠΎΠ±Ρ ΡΠΊΡΡΡΡ ΡΡΠΎΠ»Π±ΡΡ ΠΈΠ»ΠΈ ΡΡΡΠΎΠΊΠΈ, Π½Π°ΠΏΠ΅ΡΠ°ΡΠ°ΡΡ ΠΈΡ , Π° Π·Π°ΡΠ΅ΠΌ ΡΠ°ΡΠΊΡΡΡΡ.
ΠΠ»ΠΈ ΠΈΠ·ΠΌΠ΅Π½ΠΈΡΠ΅ ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΡΡΡΡΡ ΡΠ°ΡΡΡ, ΡΡΠΎΠ±Ρ ΡΠΊΡΡΡΡ ΡΡΠΎΠ»Π±ΡΡ (Π² Π΄Π°Π½Π½ΠΎΠΌ ΠΏΡΠΈΠΌΠ΅ΡΠ΅ ΡΠΊΡΡΡΡ ΡΡΠΎΠ»Π±ΡΡ B ΠΈ D)
ΠΠ»ΠΈ ΡΠΊΡΡΡΡ Π²ΡΠ΅ ΡΡΡΠΎΠΊΠΈ Ρ ΠΏΡΡΡΠΎΠΉ ΡΡΠ΅ΠΉΠΊΠΎΠΉ Π² ΡΡΠΎΠ»Π±ΡΠ΅ Π:
Π― ΡΠ΅ΡΠΈΠ» ΡΡ ΠΆΠ΅ ΠΏΡΠΎΠ±Π»Π΅ΠΌΡ, ΡΠΎΠ·Π΄Π°Π² ΠΎΡΠ΄Π΅Π»ΡΠ½ΡΠΉ Π»ΠΈΡΡ ΠΈ ΡΠΊΠΎΠΏΠΈΡΠΎΠ²Π°Π² ΡΡΠ΄Π° ΠΈΠ½ΡΠΎΡΠΌΠ°ΡΠΈΠΎΠ½Π½ΡΡ ΡΡΡΠ»ΠΊΡ. Π‘ΠΊΠΎΠΏΠΈΡΡΠΉΡΠ΅ Π²Π΅ΡΡ ΠΈΡΡ ΠΎΠ΄Π½ΡΠΉ Π»ΠΈΡΡ (Ctrl + C ) ΠΈ Π²ΡΡΠ°Π²ΡΡΠ΅ Π΅Π³ΠΎ. ΠΠ΅ΡΠ΅ΠΉΠ΄ΠΈΡΠ΅ Π½Π° Π½ΠΎΠ²ΡΠΉ Π»ΠΈΡΡ ΠΈ ΡΠ΅Π»ΠΊΠ½ΠΈΡΠ΅ ΠΏΡΠ°Π²ΠΎΠΉ ΠΊΠ½ΠΎΠΏΠΊΠΎΠΉ ΠΌΡΡΠΈ ΠΏΠ΅ΡΠ²ΡΡ ΡΡΠ΅ΠΉΠΊΡ. Π ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠ°Ρ Π²ΡΡΠ°Π²ΠΊΠΈ ΠΏΠΎΡΠ²ΠΈΡΡΡ Π·Π½Π°ΡΠΎΠΊ ΡΡΡΠ»ΠΊΠΈ. ΠΡΠ»ΠΈ Π²Ρ Π²ΡΡΠ°Π²ΠΈΡΠ΅ ΠΈΠ·ΠΎΠ±ΡΠ°ΠΆΠ΅Π½ΠΈΠ΅ ΡΠ΅Π»ΠΈΠΊΠΎΠΌ, ΠΎΠ½ΠΎ Π±ΡΠ΄Π΅Ρ Π½Π΅ΡΠΎΡΠΌΠ°ΡΠΈΡΠΎΠ²Π°Π½Π½ΡΠΌ, ΠΏΠΎΡΡΠΎΠΌΡ Π²Π°ΠΌ Π½ΡΠΆΠ½ΠΎ Π±ΡΠ΄Π΅Ρ ΡΡΠΎ ΠΈΡΠΏΡΠ°Π²ΠΈΡΡ. Π ΠΏΡΡΡΡΡ ΡΡΠ΅ΠΉΠΊΠ°Ρ ΠΏΠΎΡΠ²ΡΡΡΡ Π½ΡΠ»ΠΈ. ΠΡΠΎ ΠΌΠΎΠΆΠ½ΠΎ ΠΈΡΠΏΡΠ°Π²ΠΈΡΡ, ΠΏΠ΅ΡΠ΅ΠΉΠ΄Ρ Π² «Π€Π°ΠΉΠ»» β «ΠΠ°ΡΠ°ΠΌΠ΅ΡΡΡ» β «ΠΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»ΡΠ½ΠΎ» ΠΈ ΡΠ½ΡΠ² ΡΠ»Π°ΠΆΠΎΠΊ «ΠΠΎΠΊΠ°Π·ΡΠ²Π°ΡΡ Π½ΡΠ»ΠΈ Π² ΡΡΠ΅ΠΉΠΊΠ°Ρ Ρ Π½ΡΠ»Π΅Π²ΡΠΌΠΈ Π·Π½Π°ΡΠ΅Π½ΠΈΡΠΌΠΈ».
ΠΡΠ±ΡΠ΅ ΡΡΠ΅ΠΉΠΊΠΈ, ΡΡΡΠΎΠΊΠΈ ΠΈΠ»ΠΈ ΡΡΠΎΠ»Π±ΡΡ, ΠΊΠΎΡΠΎΡΡΠ΅ Π²Ρ Π½Π΅ Ρ ΠΎΡΠΈΡΠ΅ Π²ΠΈΠ΄Π΅ΡΡ Π½Π° ΡΠ²ΠΎΠΈΡ ΡΠ°ΡΠΏΠ΅ΡΠ°ΡΠΊΠ°Ρ , ΡΠ΅ΠΏΠ΅ΡΡ ΠΌΠΎΠΆΠ½ΠΎ ΡΠ΄Π°Π»ΠΈΡΡ. Π Π°ΡΠΏΠ΅ΡΠ°ΡΠ°Π½Π½ΡΠΉ Π»ΠΈΡΡ Π°Π²ΡΠΎΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΈ ΠΎΠ±Π½ΠΎΠ²Π»ΡΠ΅ΡΡΡ ΠΏΠΎ ΠΌΠ΅ΡΠ΅ ΠΎΠ±Π½ΠΎΠ²Π»Π΅Π½ΠΈΡ ΠΈΡΡ ΠΎΠ΄Π½ΠΎΠ³ΠΎ Π»ΠΈΡΡΠ°.
ΠΡΠ»ΠΈ Π²Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΡΠ΅ Π±Π°Π·ΠΎΠ²ΡΠΉ Π»ΠΈΡΡ Π΄Π»Ρ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΈΡ ΡΠ΅Π»Π΅ΠΉ ΠΈΠ»ΠΈ Π²ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ ΠΏΠ΅ΡΠΈΠΎΠ΄ΠΎΠ², Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΎΠ·Π΄Π°ΡΡ ΡΡΠΎΡ ΠΏΠ΅ΡΠ°ΡΠ½ΡΠΉ Π»ΠΈΡΡ Π΄Π»Ρ Π±Π°Π·ΠΎΠ²ΠΎΠ³ΠΎ Π»ΠΈΡΡΠ°. ΠΡΠΎΡΡΠΎ ΡΠΊΠΎΠΏΠΈΡΡΠΉΡΠ΅ ΠΎΠ±Π° Π»ΠΈΡΡΠ°, ΠΈ Π½ΠΎΠ²ΡΠΉ ΠΏΠ΅ΡΠ°ΡΠ½ΡΠΉ Π»ΠΈΡΡ Π±ΡΠ΄Π΅Ρ ΡΡΡΠ»Π°ΡΡΡΡ Π½Π° Π½ΠΎΠ²ΡΠΉ Π»ΠΈΡΡ.
Π£ ΠΌΠ΅Π½Ρ Π½Π΅Π΄ΠΎΡΡΠ°ΡΠΎΡΠ½ΠΎ ΠΎΡΠΊΠΎΠ² ΡΠ΅ΠΏΡΡΠ°ΡΠΈΠΈ, ΡΡΠΎΠ±Ρ ΠΊΠΎΠΌΠΌΠ΅Π½ΡΠΈΡΠΎΠ²Π°ΡΡ Π΄ΡΡΠ³ΠΈΠ΅ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΡ, ΠΏΠΎΡΡΠΎΠΌΡ Ρ Π΄ΠΎΠ±Π°Π²Π»Ρ «ΠΎΡΠ²Π΅Ρ» Ρ Π½Π΅ΠΊΠΎΡΠΎΡΡΠΌΠΈ ΠΊΠΎΠΌΠΌΠ΅Π½ΡΠ°ΡΠΈΡΠΌΠΈ. Π£ ΠΌΠ΅Π½Ρ Π±ΡΠ»Π° ΡΠ°ΠΊΠ°Ρ ΠΆΠ΅ ΠΈΠ»ΠΈ ΠΏΠΎΡ ΠΎΠΆΠ°Ρ ΠΏΠΎΡΡΠ΅Π±Π½ΠΎΡΡΡ, ΠΈ Ρ ΠΊΠ°ΠΆΠ΄ΠΎΠ³ΠΎ ΠΏΠΎΠ΄Ρ ΠΎΠ΄Π° Π΅ΡΡΡ ΡΠ²ΠΎΠΈ ΠΏΠ»ΡΡΡ ΠΈ ΠΌΠΈΠ½ΡΡΡ.
ΠΠ°ΡΡΡΠΎΠΉΠΊΠ° ΠΎΠ±Π»Π°ΡΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ: ΡΡΠΎ ΠΌΠΎΠΆΠ΅Ρ ΡΠ°Π±ΠΎΡΠ°ΡΡ Π² Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡΠΈ ΠΎΡ ΠΌΠ°ΠΊΠ΅ΡΠ° Π»ΠΈΡΡΠ°, Π½ΠΎ Π½Π΅ ΡΠ»ΠΈΡΠΊΠΎΠΌ Ρ ΠΎΡΠΎΡΠΎ ΠΎΠ±ΡΠ°Π±Π°ΡΡΠ²Π°Π΅Ρ Π½Π΅ΡΠΌΠ΅ΠΆΠ½ΡΠΉ Π²ΡΠ±ΠΎΡ ΠΎΠ±Π»Π°ΡΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ. ΠΠ»ΠΈ, Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎ, ΠΎΠ½ ΡΠΏΡΠ°Π²Π»ΡΠ΅ΡΡΡ Ρ ΡΡΠΈΠΌ ΠΎΡΠ΅Π½Ρ Ρ ΠΎΡΠΎΡΠΎ, Π½ΠΎ Π²ΡΠ±ΡΠ°Π½Π½ΡΠΉ ΠΏΠΎΠ΄Ρ ΠΎΠ΄ Π½Π΅ ΡΠ°Π±ΠΎΡΠ°Π΅Ρ Π² ΠΌΠΎΠ΅ΠΌ ΡΠ»ΡΡΠ°Π΅. ΠΠ°ΠΏΡΠΈΠΌΠ΅Ρ, Π΅ΡΠ»ΠΈ Ρ ΠΌΠ΅Π½Ρ Π΅ΡΡΡ ΡΠ»Π΅ΠΊΡΡΠΎΠ½Π½Π°Ρ ΡΠ°Π±Π»ΠΈΡΠ° ΡΠΎ ΡΡΠΎΠ»Π±ΡΠ°ΠΌΠΈ AE ΠΈ Ρ Ρ ΠΎΡΡ ΡΠΊΡΡΡΡ ΡΡΠΎΠ»Π±ΡΡ B ΠΈ D ΠΏΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ, ΡΠΎΠ³Π΄Π° ΠΊΠ°ΠΆΠ΄ΡΠΉ Π½Π°ΠΏΠ΅ΡΠ°ΡΠ°Π½Π½ΡΠΉ ΡΡΠΎΠ»Π±Π΅Ρ ΠΏΠΎΠΌΠ΅ΡΠ°Π΅ΡΡΡ Π½Π° ΠΎΡΠ΄Π΅Π»ΡΠ½ΡΡ ΡΡΡΠ°Π½ΠΈΡΡ. ΠΠ΅ ΡΠΎΠ²ΡΠ΅ΠΌ ΡΠΎ, ΡΡΠΎ Ρ Ρ ΠΎΡΠ΅Π».
ΠΡΡΡΠΎΠΉ ΡΠ΅ΠΊΡΡ: ΡΡΠΎ ΠΌΠΎΠΆΠ΅Ρ ΡΡΠ°Π±ΠΎΡΠ°ΡΡ Π² Π½Π΅ΠΊΠΎΡΠΎΡΡΡ ΡΠ»ΡΡΠ°ΡΡ , Π½ΠΎ ΠΎΡΡΠ΅ΡΠ΅Π³Π°ΠΉΡΠ΅ΡΡ, ΡΡΠΎ ΡΡΠΎ Π½Π΅ ΠΏΡΠ΅Π΄ΠΎΡΠ²ΡΠ°ΡΠΈΡ ΡΡΠ΅ΡΠΊΡ ΡΠΊΡΡΡΡΡ Π΄Π°Π½Π½ΡΡ . ΠΡΠ»ΠΈ Π²Ρ ΠΏΡΡΠ°Π΅ΡΠ΅ΡΡ ΡΠΊΡΡΡΡ ΠΊΠΎΠ½ΡΠΈΠ΄Π΅Π½ΡΠΈΠ°Π»ΡΠ½ΡΡ ΠΈΠ½ΡΠΎΡΠΌΠ°ΡΠΈΡ, ΠΈΠΌΠ΅ΠΉΡΠ΅ Π² Π²ΠΈΠ΄Ρ, ΡΡΠΎ ΠΏΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ Π² PDF Π΄Π°Π½Π½ΡΠ΅ Π²ΡΠ΅ ΡΠ°Π²Π½ΠΎ Π±ΡΠ΄ΡΡ ΠΏΡΠΈΡΡΡΡΡΠ²ΠΎΠ²Π°ΡΡ Π² PDF-ΡΠ°ΠΉΠ»Π΅. ΠΠ°ΠΆΠ΅ Π΅ΡΠ»ΠΈ ΠΎΠ½ ΠΏΡΡΡΠΎΠΉ Π½Π° ΠΏΡΡΡΠΎΠΌ ΠΌΠ΅ΡΡΠ΅, ΠΎΠ½ Π²ΡΠ΅ ΡΠ°Π²Π½ΠΎ ΠΏΡΠΈΡΡΡΡΡΠ²ΡΠ΅Ρ ΠΈ ΠΌΠΎΠΆΠ΅Ρ Π±ΡΡΡ ΡΠΊΠΎΠΏΠΈΡΠΎΠ²Π°Π½ ΠΈ Π²ΡΡΠ°Π²Π»Π΅Π½ ΠΈΠ· PDF-ΡΠ°ΠΉΠ»Π°.
Π― ΠΏΡΠ΅Π΄ΠΏΠΎΡΠΈΡΠ°Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ ΠΌΠ°ΠΊΡΠΎΡΡ Π΄Π»Ρ ΡΠΊΡΡΡΠΈΡ Π²ΡΠ±ΡΠ°Π½Π½ΡΡ ΡΡΠΎΠ»Π±ΡΠΎΠ² ΠΏΡΠΈ ΠΏΠ΅ΡΠ°ΡΠΈ, Ρ ΠΎΡΡ Ρ Π·Π½Π°Ρ, ΡΡΠΎ ΡΡΠΎ ΠΌΠΎΠΆΠ΅Ρ Π±ΡΡΡ Π½Π΅ΠΏΡΠΈΠΌΠ΅Π½ΠΈΠΌΠΎ ΠΈΠ»ΠΈ Π½Π΅ Π»ΡΡΡΠΈΠΉ Π²Π°ΡΠΈΠ°Π½Ρ Π²ΠΎ Π²ΡΠ΅Ρ ΡΠΈΡΡΠ°ΡΠΈΡΡ .
ΠΡΠ»ΠΈ ΡΠ΅Π»ΠΊΠ½ΡΡΡ ΠΏΡΠ°Π²ΠΎΠΉ ΠΊΠ½ΠΎΠΏΠΊΠΎΠΉ ΠΌΡΡΠΈ Π½Π° ΡΡΡΠΎΠΊΠ΅/ΡΡΠΎΠ»Π±ΡΠ΅ ΠΈ Π²ΡΠ±ΡΠ°ΡΡ «Π‘ΠΊΡΡΡΡ», ΠΌΠΎΠΆΠ½ΠΎ «ΡΠΊΡΡΡΡ» Π²ΡΡ ΡΡΡΠΎΠΊΡ/ΡΡΠΎΠ»Π±Π΅Ρ. Π ΡΡΠΎΠΌ ΡΠ»ΡΡΠ°Π΅ ΡΡΡΠΎΠΊΠ°/ΡΡΠΎΠ»Π±Π΅Ρ Π½Π΅ Π±ΡΠ΄Π΅Ρ ΠΏΠ΅ΡΠ°ΡΠ°ΡΡΡΡ (ΠΈΠ»ΠΈ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°ΡΡΡΡ). ΠΠΎΠΆΠ½ΠΎ Π²ΡΠ΄Π΅Π»ΠΈΡΡ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΎ ΡΡΡΠΎΠΊ/ΡΡΠΎΠ»Π±ΡΠΎΠ² ΠΏΡΡΠ΅ΠΌ ΠΏΠ΅ΡΠ΅ΡΠ°ΡΠΊΠΈΠ²Π°Π½ΠΈΡ, Π΅ΡΠ»ΠΈ ΠΎΠ½ΠΈ Π½Π°Ρ ΠΎΠ΄ΡΡΡΡ ΡΡΠ΄ΠΎΠΌ Π΄ΡΡΠ³ Ρ Π΄ΡΡΠ³ΠΎΠΌ, ΠΈΠ»ΠΈ ΡΠ΅Π»ΡΠΊΠΎΠΌ ΠΈ ΠΏΠ΅ΡΠ΅ΡΠ°ΡΠΊΠΈΠ²Π°Π½ΠΈΠ΅ΠΌ, Π΅ΡΠ»ΠΈ ΠΎΠ½ΠΈ Π½Π΅ Π½Π°Ρ ΠΎΠ΄ΡΡΡΡ ΡΡΠ΄ΠΎΠΌ Π΄ΡΡΠ³ Ρ Π΄ΡΡΠ³ΠΎΠΌ. ΠΠΎΠΌΠ΅Ρ/Π±ΡΠΊΠ²Π° ΡΡΠΎΠ»Π±ΡΠ° ΠΈΠ»ΠΈ ΡΡΡΠΎΠΊΠΈ Π½Π΅ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅ΡΡΡ, Π΅ΡΠ»ΠΈ ΡΡΠΎΠ»Π±Π΅Ρ ΠΈΠ»ΠΈ ΡΡΡΠΎΠΊΠ° ΡΠΊΡΡΡΡ. ΠΡΠ±Π΅ΡΠΈΡΠ΅ ΡΡΡΠΎΠΊΠΈ ΠΈ ΡΡΠΎΠ»Π±ΡΡ Ρ ΠΎΠ±Π΅ΠΈΡ ΡΡΠΎΡΠΎΠ½, ΡΠ΅Π»ΠΊΠ½ΠΈΡΠ΅ ΠΏΡΠ°Π²ΠΎΠΉ ΠΊΠ½ΠΎΠΏΠΊΠΎΠΉ ΠΌΡΡΠΈ ΠΈ Π²ΡΠ±Π΅ΡΠΈΡΠ΅ «ΠΠΎΠΊΠ°Π·Π°ΡΡ».
Π― Π½Π΅ ΡΠ²Π΅ΡΠ΅Π½, ΡΡΠΎ ΠΌΠΎΠΆΠ½ΠΎ ΡΠ΄Π΅Π»Π°ΡΡ Π΄Π»Ρ ΠΏΡΠ΅Π΄ΠΎΡΠ²ΡΠ°ΡΠ΅Π½ΠΈΡ ΠΏΠ΅ΡΠ°ΡΠΈ ΠΎΡΠ΄Π΅Π»ΡΠ½ΡΡ ΡΡΠ΅Π΅ΠΊ, ΠΊΡΠΎΠΌΠ΅ ΠΊΠ°ΠΊ ΠΈΠ·ΠΌΠ΅Π½ΠΈΡΡ ΡΠ²Π΅Ρ ΡΡΠΈΡΡΠ°. ΠΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎ, ΡΡΠΎ ΠΌΠΎΠΆΠ½ΠΎ Π°Π²ΡΠΎΠΌΠ°ΡΠΈΠ·ΠΈΡΠΎΠ²Π°ΡΡ Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΡΡΠ»ΠΎΠ²Π½ΠΎΠ³ΠΎ ΡΠΎΡΠΌΠ°ΡΠΈΡΠΎΠ²Π°Π½ΠΈΡ.
Π’Π°ΠΊΠΆΠ΅ ΠΌΠΎΠΆΠ½ΠΎ ΡΠΊΡΡΡΡ ΡΡΠΎΠ»Π±ΡΡ ΠΈΠ»ΠΈ ΡΡΡΠΎΠΊΠΈ, ΠΊΠ°ΠΊ ΠΎΠΏΠΈΡΠ°Π½ΠΎ Π²ΡΡΠ΅. ΠΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»ΡΡΠΊΠΈΠ΅ ΠΏΡΠ΅Π΄ΡΡΠ°Π²Π»Π΅Π½ΠΈΡ ΠΌΠΎΠΆΠ½ΠΎ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ Π΄Π»Ρ ΠΏΡΠΈΠΌΠ΅Π½Π΅Π½ΠΈΡ ΠΈ ΠΎΡΠΌΠ΅Π½Ρ ΡΠΎΠ³ΠΎ, ΡΡΠΎ Π²Ρ Π½Π΅ Ρ ΠΎΡΠΈΡΠ΅ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°ΡΡ.
ΠΠ°ΠΏΡΠΈΠΌΠ΅Ρ, Π΅ΡΠ»ΠΈ Π²Ρ Ρ ΠΎΡΠΈΡΠ΅ Π²ΡΠ²Π΅ΡΡΠΈ ΠΎΠ΄ΠΈΠ½ ΡΡΠΎΠ»Π±Π΅Ρ Π΄Π»Ρ ΠΏΠΎΡΡΠ°Π²ΡΠΈΠΊΠ°, Π΄ΡΡΠ³ΠΎΠΉ — Π΄Π»Ρ ΡΠΊΠ»Π°Π΄Π°, Π° ΡΡΠ΅ΡΠΈΠΉ ΠΏΠΎΠΊΠ°Π·ΡΠ²Π°Π΅Ρ Π²ΡΠ΅, Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΎΠ·Π΄Π°ΡΡ ΠΈΠ½Π΄ΠΈΠ²ΠΈΠ΄ΡΠ°Π»ΡΠ½ΠΎΠ΅ ΠΏΡΠ΅Π΄ΡΡΠ°Π²Π»Π΅Π½ΠΈΠ΅ Π΄Π»Ρ ΠΊΠ°ΠΆΠ΄ΠΎΠ³ΠΎ ΡΠΈΠΏΠ°.
ΠΡΠ΅ ΠΎΠ΄ΠΈΠ½ ΠΏΡΠΎΡΡΠΎΠΉ ΡΠΏΠΎΡΠΎΠ± — Π²ΡΠ΅ΠΌΠ΅Π½Π½ΠΎ ΠΎΡΠΈΡΡΠΈΡΡ ΡΠΎΠ΄Π΅ΡΠΆΠΈΠΌΠΎΠ΅ ΡΡΠ΅ΠΉΠΊΠΈ, Π²ΡΠ΄Π΅Π»ΠΈΠ² Π²ΡΠ΄Π΅Π»Π΅Π½Π½ΡΠ΅ ΡΡΠ΅ΠΉΠΊΠΈ — ΡΠ΅Π»ΠΊΠ½ΠΈΡΠ΅ ΠΏΡΠ°Π²ΠΎΠΉ ΠΊΠ½ΠΎΠΏΠΊΠΎΠΉ ΠΌΡΡΠΈ ΠΈ Π²ΡΠ±Π΅ΡΠΈΡΠ΅ ΠΏΡΠ½ΠΊΡ «ΠΡΠΈΡΡΠΈΡΡ ΡΠΎΠ΄Π΅ΡΠΆΠΈΠΌΠΎΠ΅».
Π’Π΅ΠΏΠ΅ΡΡ Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΏΠ΅ΡΠ°ΡΠ°ΡΡ, Π° Π·Π°ΡΠ΅ΠΌ Π½Π°ΠΆΠΌΠΈΡΠ΅ «ΠΡΠΌΠ΅Π½Π°», ΠΏΠΎΡΠ»Π΅ ΡΠ΅Π³ΠΎ Π²ΡΠ΅ Π²Π΅ΡΠ½Π΅ΡΡΡ Π½Π° ΠΊΡΡΠ³ΠΈ ΡΠ²ΠΎΡ.
Π£Π΄Π°Π»Π΅Π½ΠΈΠ΅ (ΡΠΊΡΡΡΠΈΠ΅) ΡΡΡΠΎΠΊ ΠΏΠΎ ΡΡΠ»ΠΎΠ²ΠΈΡ
Π‘ ΠΏΠΎΠΌΠΎΡΡΡ ΡΡΠΎΠ³ΠΎ ΠΌΠ°ΠΊΡΠΎΡΠ° ΠΌΠΎΠΆΠ½ΠΎ ΡΠ΄Π°Π»ΠΈΡΡ Π²ΡΠ΅ ΡΡΡΠΎΠΊΠΈ Π»ΠΈΡΡΠ°, ΠΊΠΎΡΠΎΡΡΠ΅ ΡΠΎΠ΄Π΅ΡΠΆΠ°Ρ ΠΈΡΠΊΠΎΠΌΡΠΉ ΡΠ΅ΠΊΡΡ:
Π§ΡΠΎΠ±Ρ ΠΏΡΠΎΡΡΠΎ ΡΠΊΡΡΡΡ ΡΡΠΈ ΡΡΡΠΎΠΊΠΈ Π²ΠΌΠ΅ΡΡΠΎ ΡΠ΄Π°Π»Π΅Π½ΠΈΡ, Π·Π°ΠΌΠ΅Π½ΠΈΡΠ΅ ΡΡΡΠΎΠΊΡ
Π Π°ΡΡΠΈΡΠ΅Π½Π½Π°Ρ Π²Π΅ΡΡΠΈΡ ΡΡΠΎΠ³ΠΎ ΠΌΠ°ΠΊΡΠΎΡΠ° — Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ΠΌ ΡΠΎΡΠΌΡ UserForm Π΄Π»Ρ Π²Π²ΠΎΠ΄Π° Π·Π½Π°ΡΠ΅Π½ΠΈΡ Π΄Π»Ρ ΠΏΠΎΠΈΡΠΊΠ°
Π‘Π»Π΅Π΄ΡΡΡΠΈΠΉ ΠΊΠΎΠ΄ ΠΏΠΎΠ·Π²ΠΎΠ»ΡΠ΅Ρ ΠΈΡΠΊΠ°ΡΡ (Π° Π·Π°ΡΠ΅ΠΌ ΡΠ΄Π°Π»ΡΡΡ ΠΈΠ»ΠΈ ΡΠΊΡΡΠ²Π°ΡΡ) Π½Π΅ΠΊΠΎΡΠΎΡΡΠ΅ ΡΡΠ»ΠΎΠ²ΠΈΡ:
ConditionalRowsDeleting.xls | 24 ΠΠ |
ConditionalRowsDeletingUsingUserform.xls | 45.5 ΠΠ |
- 223034 ΠΏΡΠΎΡΠΌΠΎΡΡΡ
ΠΠΎΠΌΠΌΠ΅Π½ΡΠ°ΡΠΈΠΈ
Π― Π½Π΅ Π·Π°Π½ΠΈΠΌΠ°ΡΡΡ ΠΏΠΎΠ΄Π΄Π΅ΡΠΆΠΊΠΎΠΉ Π±Π΅ΡΠΏΠ»Π°ΡΠ½ΡΡ ΠΌΠ°ΠΊΡΠΎΡΠΎΠ² ΠΈΠ»ΠΈ ΠΈΠ·ΠΌΠ΅Π½Π΅Π½ΠΈΠ΅ΠΌ ΠΈΡ ΠΏΠΎ Π²Π°ΡΠ΅ΠΌΡ Π²ΠΊΡΡΡ.
Π ΠΊΠΎΠΌΠΌΠ΅Π½ΡΠ°ΡΠΈΡΡ
ΠΊ ΡΡΠ°ΡΡΠ΅ Π΅ΡΡΡ ΠΎΡΠ΅Π½Ρ ΠΌΠ½ΠΎΠ³ΠΎ Π²Π°ΡΠΈΠ°Π½ΡΠΎΠ² ΠΏΠ΅ΡΠ΅Π΄Π΅Π»ΠΊΠΈ ΡΡΠΎΠ³ΠΎ ΠΌΠ°ΠΊΡΠΎΡΠ°, — ΠΏΠΎΠ»ΠΈΡΡΠ°ΠΉΡΠ΅ ΠΊΠΎΠΌΠΌΠ΅Π½ΡΡ, ΠΌΠΎΠΆΠ΅Ρ Π½Π°ΠΉΠ΄Π΅ΡΠ΅ ΠΏΠΎΠ΄Ρ
ΠΎΠ΄ΡΡΠΈΠΉ Π²Π°ΡΠΈΠ°Π½Ρ ΠΊΠΎΠ΄Π°.
ΠΡΠ»ΠΈ ΠΆΠ΅ Ρ
ΠΎΡΠΈΡΠ΅ ΠΏΠΎΠ»ΡΡΠΈΡΡ Π³ΠΎΡΠΎΠ²ΠΎΠ΅ ΡΠ΅ΡΠ΅Π½ΠΈΠ΅, — ΠΎΡΠΎΡΠΌΠ»ΡΠΉΡΠ΅ Π·Π°ΠΊΠ°Π· Π½Π° ΡΠ°ΠΉΡΠ΅, ΡΠ΄Π΅Π»Π°Ρ (ΠΏΠ»Π°ΡΠ½ΠΎ. ΠΌΠΈΠ½ΠΈΠΌΠ°Π»ΡΠ½Π°Ρ ΡΡΠΎΠΈΠΌΠΎΡΡΡ Π·Π°ΠΊΠ°Π·Π° 1500 ΡΡΠ±Π»Π΅ΠΉ)
ΠΠΎΠΌΠΌΠ΅Π½ΡΠ°ΡΠΈΠΈ ΠΊ ΡΡΠΎΠΉ ΡΡΠ°ΡΡΠ΅ Π² Π½Π°ΡΡΠΎΡΡΠ΅Π΅ Π²ΡΠ΅ΠΌΡ Π½Π΅ ΠΏΡΠΈΠ½ΠΈΠΌΠ°ΡΡΡΡ.
ΠΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΠΏΠΎΡΠΎΠ²Π΅ΡΡΠΉΡΠ΅ ΠΌΠ½Π΅. ΠΠΎΠ΅ Π·Π΄ΠΎΡΠΎΠ²ΡΠ΅ ΡΡ ΡΠ΄ΡΠ°Π΅ΡΡΡ Π² ΡΠ΅ΡΠ΅Π½ΠΈΠ΅ ΠΏΠΎΡΠ»Π΅Π΄Π½Π΅ΠΉ Π½Π΅Π΄Π΅Π»ΠΈ. Π― Π½Π΅ ΠΌΠΎΠ³Ρ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°ΡΡ ΡΡΡΠ΅ΡΡΠ²ΡΡΡΠΈΠ΅ ΠΌΠ°ΠΊΡΠΎΡΡ, ΡΡΠΎΠ±Ρ ΡΠΊΡΡΡΡ ΡΡΡΠΎΠΊΠΈ. Π£ ΠΌΠ΅Π½Ρ Π΅ΡΡΡ ΡΠ°Π±Π»ΠΈΡΠ° Ρ ΡΠΈΡΠ»Π°ΠΌΠΈ. Π ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»ΡΡΠΊΠΎΠΉ ΡΠΎΡΠΌΠ΅ Π½ΡΠΆΠ½ΠΎ Π²Π²Π΅ΡΡΠΈ ΡΡΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅, ΠΈ Π΄ΠΎΠ»ΠΆΠ½Π° Π±ΡΡΡ ΠΊΠ½ΠΎΠΏΠΊΠ° ΡΠΊΡΡΡΠΈΡ ΠΈ ΠΏΠΎΠΊΠ°Π·Π°. ΠΠΎΠΌΠΎΠ³ΠΈΡΠ΅ ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°. Π’Π°ΠΊΠΆΠ΅ ΠΌΠΎΠΆΠ½ΠΎ ΠΈΠΌΠ΅ΡΡ ΡΠ°Π·Π½ΠΎΠ΅ ΠΊΠΎΠ»ΠΈΡΠ΅ΡΡΠ²ΠΎ ΡΡΡΠΎΠΊ. Π ΡΠΈΡΡΠΎΠ²ΡΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΡ Π½Π°ΡΠΈΠ½Π°ΡΡΡΡ ΡΠΎ Π²ΡΠΎΡΠΎΠΉ ΡΡΡΠΎΠΊΠΈ.
ΠΠ΄ΡΠ°Π²ΡΡΠ²ΡΠΉΡΠ΅, Ρ ΠΌΠ΅Π½Ρ ΡΠ°ΠΊΠ°Ρ ΡΠΈΡΡΠ°ΡΠΈΡ. ΠΡΡΡ ΡΠ°Π±Π»ΠΈΡΠ°, Ρ 3000 ΡΡΡΠΎΠΊΠ°ΠΌΠΈ, ΠΈ ΠΏΡΠΈΠΌΠ΅ΡΠ½ΠΎ 25 ΡΡΠΎΠ»Π±ΠΈΠΊΠ°ΠΌΠΈ
ΠΠ΅ΡΠ²ΡΠ΅ 10 ΡΡΠΎΠ»Π±ΠΈΠΊΠΎΠ² Π·Π°ΠΏΠΎΠ»Π½Π΅Π½Ρ ΡΠ΅ΠΊΡΡΠΎΠΌ, Ρ 11 ΠΏΠΎ 25 ΡΡΠΎΠ»Π±ΠΈΠΊ Π±ΡΠ²Π°ΡΡ ΡΠΈΡΡΡ. ΠΠ°ΠΊ ΠΌΠ½Π΅ ΡΠ΄Π°Π»ΠΈΡΡ ΠΏΠΎΠ»Π½ΠΎΡΡΡΡ ΡΡΡΠΎΠΊΡ, Π΅ΡΠ»ΠΈ Π² ΡΡΠΎΠ»Π±ΠΈΠΊΠΈ Ρ 11 ΠΏΠΎ 25 Π²ΡΠ΅ ΠΏΡΡΡΡΠ΅ ΡΡΠ΅ΠΉΠΊΠΈ ? Π° Π΅ΡΠ»ΠΈ Ρ
ΠΎΡΡ ΠΎΠ΄Π½Π° ΡΡΠ΅ΠΉΠΊΠ° Π·Π°ΠΏΠΎΠ»Π½Π΅Π½Π°, ΡΠΎ ΡΡΡΠΎΠΊΡ Π½Π΅ ΡΡΠΎΠ³Π°ΡΡ? Π½ΠΎ Π½Π° ΠΏΠ΅ΡΠ²ΡΠ΅ Π΄Π΅ΡΡΡΡ ΡΡΠΎΠ»Π±ΠΈΠΊΠΎΠ² Π½Π΅ Π½Π°Π΄ΠΎ ΠΎΠ±ΡΠ°ΡΠ°ΡΡ Π²Π½ΠΈΠΌΠ°Π½ΠΈΠ΅
ΠΠ°ΠΊ ΡΠΎΠ·Π΄Π°ΡΡ ΡΠ°ΠΊΠΎΠ΅ ΠΆΠ΅ ΡΡΠ»ΠΎΠ²ΠΈΠ΅ Π΄Π»Ρ ΠΎΠ±ΡΠ΅Π΄ΠΈΠ½Π΅Π½Π½ΡΡ ΡΡΠ΅Π΅ΠΊ, Π½ΠΎ Ρ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΈΠΌΠΈ Π·Π½Π°ΡΠ΅Π½ΠΈΡΠΌΠΈ?
Π― Π΄ΠΎΠ»ΠΆΠ΅Π½ Π±ΡΠ» Π΄ΠΎΠ³Π°Π΄Π°ΡΡΡΡ, ΠΊΠ°ΠΊΠΈΠ΅ Π»ΠΈΡΡΡ Π½Π°Π΄ΠΎ ΠΎΠ±ΡΠ°Π±Π°ΡΡΠ²Π°ΡΡ, Π° ΠΊΠ°ΠΊΠΈΠ΅ Π½Π΅Ρ?
Π§ΡΠΎΠ±Ρ ΠΎΠ±ΡΠ°Π±ΠΎΡΠ°ΡΡ ΠΠ‘Π Π»ΠΈΡΡΡ, — Π½Π°ΠΏΠΈΡΠΈΡΠ΅
ΠΡ ΡΠ°ΠΊ Π΄ΠΎΠ±ΡΡ, Π½ΠΎ Ρ Π½Π΅ ΠΌΠΎΠ³Ρ Π½Π°ΠΉΡΠΈ «3», «3Π», «3Π» ΠΈΠ»ΠΈ «4».
ΠΠΎΠ΄ΡΠΊΠ°ΠΆΠΈΡΠ΅, ΠΊΠ°ΠΊ ΡΠ΄Π΅Π»Π°ΡΡ ΡΡΠΎΡ ΠΌΠ°ΠΊΡΠΎΡ Π΄Π»Ρ Π»ΠΈΡΡΠΎΠ² «2», «2A», «2B» ΠΈ Ρ. Π΄.?
Sub Π£Π΄Π°Π»Π΅Π½ΠΈΠ΅Π‘ΡΡΠΎΠΊΠΠΎΠ£ΡΠ»ΠΎΠ²ΠΈΡ()
Dim ra As Range, delra As Range, Π’Π΅ΠΊΡΡΠΠ»ΡΠΠΎΠΈΡΠΊΠ° As String
Application.ScreenUpdating = False ‘ ΠΎΡΠΊΠ»ΡΡΠ°Π΅ΠΌ ΠΎΠ±Π½ΠΎΠ²Π»Π΅Π½ΠΈΠ΅ ΡΠΊΡΠ°Π½Π°
TextFind = «Hostname» ‘ ΡΠ΄Π°Π»ΡΠ΅Ρ ΡΡΡΠΎΠΊΠΈ Ρ ΡΡΠΈΠΌ ΡΠ΅ΠΊΡΡΠΎΠΌ
‘ ΠΏΠ΅ΡΠ΅Π±ΠΈΡΠ°Π΅ΠΌ Π²ΡΠ΅ ΡΡΡΠΎΠΊΠΈ Π² ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΠΌΠΎΠΌ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π΅ Π»ΠΈΡΡΠ°
For Each ra In ActiveSheet.UsedRange.Rows
‘ Π΅ΡΠ»ΠΈ Π² ΡΡΡΠΎΠΊΠ΅ Π½Π°ΠΉΠ΄Π΅Π½ ΠΈΡΠΊΠΎΠΌΡΠΉ ΡΠ΅ΠΊΡΡ
If Not ra.Find(Π’Π΅ΠΊΡΡΠΠ»ΡΠΠΎΠΈΡΠΊΠ°, , xlValues, xlPart) Is Nothing Then
‘ Π΄ΠΎΠ±Π°Π²Π»ΡΠ΅ΠΌ ΡΡΡΠΎΠΊΡ Π² Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ Π΄Π»Ρ ΡΠ΄Π°Π»Π΅Π½ΠΈΡ
If delra Is Nothing Then Set delra = ra Else Set delra = Union(delra, ra)
End If
Next
‘ Π΅ΡΠ»ΠΈ ΠΏΠΎΠ΄Ρ
ΠΎΠ΄ΡΡΠΈΠ΅ ΡΡΡΠΎΠΊΠΈ Π½Π°ΠΉΠ΄Π΅Π½Ρ — ΡΠ΄Π°Π»ΡΠ΅ΠΌ ΠΈΡ
If Not delra Is Nothing Then delra.EntireRow.Delete
End Sub
ΠΡΠ»ΠΈ Π½Π΅ΠΎΠ±Ρ
ΠΎΠ΄ΠΈΠΌΠΎ Π½Π°ΠΎΠ±ΠΎΡΠΎΡ ΠΎΡΠΎΠ±ΡΠ°Π·ΠΈΡΡ ΡΡΡΠΎΠΊΠΈ «EntireRow.Hidden = False»
Π’ΠΎ ΠΊΠ°ΠΊ ΠΎΡΡΡΠ΅ΡΡΠ²ΠΈΡΡ ΠΏΠΎΠΈΡΠΊ ΡΠ΅ΠΊΡΡΠ° Π² ΡΠΊΡΡΡΡΡ
ΡΡΡΠΎΠΊΠ°Ρ
/ΡΡΠΎΠ»Π±ΡΠ°Ρ
?
ΠΠ΄ΡΠ°Π²ΡΡΠ²ΡΠΉΡΠ΅. ΠΠΎΠ΄ΡΠΊΠ°ΠΆΠΈΡΠ΅, ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΠΊΠ°ΠΊ ΠΏΡΠΎΠΏΠΈΡΠ°ΡΡ ΠΌΠ°ΠΊΡΠΎΡ ΡΠ°ΠΊ, ΡΡΠΎΠ± ΠΎΠ½:
1. ΡΠ΄Π°Π»ΡΠ» Π²ΡΠ΅ ΡΡΡΠΎΠΊΠΈ Ρ Π·Π°Π»ΠΈΠ²ΠΊΠΎΠΉ ΡΠ²Π΅ΡΠΎΠΌ, ΠΈΠ»ΠΈ
2. ΡΠ΄Π°Π»ΡΠ» Π²ΡΠ΅ ΡΡΡΠΎΠΊΠΈ, ΡΠΎΠ΄Π΅ΡΠΆΠ°ΡΠΈΠ΅ ΠΊΠ°ΠΊΡΡ Π»ΠΈΠ±ΠΎ ΡΡΠ΅ΠΉΠΊΡ Ρ Π·Π°Π»ΠΈΠ²ΠΊΠΎΠΉ ΡΠ²Π΅ΡΠΎΠΌ.
Π‘ΠΏΠ°ΡΠΈΠ±ΠΎ.
ΠΠ³ΠΎΡΡ, ΡΠΏΠ°ΡΠΈΠ±ΠΎ Π·Π° ΠΌΠ°ΠΊΡΠΎΡ — ΠΎΠ½ ΠΎΠ±Π»Π΅Π³ΡΠ°Π΅Ρ ΠΆΠΈΠ·Π½Ρ! ΠΡΡΡ Π»ΠΈ Ρ Π²Π°Ρ ΡΠΎΠ²Π΅Ρ, ΠΊΠ°ΠΊ ΡΠ°Π±ΠΎΡΠ°ΡΡ Ρ ΡΡΠΈΠΌ ΠΌΠ°ΠΊΡΠΎΡΠΎΠΌ, Π·Π°ΡΠΈΡΠ°Ρ Π»ΠΈΡΡ?
ΠΠΎΠ±ΡΡΠΉ Π΄Π΅Π½Ρ! ΠΠΎΠ΄ΡΠΊΠ°ΠΆΠΈΡΠ΅ ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΠΠ°ΠΊ ΡΠ΄Π΅Π»Π°ΡΡ ΠΌΠ°ΠΊΡΠΎΡ ΡΠΊΡΡΠ²Π°ΡΡΠΈΠΉ ΡΡΡΠΎΠΊΠΈ ΠΏΡΠΈ ΡΡΠ»ΠΎΠ²ΠΈΠΈ ΡΡΠΎ Π² Π΄Π²ΡΡ
ΠΏΠΎΠ΄ΡΡΠ΄ ΡΡΠΎΠ»Π±ΡΠ°Ρ
0 ΠΈΠ»ΠΈ ΠΏΡΡΡΠΎ? ΠΈ ΡΡΠΎΠ± ΠΎΠ½ Π·Π°ΠΏΡΡΠΊΠ°Π»ΡΡ Π½Π΅ ΠΏΡΠΈ ΠΎΡΠΊΡΡΡΠΈΠΈ ΡΠ°ΠΉΠ»Π°, Π° ΠΊΠ½ΠΎΠΏΠΊΠΎΠΉ?
Ρ ΠΌΠ΅Π½Ρ Π²Π°ΡΠΈΠ°Π½Ρ Ρ ΡΡΠ»ΠΎΠ²ΠΈΠ΅ΠΌ ΠΎΠ΄Π½ΠΎΠ³ΠΎ ΡΡΠΎΠ»Π±ΡΠ°, ΠΊΠ°ΠΊ Π΅Π³ΠΎ ΠΈΡΠΏΡΠ°Π²ΠΈΡΡ
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim d As Integer
d = UsedRange.Rows.Count + 1
For rwIndex = 1 To 31
colIndex = 3
If Cells(rwIndex, colIndex).Value = 0 Then
Rows(rwIndex).Hidden = True
End If
Next
End Sub
ΠΡΠ΄Ρ ΠΎΡΠ΅Π½Ρ Π±Π»Π°Π³ΠΎΠ΄Π°ΡΠ½Π°:)
ΠΠ΄ΡΠ°Π²ΡΡΠ²ΡΠΉΡΠ΅! ΠΠΎΠ»ΠΈΡΠ΅ΡΡΠ²ΠΎ Π±ΠΎΠ»ΡΡΠΈΡ ΡΠ°Π±Π»ΠΈΡ ΡΠ°ΡΡΠΎ Π²ΡΠ·ΡΠ²Π°Π΅Ρ Ρ ΠΌΠ΅Π½Ρ ΠΏΡΠΎΠ±Π»Π΅ΠΌΡ) Π ΠΎΠ΄Π½ΠΎΠΉ ΠΊΠ½ΠΈΠ³Π΅ Ρ ΠΌΠ΅Π½Ρ 25 Π»ΠΈΡΡΠΎΠ² Π½Π° ΠΊΠ°ΠΆΠ΄ΠΎΠΉ Π±ΠΎΠ»ΡΡΠΎΠΉ ΡΠ°Π±Π»ΠΈΡΠ΅, Π΄Π»Ρ ΡΠ΄ΠΎΠ±ΡΡΠ²Π° ΠΏΠ΅ΡΠ°ΡΠΈ Ρ ΡΠΎΠ·Π΄Π°Π» ΠΌΠ°ΠΊΡΠΎΡ, ΠΊΠΎΡΠΎΡΡΠΉ ΡΠΊΡΡΠ²Π°Π΅Ρ Π½Π΅Π½ΡΠΆΠ½ΡΠ΅ ΡΡΡΠΎΠΊΠΈ, ΡΡΠΎΠ»Π±ΡΡ ΠΈ ΡΡΠ΅ΠΉΠΊΠΈ ΠΏΠΎ ΠΎΡΠ΅ΡΠ΅Π΄ΠΈ Π½Π° ΠΊΠ°ΠΆΠ΄ΠΎΠΌ Π»ΠΈΡΡΠ΅ Π²ΠΎ Π²ΡΠ΅ΠΉ ΠΊΠ½ΠΈΠ³Π΅. Π― Ρ ΠΎΡΡ ΠΈΠΌΠ΅ΡΡ Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎΡΡΡ ΡΠ°Π·Π²Π΅ΡΠ½ΡΡΡ ΡΠΊΡΡΡΡΠ΅ ΡΡΠ΅ΠΉΠΊΠΈ Π²ΠΎ Π²ΡΠ΅ΠΉ ΠΊΠ½ΠΈΠ³Π΅ ΠΎΠ΄Π½ΠΈΠΌ ΠΌΠ°Ρ ΠΎΠΌ. Π Ρ Π½Π΅ ΠΌΠΎΠ³Ρ) ΠΠ°ΠΊ ΠΈΡΠΏΡΠ°Π²ΠΈΡΡ ΡΡΠΎΡ ΠΌΠ°ΠΊΡΠΎΡ, ΡΡΠΎΠ±Ρ ΠΎΠ½ ΡΠ°Π±ΠΎΡΠ°Π» Π² ΠΌΠΎΠ΄ΡΠ»Π΅ «ΠΡΠ° ΠΊΠ½ΠΈΠ³Π°» Π΄Π»Ρ Π²ΡΠ΅Ρ Π»ΠΈΡΡΠΎΠ² ΡΡΠ°Π·Ρ
Sub Show()
Columns.Hidden = False
Rows.Hidden = False
ΠΡΠ°Ρ Π½Π°Π·Π½Π°ΡΠΈΠ», ΡΠΏΠ°ΡΠΈΠ±ΠΎ Π±ΠΎΠ»ΡΡΠΎΠ΅! Π ΠΈΠ·Π²ΠΈΠ½ΠΈΡΠ΅ Π·Π° Π½Π΅ΠΊΠΎΡΡΠ΅ΠΊΡΠ½ΠΎΡΡΡ:)
Π‘Π°Π½Π΄Π΅Ρ, Ρ Π½Π°ΠΏΠΈΡΠ°Π» ΠΊΠΎΠ΄ ΡΠ°ΠΊ, ΠΊΠ°ΠΊ Π²Ρ ΠΏΡΠΎΡΠΈΠ»ΠΈ, — Π΅ΡΠ»ΠΈ Π² ΡΡΠ΅ΠΉΠΊΠ΅ ΠΏΡΠΈΡΡΡΡΡΠ²ΡΠ΅Ρ ΡΠΈΡΡΠ°, ΡΠΎ ΡΡΡΠΎΠΊΠ° ΡΠ΄Π°Π»ΡΠ΅ΡΡΡ.
Π Π²Π°ΠΌ Π½Π°Π΄ΠΎ Π±ΡΠ»ΠΎ ΡΠ΄Π°Π»ΡΡΡ ΡΠΎΠ»ΡΠΊΠΎ ΡΡΠ΅ΠΉΠΊΠΈ Ρ Π§ΠΠ‘ΠΠΠ (Π° Π½Π΅ ΡΠΎΠ΄Π΅ΡΠΆΠ°ΡΠΈΠ΅ ΡΠΈΡΡΡ)
ΠΠ°ΠΌΠ΅Π½ΠΈΡΠ΅
Π£Π²Ρ. Π°Π½Π°Π»ΠΎΠ³ΠΈΡΠ½ΠΎ ΡΠ°Π±ΠΎΡΠ°Π΅Ρ «Π£Π΄Π°Π»ΠΈΡΡ (ΡΠΊΡΡΡΡ) ΡΡΡΠΎΠΊΠΈ ΠΏΠΎ ΡΡΠ»ΠΎΠ²ΠΈΡ», ΡΠΎ Π΅ΡΡΡ, Π΅ΡΠ»ΠΈ ΠΏΡΠΈΡΡΡΡΡΠ²ΡΠ΅Ρ ΡΠ΅ΠΊΡΡ, ΡΠΊΠ°ΠΆΠ΅ΠΌ, «ΠΠ΄Π°ΠΏΡΠ΅Ρ AT-2000 14 B22» — ΡΡΠΎ ΡΠ°ΠΌ, ΡΡΠΎ Π² Π²Π°ΡΠ΅ΠΌ ΠΏΡΠΈΠΌΠ΅ΡΠ΅ ΡΠ΄Π°Π»ΡΠ΅ΡΡΡ ΡΡΡΠΎΠΊΠ°. ΠΡΡΠ»Ρ — ΡΠΈΡΠ»Π° ΡΠΎΠ΄Π΅ΡΠΆΠ°Ρ ΡΡΠΎ-ΡΠΎ Π»ΠΈΡΠ½ΠΎΠ΅.
Π‘Π°Π½Π΄Π΅Ρ, ΡΠ°ΠΊ ΡΡΠΎ ΠΏΠΎΠΏΡΠΎΠ±ΡΠΉΡΠ΅:
ΠΠ΄ΡΠ°Π²ΡΡΠ²ΡΠΉΡΠ΅! ΠΡΠΎΠΊΡΡΡΠΈΠ²Π°Π», ΡΠΈΡΠ°Π» — ΡΠ°ΠΊ ΠΈ Π½Π΅ Π½Π°ΡΠ΅Π» ΠΎΡΠ²Π΅ΡΠ° Π½Π° Π²Π°ΡΡ ΠΏΡΠΎΠ±Π»Π΅ΠΌΡ, Π° ΠΎΠ½ ΡΠ°ΠΊΠΎΠ²: ΡΠ΅ΠΊΡΡΠΎΠ²Π°Ρ ΠΊΠΎΠ»ΠΎΠ½ΠΊΠ° ΠΈ Π°Π»ΡΡΠ΅ΡΠ½Π°ΡΠΈΠ²Π½ΡΠ΅ ΡΠΈΡΠ»Π° — Π½ΡΠΆΠ½ΠΎ ΡΠ΄Π°Π»ΠΈΡΡ ΡΡΡΠΎΠΊΠΈ, ΡΠΎΠ΄Π΅ΡΠΆΠ°ΡΠΈΠ΅ ΡΠΈΡΠ»Π° (ΠΊΠΎΡΠΎΡΡΠ΅, Π΅ΡΡΠ΅ΡΡΠ²Π΅Π½Π½ΠΎ — ΡΠ°Π·Π½ΡΠ΅). Π‘ΠΏΠ°ΡΠΈΠ±ΠΎ.
ΠΠ²Π³Π΅Π½ΠΈΠΉ, ΠΏΡΠΈ ΡΠ°Π±ΠΎΡΠ΅ ΠΌΠ°ΠΊΡΠΎΡΠΎΠ², ΠΎΡΠΌΠ΅Π½Π° Π΄Π΅ΠΉΡΡΠ²ΠΈΠΉ Π² Excel Π½Π΅ ΡΠ°Π±ΠΎΡΠ°Π΅Ρ
(ΡΡΠΎ ΡΠ΄Π΅Π»Π°Π½ΠΎ ΠΌΠ°ΠΊΡΠΎΡΠΎΠΌ, Π½ΠΈΠΊΠ°ΠΊ Π½Π΅ ΠΎΡΠΌΠ΅Π½ΠΈΡΡ, — ΡΠ°ΠΊ ΡΡΡΡΠΎΠ΅Π½ Excel)
ΠΠΎΠ΄ΡΠΊΠ°ΠΆΠΈΡΠ΅, ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΠΏΠΎΡΠ»Π΅ ΡΠ΄Π°Π»Π΅Π½ΠΈΡ ΡΡΡΠΎΠΊ Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΠΌΠ°ΠΊΡΠΎΡΠ° ΠΈΠ·ΠΌΠ΅Π½Π΅Π½ΠΈΡ ΠΏΠΎ ΠΊΠ°ΠΊΠΎΠΉ-ΡΠΎ ΠΏΡΠΈΡΠΈΠ½Π΅ Π½Π΅ ΠΌΠΎΠ³ΡΡ Π±ΡΡΡ Π²ΠΎΡΡΡΠ°Π½ΠΎΠ²Π»Π΅Π½Ρ.
ΠΠ΄ΡΠ°Π²ΡΡΠ²ΡΠΉΡΠ΅, ΠΡΡΡΡΠ½Π°.
ΠΠΎΡ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠ° Π½ΠΎΡΠΌΠ°Π»ΡΠ½ΠΎ ΡΠ°Π±ΠΎΡΠ°Π΅Ρ, — Π΅ΡΠ»ΠΈ Π΅ΠΉ ΠΏΡΠ°Π²ΠΈΠ»ΡΠ½ΠΎ Π½Π°ΡΡΡΠΎΠΈΡΡ
(Π½Π°ΡΡΡΠΎΠΉΠΊΠ° ΠΏΠΎΠ΄ ΠΊΠ°ΠΆΠ΄ΡΠΉ ΠΊΠΎΠ½ΠΊΡΠ΅ΡΠ½ΡΠΉ ΡΠ°ΠΉΡ, — ΠΎΡ 1500 ΡΡΠ±, + ΡΠ°ΠΌΠ° ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠ° 2500 ΡΡΠΎΠΈΡ)
PS: Π½Π° Π±ΡΠ΄ΡΡΠ΅Π΅, ΡΠ°Π·ΠΌΠ΅ΡΠ°ΠΉΡΠ΅ ΠΊΠΎΠΌΠΌΠ΅Π½Ρ Π½Π΅ Π² ΠΏΠ΅ΡΠ²ΠΎΠΉ ΠΏΠΎΠΏΠ°Π²ΡΠ΅ΠΉΡΡ ΡΡΠ°ΡΡΠ΅, Π° Π² ΡΡΠ°ΡΡΠ΅ Ρ ΠΎΠΏΠΈΡΠ°Π½ΠΈΠ΅ΠΌ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ-ΠΏΠ°ΡΡΠ΅ΡΠ°
http://excelvba.ru/programmes/Parser
ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΡΠ°Π·Ρ ΠΎΡΠΎΡΠΌΠΈΡΡ Π·Π°ΠΊΠ°Π· Π½Π° ΠΏΠ°ΡΡΠ΅Ρ, Π² ΡΠ°ΠΊΠΎΠΌ Π²ΠΈΠ΄Π΅:
http://excelvba.ru/programmes/Parser/order
ΠΠ΄ΡΠ°Π²ΡΡΠ²ΡΠΉΡΠ΅ ΠΠ΄ΠΌΠΈΠ½! ΠΠ°Π²Π½ΠΎ Π²Π°Ρ ΠΈΡΡ. ΠΏΠΎΠ΄ΡΠ°Π±Π°ΡΡΠ²Π°Ρ Π½Π° Π‘Π Π·Π°ΠΊΡΠΏΠΊΠ°Ρ , ΠΈ ΡΠΆΠ΅ Π·Π°ΠΌΡΡΠΈΠ»Π°ΡΡ Ρ Π·Π°ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ΠΌ ΠΊΠ°ΡΠ°Π»ΠΎΠ³ΠΎΠ², ΡΠΈΠ» Π±ΠΎΠ»ΡΡΠ΅ Π½Π΅Ρ. ΠΡΠΎΠ΄Π΅ Π±Ρ ΠΊΡΠΏΠΈΠ»Π° Π³ΡΠ°Π±Π±Π΅Ρ Ρ ΠΎΠ΄Π½ΠΎΠ³ΠΎ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠΈΡΡΠ°, Π½ΠΎ ΠΎΠ½ ΠΌΠ΅Π½Ρ Π½Π΅ ΡΡΡΡΠ°ΠΈΠ²Π°Π΅Ρ. ΠΠ°ΠΏΡΠΈΠΌΠ΅Ρ, ΡΡΠΎΠΈΡ 2800 Π·Π° Π·Π°ΠΊΡΠΏΠΊΡ, Π° ΡΠ°Π±ΠΎΡΠ°Π΅Ρ Ρ ΠΏΠ΅ΡΠ΅Π±ΠΎΡΠΌΠΈ. ΠΠΎΠ΄ΡΠΊΠ°ΠΆΠΈΡΠ΅, ΠΊΠ°ΠΊ ΡΠ°Π±ΠΎΡΠ°Π΅Ρ Π²Π°ΡΠ° ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠ° ΠΈ ΡΠΊΠΎΠ»ΡΠΊΠΎ ΠΎΠ½Π° ΡΡΠΎΠΈΡ, ΠΈ ΠΌΠΎΠΆΠ½ΠΎ Π»ΠΈ Π΅Π΅ Π½Π°ΡΡΡΠΎΠΈΡΡ ΠΏΠΎΠ΄ ΡΠ°ΠΉΡ, Π½Π° ΠΊΠΎΡΠΎΡΠΎΠΌ Ρ ΡΠ°Π±ΠΎΡΠ°Ρ ΠΈ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡΡΡ Π΅ΠΉ ΠΏΠΎΡΡΠΎΡΠ½Π½ΠΎ ΠΏΠΎΡΠ»Π΅ ΠΎΠΏΠ»Π°ΡΡ?
ΠΡ ΠΌΠΎΠΆΠ΅ΠΌ ΡΠ΄Π΅Π»Π°ΡΡ Π²ΡΠ΅ Π½Π° Π·Π°ΠΊΠ°Π·, ΡΡΠΎΠ±Ρ Π²ΡΠ΅ ΡΠ°Π±ΠΎΡΠ°Π»ΠΎ ΡΠ°ΠΊ, ΠΊΠ°ΠΊ Π½ΡΠΆΠ½ΠΎ.
Π₯ΠΎΡΡ ΡΠ±Π΅ΠΉΡΠ΅ — Π½Π΅ ΡΠ°Π±ΠΎΡΠ°Π΅Ρ. ΠΠ΄Π΅Ρ Π² ΡΠΎΠΌ, ΡΡΠΎ ΠΌΠ°ΠΊΡΠΎΡ ΡΡΠ°Π±Π°ΡΡΠ²Π°Π΅Ρ ΠΏΡΠΈ Π½Π°ΠΆΠ°ΡΠΈΠΈ Π½Π° ΡΡΠ΅ΠΉΠΊΡ. ΠΠ΅ΡΠ΅Ρ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ΠΈΠ· ΡΠ΅ΠΊΡΡΠ΅ΠΉ Π°ΠΊΡΠΈΠ²Π½ΠΎΠΉ ΡΡΡΠΎΠΊΠΈ ΠΈ 2 ΡΡΠΎΠ»Π±ΡΠ°, ΠΈΡΠ΅Ρ Π½Π° Π΄ΡΡΠ³ΠΎΠΌ Π»ΠΈΡΡΠ΅ ΠΈ Π΄ΠΎΠ»ΠΆΠ΅Π½ Π΅Π³ΠΎ ΠΏΡΠΎΡΡΠΎ Π²ΡΠ΄Π΅Π»ΠΈΡΡ. ΠΡΡ ΠΈΠ΄Π΅Ρ.
Π ΠΊΠΎΠ΄Π΅ Π³ΡΠ΅ΡΡ Π½Π°
«ΠΠ·ΡΡΡΠΠ°Π½Π½ΡΠ΅ = Cells(ActiveCell.Row, 2).Value»
ΠΠ½ Π½Π΅ Π±Π΅ΡΠ΅Ρ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ -> Π½Π΅ ΠΌΠΎΠΆΠ΅Ρ Π½Π°ΠΉΡΠΈ Π΅Π³ΠΎ Π½Π° Π΄ΡΡΠ³ΠΎΠΌ Π»ΠΈΡΡΠ΅. ΠΠ°ΠΊ Π·Π°ΡΡΠ°Π²ΠΈΡΡ Π΅Π³ΠΎ Π²ΠΈΠ΄Π΅ΡΡ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅. ( ΠΠ°Π²ΡΡΠΊΠΈ ΡΡΠ°Π²ΠΈΠ» — Π½Π΅ ΠΏΠΎΠΌΠΎΠ³Π°Π΅Ρ.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim ra ΠΊΠ°ΠΊ ΠΏΠ»ΡΠΆ, finra ΠΊΠ°ΠΊ ΠΏΠ»ΡΠΆ
If Target.Cells.Value = «» Then Exit Sub
If Not Intersect(Target, Range(«AF3:AF5000»)) Is Nothing Then
ΠΠ·ΡΡΡΠΠ°Π½Π½ΡΠ΅ = Cells(ActiveCell.Row, 2).Value
Sheets(«Π Π΅Π·ΡΠ»ΡΡΠ°Ρ»).Select
For Each cell In Range(«A3:A2000»).Cells
If cell = ΠΠ·ΡΡΡΠΠ°Π½Π½ΡΠ΅ Then
If finra Is Nothing Then Set finra = cell Else Set finra = Union(finra, cell)
End If
Next
If Not finra Is Nothing Then finra.EntireRow.Select
Application.ScreenUpdating = True
End If
End Sub
ΠΠ½Π΄ΡΠ΅ΠΉ, ΠΏΠΎΠΏΡΠΎΠ±ΡΠΉΡΠ΅.
Π‘ΠΎ ΡΠΊΡΡΡΠΈΠ΅ΠΌ ΡΡΡΠΎΡΠ΅ΠΊ Π²ΡΠ΅ ΠΎΡΠ»ΠΈΡΠ½ΠΎ. Π½ΠΎ ΡΡΠΎ Π΄Π΅Π»Π°ΡΡ, Π΅ΡΠ»ΠΈ Π² Π΄Π°Π»ΡΠ½Π΅ΠΉΡΠ΅ΠΌ ΠΌΠ½Π΅ Π½ΡΠΆΠ½ΠΎ Π½Π΅ΠΊΠΎΡΠΎΡΡΠ΅ ΡΠΊΡΡΡΡΠ΅ ΡΡΡΠΎΠΊΠΈ Π²Π½ΠΎΠ²Ρ ΡΠ°ΡΠΊΡΡΡΡ (Ρ.ΠΊ. ΠΏΡΠΈΠ·Π½Π°ΠΊ Π΄Π»Ρ ΡΠΊΡΡΡΠΈΡ Π΄Π»Ρ Π½ΠΈΡ
ΠΌΠΎΠΆΠ΅Ρ Π² Π±ΡΠ΄ΡΡΠ΅ΠΌ Π±ΡΡΡ Π½Π΅ΡΠ΅Π»Π΅Π²Π°Π½ΡΠ΅Π½)?
Π‘Π΄Π΅Π»Π°Π» ΡΠ°ΠΊΡΡ Π±ΠΈΠ»Π΅Π±Π΅ΡΠ΄Ρ, Π½ΠΎ ΡΠΊΡΡΡΡΠ΅ ΡΡΡΠΎΠΊΠΈ ΠΎΠ½ Π½Π΅ ΡΠ°ΡΠΊΡΡΠ²Π°Π΅Ρ π ΠΠΈΠ΄ΠΈΠΌΠΎ Π½Π΅ Π²ΠΈΠ΄ΠΈΡ ΡΠΊΡΡΡΡΠ΅ ΡΡΡΠΎΠΊΠΈ. ΠΠΎΠΌΠΎΠ³ΠΈΡΠ΅ ΡΠΎΠ²Π΅ΡΠΎΠΌ ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°!
Sub ΠΠ°ΠΊΡΠΎΡ()
Dim ra As Range, delra As Range, Π’Π΅ΠΊΡΡΠΠ»ΡΠΠΎΠΈΡΠΊΠ° As String
Application.ScreenUpdating = False
Para cada ra Π² ActiveSheet. ΠΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΠΌΡΠΉ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½. Π ΡΠ΄Ρ.
ΠΡΠ»ΠΈ ra.Find(TextFind, , xlValues, xlPart) Π½ΠΈΡΠ΅Π³ΠΎ Π½Π΅ Π²ΠΎΠ·Π²ΡΠ°ΡΠ°Π΅Ρ, ΡΠΎΠ³Π΄Π°
If delra Is Nothing Then Set delra = ra Else Set delra = Union(delra, ra)
End If
Next
If Not delra Is Nothing Then delra.EntireRow.Hidden = False
End Sub
ΠΠΈΡΠΈΠ»Π», ΡΠ°ΠΊ ΠΏΠΎΠΏΡΠΎΠ±ΡΠΉΡΠ΅:
Π£Π΄Π°Π»ΡΡΡΠ‘ΡΡΠΎΠΊΠΈΠ‘Π’Π΅ΠΊΡΡΠΎΠΌ = Worksheets(«ΠΠΌΡΠΡΠΎΡΠΎΠ³ΠΎΠΠΈΡΡΠ°»).range(«a2:a10»)
ΠΈΠ»ΠΈ ΡΠ°ΠΊ
Π£Π΄Π°Π»ΡΡΡΠ‘ΡΡΠΎΠΊΠΈΠ‘Π’Π΅ΠΊΡΡΠΎΠΌ = Worksheets(2).range(«a2:a10»)
ΠΠ΄ΡΠ°Π²ΡΡΠ²ΡΠΉΡΠ΅, Π²Π°Ρ ΠΌΠ°ΠΊΡΠΎΡ ΠΎΡΠ΅Π½Ρ ΠΏΠΎΠΌΠΎΠ³Π°Π΅Ρ, ΠΏΠΎΠ΄ΡΠΊΠ°ΠΆΠΈΡΠ΅, ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΠΊΠ°ΠΊ ΡΠ΄Π΅Π»Π°ΡΡ ΡΠ°ΠΊ, ΡΡΠΎΠ±Ρ ΠΈΡΠΊΠΎΠΌΡΠ΅ ΡΠ»ΠΎΠ²Π° Π±ΡΠ°Π»ΠΈΡΡ Π½Π΅ ΠΈΠ· ΡΡΡΠΎΠΊΠΈ = Array(«ΠΠΌΡ*», «ΠΠΎΠ»ΠΈΡΠ΅ΡΡΠ²ΠΎ», «ΡΠ΅ΠΊΡΡ ?», «ΡΠ΅Π½Π°*ΡΡΠΈ», «*78*»), Π° Ρ Π΄ΡΡΠ³ΠΎΠ³ΠΎ Π»ΠΈΡΡΠ°.
Π‘ΠΏΠ°ΡΠΈΠ±ΠΎ, Π·Π°ΡΠ°Π±ΠΎΡΠ°Π»ΠΎ.
ΠΡ Ρ ΠΈ ΡΡΠΏΠΎΠΉ.
Sub ΠΏΠΎΠ³ΡΡΠ·ΠΊΠ°()
Dim ra As Range, delra As Range
Application.ScreenUpdating = False ‘ ΠΎΡΠΊΠ»ΡΡΠ°Π΅ΠΌ ΠΎΠ±Π½ΠΎΠ²Π»Π΅Π½ΠΈΠ΅ ΡΠΊΡΠ°Π½Π°
‘ ΠΈΡΠ΅ΠΌ ΠΈ ΡΠ΄Π°Π»ΡΠ΅ΠΌ ΡΡΡΠΎΠΊΠΈ, ΡΠΎΠ΄Π΅ΡΠΆΠ°ΡΠΈΠ΅ Π·Π°Π΄Π°Π½Π½ΡΠΉ ΡΠ΅ΠΊΡΡ
‘ (ΠΌΠΎΠΆΠ½ΠΎ ΡΠΊΠ°Π·Π°ΡΡ ΡΠΊΠΎΠ»ΡΠΊΠΎ ΡΠ³ΠΎΠ΄Π½ΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΠΉ ΠΈ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ ΠΏΠΎΠ΄ΡΡΠ°Π½ΠΎΠ²ΠΎΡΠ½ΡΠ΅ Π·Π½Π°ΠΊΠΈ)
Π£Π΄Π°Π»ΡΡΡΠ‘ΡΡΠΎΠΊΠΈΠ‘Π’Π΅ΠΊΡΡΠΎΠΌ = Array(«ΠΠ ΠΏΡΠ½ΠΊΡΠ°:», «ΠΠ ΠΌΠ°ΡΡΡΡΡΠ°:», _
«ΠΠ°Π·Π²Π°Π½ΠΈΠ΅ ΠΌΠΎΠ΄Π΅Π»ΠΈ:», «Π‘ΠΊΠ»Π°Π΄ ΠΎΡΠ³ΡΡΠ·ΠΊΠΈ:»)
‘ ΠΏΠ΅ΡΠ΅Π±ΠΈΡΠ°Π΅ΠΌ Π²ΡΠ΅ ΡΡΡΠΎΠΊΠΈ Π² ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΠΌΠΎΠΌ Π΄ΠΈΠ°ΠΏΠΎΠ·ΠΎΠ½Π΅ Π»ΠΈΡΡΠ°
For Each ra In ActiveSheet.UsedRange.Rows
‘ ΠΏΠ΅ΡΠ΅Π±ΠΈΡΠ°Π΅ΠΌ Π²ΡΠ΅ ΡΡΠ°Π·Ρ Π² ΠΌΠ°ΡΡΠΈΠ²Π΅
If ra.Row >= 17 Then
For Each word In Π£Π΄Π°Π»ΡΡΡΠ‘ΡΡΠΎΠΊΠΈΠ‘Π’Π΅ΠΊΡΡΠΎΠΌ
Next word
End If
‘ Π΅ΡΠ»ΠΈ Π² ΠΎΡΠ΅ΡΠ΅Π΄Π½ΠΎΠΉ ΡΡΡΠΎΠΊΠ΅ Π»ΠΈΡΡΠ° Π½Π°ΠΉΠ΄Π΅Π½ ΠΈΡΠΊΠΎΠΌΡΠΉ ΡΠ΅ΠΊΡΡ
If Not ra.Find(word, , xlValues, xlPart) Is Nothing Then
‘ Π΄ΠΎΠ±ΠΎΠ²Π»ΡΠ΅ΠΌ ΡΡΡΠΎΠΊΡ Π² Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ Π΄Π»Ρ ΡΠ΄Π°Π»Π΅Π½ΠΈΡ
If delra Is Nothing Then Set delra = ra Else Set delra = Union(delra, ra)
End If
Next
‘ Π΅ΡΠ»ΠΈ ΠΏΠΎΠ΄Ρ
ΠΎΠ΄ΡΡΠΈΠ΅ ΡΡΡΠΎΠΊΠΈ Π½Π°ΠΉΠ΄Π΅Π½Ρ, ΡΠΎ (ΠΎΡΡΠ°Π²ΡΠ΅ ΠΎΠ΄Π½Ρ ΠΈΠ· ΡΠ»Π΅Π΄ΡΡΡΠΈΡ
ΡΡΡΠΎΠΊ)
If Not delra Is Nothing Then delra.EntireRow.Hidden = True ‘ ΡΠΊΡΡΠ²Π°Π΅ΠΌ ΠΈΡ
If Not delra Is Nothing Then delra.EntireRow.Delete ‘ ΡΠ΄Π°Π»ΡΠ΅ΠΌ ΠΈΡ
End Sub
ΠΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΠΏΠΎΠ΄ΡΠΊΠ°ΠΆΠΈΡΠ΅ ΡΡΠΎ Π½Π΅ ΡΠ°ΠΊ, Π² ΡΠ°ΠΊΠΎΠΌ ΠΈΡΠΏΠΎΠ»Π½Π΅Π½ΠΈΠΈ Π½Π΅ Ρ
ΠΎΡΠ΅Ρ ΡΠ΄Π°Π»ΡΡΡ Ρ 17 ΡΡΡΠΎΠΊΠΈ.
Gjlcrf;bnt xnj yt nfr
If ra.row >= 17 then
For Each word In Π£Π΄Π°Π»ΡΡΡΠ‘ΡΡΠΎΠΊΠΈΠ‘Π’Π΅ΠΊΡΡΠΎΠΌ
.
Next word
end if
ΠΠΎΡ ΠΎΠΆΠ΅ Ρ Π½Π΅ ΠΏΡΠ°Π²ΠΈΠ»ΡΠ½ΠΎ Π²ΡΡΠ°Π·ΠΈΠ» ΡΠ²ΠΎΡ ΠΌΡΡΠ»Ρ, Π² ΠΌΠ°ΠΊΡΠΎΡΠ΅ DeleteStrokeSomeConditions Π΄ΠΎΠ»ΠΆΠ½Ρ ΡΠ΄Π°Π»ΡΡΡΡΡ ΡΡΡΠΎΠΊΠΈ Ρ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½Π½ΡΠΌ ΡΠ΅ΠΊΡΡΠΎΠΌ ΡΠΎΠ»ΡΠΊΠΎ Ρ 17 ΡΡΡΠΎΠΊΠΈ ΠΈ Π΄ΠΎ ΠΊΠΎΠ½ΡΠ° Π»ΠΈΡΡΠ°.
ΠΠΌΠ΅ΡΡΠΎ
If delra Is Nothing Then Set delra = ra Else Set delra = Union(delra, ra)
ΠΏΠΈΡΠ΅ΡΠ΅
ra.Replace («Π§ΡΠΎ Π·Π°ΠΌΠ΅Π½ΠΈΡΡ», «»)
ΠΡΠΆΠ΅Π½ ΠΌΠ°ΠΊΡΠΎΡ Π΄Π»Ρ ΡΠ΄Π°Π»Π΅Π½ΠΈΡ ΡΠ΅ΠΊΡΡΠ° Ρ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½Π½ΠΎΠΉ ΡΡΡΠ°Π½ΠΈΡΡ.
ΠΠΏΠΈΡΠ°Π½ΠΈΠ΅ Π·Π°Π΄Π°ΡΠΈ ΡΠΊΠ°Π·ΡΠ²Π°Π΅Ρ Π½Π° Π½Π΅ΠΎΠ±Ρ ΠΎΠ΄ΠΈΠΌΠΎΡΡΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΡΡΠ½ΠΊΡΠΈΠΈ Excel — Π·Π°ΠΌΠ΅Π½ΠΈΡΡ. Ctrl+H. ΠΡ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π½Π°ΠΉΡΠΈ ΡΠ΅ΠΊΡΡ, Π½Π°ΠΏΠΈΡΠ°Π² Π΅Π³ΠΎ Π² find, ΠΎΡΡΠ°Π²ΠΈΠ² «ΠΠ°ΠΌΠ΅Π½ΠΈΡΡ Π½Π°» ΠΏΡΡΡΡΠΌ.
Π ΠΌΠΎΠΆΠ΅Ρ ΠΏΠΎΠ΄ΡΠΊΠ°Π·Π°ΡΡ, ΠΊΠ°ΠΊ Π½Π°ΠΉΡΠΈ ΠΈ ΡΠ΄Π°Π»ΠΈΡΡ ΡΠ΅ΠΊΡΡ ΠΈΠ· ΠΊΠΎΠ½ΠΊΡΠ΅ΡΠ½ΠΎΠΉ ΡΡΡΠΎΠΊΠΈ.