2 Excel жұмыс парағыңызда КБ-ны МБ-ға және вице-нұсқасына ауыстыру әдістері

Excel бағдарламасында КБ-ны МБ-ға және керісінше түрлендірудің тікелей мүмкіндігі жоқ. Демек, біз осы мәселені шешудің екі әдісін енгіземіз.

Excel жұмыс парағында сіз белгілі бірліктермен сандарды енгізесіз. Алайда кейбір бірліктер есептеуге қатыса алмайды, мысалы, байт бірлігі. Мысалы, сіз төмендегі суреттегі сандарды көре аласыз.

Бұл бағанда «КБ» бірлігі бар бірнеше нөмір бар. Екінші жағынан, сандарды бірліктермен есептеу үшін формуланы тікелей қолдану мүмкін емес. D14 ұяшығына «= C1024 / 14» формуласын енгізгенде, нәтиже «#VALUE» болады. Сонымен қатар, егер КБ ұяшықтары көп болса, сіз оларды бір-бірлеп түрлендірсеңіз, көп уақытты қажет етеді.

Демек, КБ-ны МБ-ға түрлендіру немесе МБ-ны КБ-ға тез ауыстыру үшін енді төмендегі екі әдісті қолдануға болады.

1-әдіс: Excel функцияларын қолдану

Мұнда біз сізге осы тапсырманы аяқтау үшін Excel функцияларын пайдалану қадамдарын көрсетеміз.

1. Осы жұмыс парағындағы D2 ұяшығын басыңыз.
2. Енді ұяшыққа келесі формуланы енгізіңіз:

=IF(ISNUMBER(FIND(“KB”,C2)),ROUND(LEFT(C2,LEN(C2)-2)/1024,2) & “MB”,””)

Бұл формулада алдымен ұяшықтағы бірліктің «КБ» немесе «МБ» екенін анықтаймыз. Егер бірлік «КБ» болса, формула есептеу үшін бірліктерді алып тастайды. Есептеу кезінде біз нәтижені дөңгелектеу үшін ROUND функциясын қолданамыз. Сіз критерийді нақты қажеттілікке сәйкес қоя аласыз. Есептеу аяқталғаннан кейін нөмірге жаңа «МБ» бірлігі қосылады. Сондықтан, бұл формула көрінгендей күрделі емес.

3. Содан кейін пернетақтадағы «Enter» батырмасын басыңыз. Осы уақытқа дейін D2 ұяшығынан ештеңе көре алмайсыз.
4. Осыдан кейін барлық бағанды ​​толтыру үшін D2 ұяшығының толтыру тұтқасын екі рет басыңыз. Бұл бағанда сіз егер түпнұсқа бірлік «КБ» болса, сәйкес ұяшықтарда жаңа мазмұн болатынын көресіз. Сонымен қатар, егер бірлік «МБ» болса, онда ұяшықтарда бос мән болады.
5. Енді нәтижені бастапқы ұяшықтарға көшіруге болады. Тек сол ұяшықтар үшін мәндерді қоюды ұмытпаңыз.

Келесі жолы сізге осы формуланы қолдану қажет болса, осы формуладағы ұяшық сілтемесін жай өзгертуге болады.

Екінші жағынан, егер сізге «МБ» -ны «КБ» -ге ауыстыру қажет болса, сізге аз ғана түзету енгізу керек. Жаңа формула келесідей болады:

=IF(ISNUMBER(FIND(“MB”,C2)),ROUND(LEFT(C2,LEN(C2)-2)*1024,0) & “KB”,””)

Сіз бұл формуланы жұмыс парағыңызда қолдануға болады.

2-әдіс: VBA макростарын қолданыңыз

Жұмыс парағында формуланы пайдалану кезінде сіз нәтижені көшіріп, қоюыңыз керек. Ал ережелермен таныс болмасаңыз, формула сәл қиын. Демек, бұл тапсырманы жылдам аяқтау үшін Excel бағдарламасында VBA макросын пайдалануға болады.

