Excel бағдарламасындағы әрбір басқа жолды немесе әрбір N-ші жолды қалай жоюға болады

  • Мұны Бөлісіңіз
Michael Brown

Бұл қысқа оқулық Excel бағдарламасындағы әрбір басқа жолды сүзу немесе VBA коды арқылы жою жолын түсіндіреді. Сіз сондай-ақ әрбір 3-ші, 4-ші немесе кез келген басқа N-ші жолды қалай жою керектігін үйренесіз.

Excel жұмыс парақтарындағы балама жолдарды жою қажет болатын көптеген жағдайлар бар. Мысалы, деректерді жұп апталарға (2, 4, 6, 8, т.б.) сақтап, барлық тақ апталарды (3, 5, 7, т.б.) басқа параққа жылжытқыңыз келуі мүмкін.

Әдетте, Excel бағдарламасындағы әрбір басқа жолды жою балама жолдарды таңдауға дейін төмендейді. Жолдар таңдалғаннан кейін Жою түймешігіндегі бір штрих жеткілікті. Әрі қарай осы мақалада Excel бағдарламасындағы әрбір басқа немесе әрбір N-ші жолды жылдам таңдау және жоюдың бірнеше әдістерін үйренесіз.

    Excel бағдарламасындағы әрбір басқа жолды сүзу арқылы жою әдісі

    Негізі Excel бағдарламасындағы әрбір басқа жолды өшірудің кең таралған тәсілі мынада: алдымен балама жолдарды сүзгіден өткізіп, содан кейін оларды таңдап, барлығын бірден жоясыз. Төменде егжей-тегжейлі қадамдар орындалады:

    1. Бастапқы деректердің жанындағы бос бағанға нөлдер мен бірліктердің тізбегін енгізіңіз. Мұны бірінші ұяшыққа 0 және екінші ұяшыққа 1 теріп, содан кейін алғашқы екі ұяшықты көшіріп, деректері бар соңғы ұяшыққа дейін бағанға қою арқылы жылдам орындауға болады.

      Немесе мына формуланы пайдалануға болады:

      =MOD(ROW(),2)

      Формуланың логикасы өте қарапайым: ROW функциясы ағымдағы жол нөмірін, MOD функциясын қайтарады.оны 2-ге бөледі және бүтін санға дейін дөңгелектенген қалдықты қайтарады.

      Нәтижесінде сізде барлық жұп жолдарда 0 (өйткені олар 2-ге қалдықсыз біркелкі бөлінеді) және барлық тақ жолдарда 1 болады:

    2. Жұп немесе тақ жолдарды жоюға байланысты бір немесе нөлді сүзгіден өткізіңіз.

      Мұны істеу үшін Көмекші бағанындағы кез келген ұяшықты таңдаңыз, Деректер қойындысына > Сұрыптау және сүзу тобына өтіп, Сүзгі түймесін басыңыз. түймесі. Ашылмалы сүзгі көрсеткілері барлық тақырып ұяшықтарында пайда болады. Көмекші бағанындағы көрсеткі түймешігін басып, келесі жолақтардың бірін белгілейсіз:

      • 0 жұп жолдарды жою үшін
      • 1 тақ жолдарды жою үшін

      Бұл мысалда біз «0» мәндері бар жолдарды алып тастаймыз, сондықтан оларды сүзгіден өткіземіз:

    3. Енді барлық «1» жолдар жасырылған, барлық көрінетін «0» жолдарын таңдаңыз, таңдауды тінтуірдің оң жақ түймешігімен басыңыз және Жолды жою түймесін басыңыз:

    4. Жоғарыдағы қадам сізге бос кесте қалдырды , бірақ алаңдамаңыз, «1» жолдар әлі де бар. Оларды қайтадан көрінетін ету үшін Сүзгі түймесін қайтадан басу арқылы автоматты сүзгіні алып тастаңыз:

    5. С бағанындағы формула қалған жолдар үшін қайта есептейді, бірақ ол енді сізге керек емес. Енді Көмекші бағанын қауіпсіз жоюға болады:

    Нәтижесінде жұмыс парағында тек жұп апталар ғана қалды, тақ апталар жойылды!

    Кеңес. Әрқайсысын жылжытқыңыз келсебасқа жолды толығымен жоюдың орнына басқа жерге ауыстырыңыз, алдымен сүзілген жолдарды көшіріп, оларды жаңа орынға қойыңыз, содан кейін сүзілген жолдарды жойыңыз.

    VBA көмегімен Excel бағдарламасындағы балама жолдарды қалай жоюға болады

    Егер Excel жұмыс парақтарындағы әрбір басқа жолды жою сияқты маңызды емес тапсырмаға уақытыңызды босқа кетіргіңіз келмесе, келесі VBA макросы сіз үшін процесті автоматтандыруы мүмкін:

    Sub Delete_Alternate_Rows_Excel() Dim SourceRange диапазон ретінде SourceRange орнату = Application.Selection Set SourceRange = Application.InputBox( "Ауқым:" , "Ауқым таңдау" , SourceRange.Address, Түр :=8) SourceRange.Rows.Count >= 2 болса, онда бірінші ұяшықты диапазон ретінде күңгірттеңіз, жол индексін бүтін сан ретінде азайтыңыз Application.ScreenUpdating = RowIndex үшін False = SourceRange.Rows.Count - (SourceRange.Rows.Count мод 2) 1-қадамға -2-қа FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenU. End If End Sub

    Макросты пайдаланып Excel бағдарламасындағы әрбір басқа жолды қалай жоюға болады

    I Visual Basic өңдегіші арқылы жұмыс парағына макросты әдеттегідей енгізіңіз:

    1. Бағдарламаларға арналған Visual Basic терезесін ашу үшін Alt + F11 пернелерін басыңыз.
    2. Үстіңгі мәзір жолағында, Кірістіру > Модуль түймесін басып, жоғарыдағы макросты Модуль
    3. ішіне қойыңыз.Макросты іске қосу үшін F5 пернесін басыңыз.
    4. Диалог терезесі ашылады және ауқымды таңдауды ұсынады. Кестені таңдап, басыңызЖарайды:

    Дайын! Таңдалған диапазондағы барлық басқа жолдар жойылады:

    Excel бағдарламасындағы әрбір N-ші жолды жою жолы

    Бұл тапсырма үшін біз сүзуді кеңейтеміз. біз әрбір басқа жолды жою үшін қолданған әдіс. Айырмашылық сүзгілеуге негізделген формулада:

    MOD(ROW()- m, n)

    Мұндағы:

    • m - деректер минус 1 бар бірінші ұяшықтың жол нөмірі
    • n - жойғыңыз келетін N-ші жол

    Деректеріңіз 2-жолдан басталады және әрбір 3-ші жолды жойғыңыз келеді делік. Сонымен, сіздің формулаңызда n 3-ке тең, ал m 1-ге тең (2-жол минус 1):

    =MOD(ROW() - 1, 3)

    Егер біздің деректер келесіден басталса 3-жол, онда m 2-ге тең болады (3-жол минус 1) және т.б. Бұл түзету 1 санынан бастап жолдарды ретімен нөмірлеу үшін қажет.

    Формула салыстырмалы жол нөмірін 3-ке бөліп, бөлгеннен кейін қалғанын қайтарады. Біздің жағдайда ол әрбір үшінші қатар үшін нөл береді, себебі әрбір үшінші сан 3-ке қалдықсыз бөлінеді (3,6,9, т.б.):

    Ал енді, сіз «0» жолдарын сүзу үшін бұрыннан таныс қадамдарды орындаңыз:

    1. Кестедегі кез келген ұяшықты таңдап, Деректер
    2. бетіндегі Сүзгі түймесін басыңыз.
    3. Анықтама бағанында тек "0" мәндерін көрсету үшін сүзгіден өткізіңіз.
    4. Көрінетін "0" жолдардың барлығын таңдап, тінтуірдің оң жақ түймешігімен басып, контекстік мәзірден Жолды жою пәрменін таңдаңыз.
    5. Сүзгіні алып тастаңыз жәнеКөмекші бағанын жойыңыз.

    Ұқсас жолмен Excel бағдарламасындағы әрбір 4-ші, 5-ші немесе кез келген басқа N-ші жолды жоюға болады.

    Кеңес. Маңызды деректері бар жолдарды жою қажет болған жағдайда, келесі оқулық пайдалы болады: Ұяшық мәніне негізделген жолдарды қалай жоюға болады.

    Оқығаныңыз үшін рахмет және келесі аптада блогымызда қайта көреміз деп үміттенемін. .

    Майкл Браун - бағдарламалық құралдарды пайдалана отырып, күрделі процестерді жеңілдетуге құмарлығы бар арнайы технология әуесқойы. Технологиялық индустрияда он жылдан астам тәжірибесі бар ол Microsoft Excel және Outlook, сондай-ақ Google Sheets және Docs бағдарламаларында өз дағдыларын жетілдірді. Майклдың блогы өз білімі мен тәжірибесін басқалармен бөлісуге, өнімділік пен тиімділікті арттыруға арналған оңай орындалатын кеңестер мен оқулықтар беруге арналған. Сіз тәжірибелі кәсіпқой болсаңыз да, жаңадан бастаушы болсаңыз да, Майклдың блогы осы маңызды бағдарламалық құралдарды барынша пайдалану үшін құнды түсініктер мен практикалық кеңестер ұсынады.