Excel KB ni MB ga va aksincha aylantirish uchun to'g'ridan-to'g'ri xususiyatni taqdim etmagan. Shunday qilib, biz ushbu muammoni hal qilishning ikkita usulini ko'rib chiqamiz.
Excel ish varag'ida siz ma'lum birliklar bilan raqamlarni kiritasiz. Biroq, ba'zi birliklar hisoblashda ishtirok eta olmaydi, masalan, bayt birligi. Misol uchun, siz quyidagi rasmda raqamlarni ko'rishingiz mumkin.
Ushbu ustunda "KB" birligi bo'lgan bir nechta raqamlar mavjud. Boshqa tomondan, raqamlarni birliklar bilan hisoblash uchun formuladan to'g'ridan-to'g'ri foydalanish mumkin emas. D14 katakka “=C1024/14” formulasini kiritganingizda, natija “#VALUE” bo‘ladi. Bundan tashqari, agar KB bo'lgan hujayralar ko'p bo'lsa, bu raqamlarni birma-bir aylantirsangiz, bu ko'p vaqt talab etadi.
Shunday qilib, KB ni MB ga aylantirish yoki MB ni KB ga tez aylantirish uchun endi siz quyidagi ikkita usuldan foydalanishingiz mumkin.
1-usul: Excel funktsiyalaridan foydalaning
Bu erda biz ushbu vazifani bajarish uchun Excel funktsiyalaridan foydalanish bosqichlarini ko'rsatamiz.
- Ushbu ish varag'idagi D2 katakchasini bosing.
- Endi katakka quyidagi formulani kiriting:
=IF(ISNUMBER(FIND(“KB”,C2)),ROUND(LEFT(C2,LEN(C2)-2)/1024,2) & “MB”,””)
Ushbu formulada biz birinchi navbatda hujayradagi birlik "KB" yoki "MB" ekanligini aniqlaymiz. Agar birlik "KB" bo'lsa, formula hisoblash uchun birliklarni olib tashlaydi. Hisoblashda natijani yaxlitlash uchun ROUND funksiyasidan ham foydalanamiz. Siz mezonni haqiqiy ehtiyojingizga qarab belgilashingiz mumkin. Hisoblash tugagach, raqamga yangi "MB" birligi qo'shiladi. Shuning uchun, bu formula ko'rinadigan darajada murakkab emas.
- Va keyin klaviaturadagi "Enter" tugmasini bosing. Hozircha siz D2 katakda hech narsa ko'rmaysiz.
- Shundan so'ng, butun ustunni to'ldirish uchun D2 katakchasini to'ldirish dastagini ikki marta bosing. Ushbu ustunda, agar asl birlik "KB" bo'lsa, tegishli kataklarda yangi tarkib bo'lishini ko'rasiz. Bundan tashqari, agar birlik "MB" bo'lsa, hujayralarda bo'sh qiymat bo'ladi.
- Endi siz natijani asl hujayralarga nusxalashingiz mumkin. Va faqat ushbu hujayralar uchun qiymatlarni joylashtirishni unutmang.
Keyingi safar ushbu formuladan foydalanish kerak bo'lsa, ushbu formuladagi katakcha havolasini o'zgartirishingiz mumkin.
Boshqa tomondan, agar siz "MB" ni "KB" ga aylantirishingiz kerak bo'lsa, siz faqat bir oz sozlashingiz kerak. Va yangi formula quyidagicha bo'ladi:
=IF(ISNUMBER(FIND(“MB”,C2)),ROUND(LEFT(C2,LEN(C2)-2)*1024,0) & “KB”,””)
Ushbu formulani ish varag'ingizga ham qo'llashingiz mumkin.
2-usul: VBA makroslaridan foydalaning
Ish varag'ida formuladan foydalanganda siz hali ham natijani nusxalashingiz va joylashtirishingiz kerak. Va agar siz qoidalar bilan tanish bo'lmasangiz, formula biroz qiyin. Shunday qilib, bu erda siz ushbu vazifani tezda bajarish uchun Excelda VBA makroslaridan ham foydalanishingiz mumkin.
- Tasmadagi "Tuzuvchi" yorlig'ini bosing.
- Keyin asboblar panelidagi "Visual Basic" tugmasini bosing. Shundan so'ng siz Visual Basic muharririni ko'rasiz. Bundan tashqari, siz Visual Basic muharririni ochish uchun klaviaturadagi "Alt + F11" yorliqlarini ham bosishingiz mumkin.
- VBA Projector maydonida o'ng tugmasini bosing.
- Keyin kursorni "Qo'shish" opsiyasiga olib boring.
- Keyin pastki menyuda "Modul" opsiyasini tanlang. Shuning uchun Visual Basic muharririda yangi modul mavjud.
- Endi ushbu bosqichda yangi modulga quyidagi VBA kodlarini kiriting:
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
Ushbu VBA makrosida biz hujayrada "KB" belgisi mavjudligini tekshiramiz. Va keyin protsedura hisob-kitoblarni amalga oshiradi. Bundan tashqari, natija asl ish varag'ida bo'ladi. Haqiqiy ish varaqingizda siz haqiqiy ehtiyojingizga qarab diapazonni o'zgartirishingiz mumkin. Agar natijani boshqa hujayralarga kiritishingiz kerak bo'lsa, uni o'zgartirishingiz ham mumkin.
- Endi ushbu makrosni ishga tushirish uchun asboblar panelidagi "Run Sub-ni ishga tushirish" tugmasini bosing yoki klaviaturadagi "F5" tugmasini bosing. Va keyin siz ish varag'iga qaytib, natijani tekshirishingiz mumkin.
Yangi natijalar asl hujayralarda allaqachon paydo bo'lganligini topasiz. Bundan tashqari, natijani yana o'sha kataklarga nusxalashingiz shart emas.
Boshqa tomondan, endi siz MBni KB ga aylantirishingiz kerak bo'lsa, quyidagi makroslardan foydalanishingiz mumkin:
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
Ushbu makrosdagi ba'zi elementlarni haqiqiy ehtiyojingizga qarab o'zgartirishingiz kerak. Ushbu makrosni ishga tushirganingizdan so'ng, natijani darhol ish varag'ida olasiz.
Ikki usul o'rtasidagi taqqoslash
Ikkala usul uchun ham biz quyidagi jadvalda afzalliklari va kamchiliklarini sanab o'tdik.
|
qiyoslash |
Excel funksiyalaridan foydalaning |
VBA makroslaridan foydalaning |
|
afzalliklari |
1. Agar siz VBA bilan tanish bo'lmasangiz, ushbu vazifani bajarish uchun funktsiyalardan foydalanishingiz mumkin.
2. Boshqa birliklarni o'zgartirishingiz kerak bo'lganda, ushbu formulani ehtiyojingizga qarab o'zgartirishingiz mumkin. |
1. Bir marta bosish bilan siz natijaga erishishingiz mumkin.
2. Shuningdek, siz kodlarni ko'proq vazifalarni bajarish uchun ehtiyojingizga qarab o'zgartirishingiz mumkin. |
|
Kamchiliklari |
1. Ushbu bosqichda ko'proq qadamlar mavjud, chunki siz hali ham natijalarni ma'lum hujayralarga nusxalashingiz kerak.
2. Ushbu uzun formulada ba'zi tafsilotlarda osongina xato qilasiz. |
1. Agar siz Excel VBA bilan tanish bo'lmasangiz, makroslarni ishga tushirganingizda xatolarga duch kelishingiz mumkin.
2. Excelda VBA dan foydalanish har doim ishlarni yanada murakkablashtiradi. |
Endi siz ikkita usul haqida keng qamrovli tushunchaga egasiz. Va muammoingizni hal qilish uchun ulardan birini ishlatishingiz mumkin.
Ma'lumotni tiklashning to'g'ri usulini tanlang
Har safar Excel buzilishi bilan duch kelganingizda, qilishingiz kerak bo'lgan birinchi narsa fayllaringizni tiklashga harakat qilishdir. Biroq, agar siz ma'lumotlarni qayta tiklash haqida hech narsa bilmasangiz, ba'zi maxsus usullarni o'zingiz sinab ko'rmang. Buning sababi, ba'zi noto'g'ri xatti-harakatlar fayllaringizga qo'shimcha zarar etkazishi mumkin. Bundan tashqari, siz qimmatbaho ma'lumotlaringiz va ma'lumotlaringizni abadiy yo'qotasiz. Shuning uchun siz to'g'ri usulni tanlashingiz kerak. Va endi siz uchinchi tomon vositasidan ham foydalanishingiz mumkin Excel xlsx-ni ta'mirlash muammolar va boshqa xatolar. Ushbu vosita dunyodagi eng yaxshi texnologiya bilan jihozlangan va Excelda xatolik bu dasturiy ta'minot uchun pirojnoe bo'lagidir.
Muallif kirish:
Anna Ma ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc Word ma'lumotlarini tiklash va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com