1. Таспадағы «Әзірлеуші» қойындысын нұқыңыз.
2. Содан кейін құралдар тақтасындағы «Visual Basic» батырмасын басыңыз. Осыдан кейін сіз Visual Basic редакторын көресіз. Сонымен қатар, Visual Basic редакторын ашу үшін пернетақтадағы «Alt + F11» пернелер тіркесімін басуға болады.
3. VBA Projector аймағында тінтуірдің оң жағын басыңыз.
4. Содан кейін курсорды «Кірістіру» параметріне жылжытыңыз.
5. Әрі қарай ішкі мәзірден «Модуль» опциясын таңдаңыз. Сондықтан Visual Basic редакторында жаңа модуль бар.
6. Енді осы қадамда жаңа модульге келесі VBA кодтарын енгізіңіз:

Sub KB_To_MB()

    Dim cel As Range

    For Each cel In Range("C2:C28")

        If cel Like "*" & "KB" Then

            cel.Value = Application.WorksheetFunction.Round(Left(cel, Len(cel) - 2) / 1024, 2) & "MB"

        End If

    Next cel

End Sub

Осы VBA макросында ұяшықта «KB» таңбасы бар-жоғын тексереміз. Содан кейін процедура есептеулер жүргізеді. Сонымен қатар, нәтиже жұмыс парағында болады. Сіздің нақты жұмыс парағыңызда сіз нақты қажеттілікке сәйкес ауқымды өзгерте аласыз. Егер сізге нәтижені басқа ұяшықтарға енгізу қажет болса, оны өзгерте аласыз.

7. Енді осы макросты орындау үшін құралдар тақтасындағы «Run Sub» батырмасын басыңыз немесе пернетақтадағы «F5» пернесін басыңыз. Әрі қарай сіз жұмыс парағына оралып, нәтижені тексере аласыз.

Жаңа нәтижелер бастапқы ұяшықтарда пайда болғанын көресіз. Сонымен қатар, нәтижені қайтадан сол ұяшықтарға көшірудің қажеті жоқ.

Екінші жағынан, енді сізге МБ-ны КБ-ға ауыстыру қажет болса, төмендегі макростарды қолдануға болады:

Sub MB_To_KB()

    Dim cel As Range

    For Each cel In Range("C2:C28")

        If cel Like "*" & "MB" Then

            cel.Value = Application.WorksheetFunction.Round(Left(cel, Len(cel) - 2) * 1024, 0) & "KB"

        End If

    Next cel

End Sub

Осы макростың кейбір элементтерін нақты қажеттілікке сәйкес өзгерту керек. Осы макросты іске қосқаннан кейін нәтижені жұмыс парағында бірден аласыз.

Екі әдісті салыстыру

Екі әдіс үшін де біз төмендегі кестеде артықшылықтар мен кемшіліктерді келтірдік.

Енді сіз екі әдіс туралы жан-жақты түсінік алдыңыз. Сіздің проблемаңызды шешу үшін олардың біреуін де қолдануға болады.

Деректерді қалпына келтірудің дұрыс әдісін таңдаңыз

Excel бағдарламасының бұзылуымен кездескен кезде сізге бірінші кезекте файлдарды қалпына келтіруге тырысу керек. Алайда, егер сіз деректерді қалпына келтіру туралы ештеңе білмесеңіз, кейбір арнайы әдістерді өзіңіз қолданып көрмеңіз. Себебі кейбір дұрыс емес әрекеттер файлдарыңызды одан әрі зақымдауы мүмкін. Сонымен қатар, сіз өзіңіздің құнды деректеріңіз бен ақпараттарыңызды біржола жоғалтасыз. Сондықтан сізге дұрыс әдісті таңдау керек. Енді сіз үшінші тарап құралын да пайдалана аласыз Excel xlsx жөндеу мәселелер және басқа қателер. Бұл құрал әлемдегі ең жақсы технологиялармен жабдықталған, ал Excel-дегі қателік - осы бағдарламалық жасақтаманың торты.

Автордың кіріспесі:

Анна Ма - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. Word деректерін жөндеу және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com