ສາລະບານ
ບົດສອນຈະສອນທ່ານກ່ຽວກັບວິທີເອົາຖັນຫວ່າງເປົ່າໃນ Excel ດ້ວຍ macro, ສູດ ແລະຄລິກປຸ່ມ. ບໍ່ແມ່ນບາງສິ່ງບາງຢ່າງທີ່ສາມາດເຮັດໄດ້ດ້ວຍການຄລິກຫນູພຽງແຕ່. ມັນບໍ່ສາມາດເຮັດໄດ້ໃນສອງຄລິກ. ຄວາມສົດໃສດ້ານໃນການກວດສອບຄໍລໍາທັງຫມົດໃນແຜ່ນວຽກຂອງທ່ານແລະເອົາອັນທີ່ຫວ່າງເປົ່າອອກດ້ວຍຕົນເອງແມ່ນແນ່ນອນວ່າທ່ານຕ້ອງການຫຼີກເວັ້ນ. ໂຊກດີ, Microsoft Excel ສະຫນອງຄຸນນະສົມບັດທີ່ແຕກຕ່າງກັນຢ່າງຫຼວງຫຼາຍ, ແລະໂດຍການນໍາໃຊ້ຄຸນສົມບັດເຫຼົ່ານັ້ນໃນວິທີການສ້າງສັນ, ທ່ານສາມາດຮັບມືກັບເກືອບທຸກຫນ້າວຽກ!
ວິທີໄວທີ່ຈະລຶບຖັນຫວ່າງເປົ່າທີ່ທ່ານບໍ່ຄວນ. ໃຊ້
ເມື່ອເວົ້າເຖິງການລຶບຊ່ອງຫວ່າງໃນ Excel (ບໍ່ວ່າຈະເປັນເຊລຫວ່າງເປົ່າ, ແຖວ ຫຼືຖັນ), ຊັບພະຍາກອນອອນໄລນ໌ຫຼາຍອັນແມ່ນອີງໃສ່ ໄປທີ່ພິເສດ > ຫວ່າງເປົ່າ ຄໍາສັ່ງ. ຢ່າເຮັດແນວນັ້ນ ໃນແຜ່ນງານຂອງເຈົ້າ!
ວິທີນີ້ ( F5 > Special… > Blanks ) ຊອກຫາ ແລະເລືອກ ຕາລາງຫວ່າງເປົ່າທັງໝົດ ໃນໄລຍະ:
ຖ້າຕອນນີ້ທ່ານຄລິກຂວາໃສ່ຕາລາງທີ່ເລືອກ ແລະເລືອກ ລຶບ > ຖັນທັງໝົດ , ຖັນທັງໝົດທີ່ມີ ຢ່າງໜ້ອຍໜຶ່ງຕາລາງຫວ່າງ ຈະສູນເສຍໄປ! ຖ້າເຈົ້າໄດ້ເຮັດແບບນັ້ນໂດຍບໍ່ຕັ້ງໃຈ, ໃຫ້ກົດ Ctrl + Z ເພື່ອເອົາທຸກຢ່າງກັບຄືນມາ.
ດຽວນີ້ເຈົ້າຮູ້ວິທີລຶບຖັນຫວ່າງເປົ່າໃນ Excel ຜິດ, ເຮົາມາເບິ່ງວິທີເຮັດມັນໃຫ້ຖືກຕ້ອງ.
ວິທີການເອົາຖັນເປົ່າໃນ Excel ດ້ວຍ VBA
ມີປະສົບການຜູ້ໃຊ້ Excel ຮູ້ກົດລະບຽບຂອງໂປ້ມືນີ້: ບໍ່ຕ້ອງເສຍຊົ່ວໂມງເຮັດບາງສິ່ງບາງຢ່າງດ້ວຍຕົນເອງ, ລົງທຶນສອງສາມນາທີໃນການຂຽນ macro ທີ່ຈະເຮັດມັນໃຫ້ທ່ານໂດຍອັດຕະໂນມັດ.
Macro VBA ຂ້າງລຸ່ມນີ້ຈະເອົາຄໍລໍາເປົ່າທັງຫມົດທີ່ເລືອກ. ຊ່ວງ. ແລະມັນເຮັດອັນນີ້ຢ່າງປອດໄພ - ພຽງແຕ່ຄໍລໍາທີ່ຫວ່າງເປົ່າແທ້ໆຖືກລຶບ. ຖ້າຖັນໃດນຶ່ງມີຄ່າເຊລດຽວ, ແມ່ນແຕ່ສະຕຣິງຫວ່າງເປົ່າທີ່ສົ່ງຄືນມາໂດຍສູດບາງອັນ, ຖັນດັ່ງກ່າວຈະຄົງຕົວຢູ່.
Excel macro: ເອົາຖັນຫວ່າງເປົ່າອອກຈາກແຜ່ນ Excel Public Sub DeleteEmptyColumns() Dim SourceRange As Range Dim EntireColumn As Range ໃນຄວາມຜິດພາດສືບຕໍ່ຕັ້ງ SourceRange = Application.InputBox( _ "ເລືອກຊ່ວງ:", "ລຶບຖັນຫວ່າງເປົ່າ", _ Application.Selection.Address, ປະເພດ :=8) ຖ້າບໍ່ແມ່ນ (SourceRange Is Nothing) ຫຼັງຈາກນັ້ນ, Application.ScreenUpdating = False ສໍາລັບ i = SourceRange.Columns.Count To 1 Step -1 Set EntireColumn = SourceRange.Cells(1, i).EntireColumn ຖ້າ Application.WorksheetFunction.CountA(EntireColumn) = 0 ຫຼັງຈາກນັ້ນ EntireColumn.Delete End ຖ້າຕໍ່ໄປ Application.ScreenUpdating = True End ຖ້າ End Subວິທີໃຊ້ Delete Empty Columns macro
ນີ້ແມ່ນຂັ້ນຕອນເພື່ອເພີ່ມ macro ໃສ່ Excel ຂອງທ່ານ:
- ກົດ Alt + F11 ເພື່ອເປີດ Visual Basic ບັນນາທິການ.
- ໃນແຖບເມນູ, ຄລິກ Insert > Module .
- ວາງລະຫັດຂ້າງເທິງໃສ່ໃນລະຫັດ Windo w.
- ກົດ F5 ເພື່ອແລ່ນມາໂຄຣ.
- ເມື່ອກ່ອງໂຕ້ຕອບປັອບອັບປະກົດຂຶ້ນ, ສະຫຼັບໄປຫາແຜ່ນວຽກທີ່ສົນໃຈ, ເລືອກຂອບເຂດທີ່ຕ້ອງການ, ແລະຄລິກຕົກລົງ:
ຖ້າທ່ານບໍ່ຕ້ອງການເພີ່ມ macro ໃສ່ແຜ່ນວຽກຂອງທ່ານ, ທ່ານສາມາດດໍາເນີນການໄດ້ຈາກພວກເຮົາ. ປື້ມຄູ່ມືຕົວຢ່າງ. ນີ້ແມ່ນວິທີ:
- ດາວໂຫຼດປຶ້ມວຽກຕົວຢ່າງຂອງພວກເຮົາເພື່ອເອົາຖັນຫວ່າງເປົ່າໃນ Excel, ເປີດມັນ, ແລະເປີດໃຊ້ເນື້ອຫາຖ້າຖືກຖາມ.
- ເປີດປຶ້ມວຽກຂອງເຈົ້າເອງ ຫຼືສະຫຼັບໄປຫາອັນທີ່ເປີດແລ້ວ.
- ໃນປຶ້ມວຽກຂອງທ່ານ, ກົດ Alt + F8, ເລືອກ Macro DeleteEmptyColumns , ແລະຄລິກ Run .
- ໃນປ່ອງປັອບອັບ, ເລືອກ ໄລຍະ ແລະຄລິກ ຕົກລົງ .
ບໍ່ວ່າທາງໃດກໍ່ຕາມ, ຖັນຫວ່າງເປົ່າທັງໝົດໃນຂອບເຂດທີ່ເລືອກຈະຖືກຖິ້ມ:
<0ກຳນົດ ແລະລຶບຖັນຫວ່າງເປົ່າໃນ Excel ດ້ວຍສູດສູດ
ມາໂຄຣຂ້າງເທິງຈະລຶບຖັນຫວ່າງເປົ່າອອກຢ່າງວ່ອງໄວ ແລະງຽບໆ. ແຕ່ຖ້າທ່ານເປັນປະເພດ "ຮັກສາທຸກສິ່ງທຸກຢ່າງພາຍໃຕ້ການຄວບຄຸມ" (ຄືກັບຂ້ອຍ :) ເຈົ້າອາດຈະຕ້ອງການເບິ່ງຄໍລໍາທີ່ຈະຖືກໂຍກຍ້າຍອອກ. ໃນຕົວຢ່າງນີ້, ທໍາອິດພວກເຮົາຈະກໍານົດຄໍລໍາຫວ່າງເປົ່າໂດຍໃຊ້ສູດເພື່ອໃຫ້ທ່ານສາມາດທົບທວນຄືນໄດ້ໄວ, ແລະຫຼັງຈາກນັ້ນກໍາຈັດຄໍລໍາເຫຼົ່ານັ້ນທັງຫມົດຫຼືບາງສ່ວນ.
ຫມາຍເຫດ. ກ່ອນທີ່ຈະລຶບສິ່ງໃດຢ່າງຖາວອນ, ໂດຍສະເພາະໂດຍໃຊ້ເຕັກນິກທີ່ບໍ່ຮູ້ຈັກ, ຂ້າພະເຈົ້າຂໍແນະນໍາໃຫ້ທ່ານເຮັດ ສໍາເນົາສໍາຮອງ ຂອງປຶ້ມວຽກຂອງທ່ານ, ພຽງແຕ່ຢູ່ໃນດ້ານທີ່ປອດໄພຖ້າມີບາງສິ່ງບາງຢ່າງຜິດພາດ.
ດ້ວຍ ສໍາເນົາສໍາຮອງຂໍ້ມູນໃນສະຖານທີ່ປອດໄພ, ປະຕິບັດຕາມຂັ້ນຕອນຕໍ່ໄປນີ້:
ຂັ້ນຕອນທີ 1. ໃສ່ໃຫມ່row
ເພີ່ມແຖວໃໝ່ຢູ່ເທິງສຸດຂອງຕາຕາລາງຂອງທ່ານ. ເພື່ອເຮັດສິ່ງນີ້, ຄລິກຂວາໃສ່ຫົວແຖວທໍາອິດແລະຄລິກ Insert . ບໍ່ຕ້ອງກັງວົນກ່ຽວກັບການທໍາລາຍໂຄງສ້າງ/ການຈັດລຽງຂອງຂໍ້ມູນຂອງທ່ານ - ທ່ານສາມາດລຶບແຖວນີ້ໄດ້ໃນພາຍຫຼັງ.
ຂັ້ນຕອນ 2. ລະບຸຖັນຫວ່າງເປົ່າ
ຢູ່ທາງຊ້າຍສຸດ ເຊລຂອງແຖວທີ່ເພີ່ມໃໝ່, ໃສ່ສູດຕໍ່ໄປນີ້:
=COUNTA(A2:A1048576)=0
ແລະຫຼັງຈາກນັ້ນ, ສຳເນົາສູດຄຳນວນໄປໃສ່ຖັນອື່ນໂດຍການລາກຕົວຈັບການຕື່ມ.
ເຫດຜົນຂອງສູດຄຳນວນ. ແມ່ນງ່າຍດາຍຫຼາຍ: COUNTA ກວດເບິ່ງຈໍານວນຕາລາງຫວ່າງຢູ່ໃນຖັນ, ຈາກແຖວທີ 2 ຫາແຖວທີ 1048576, ເຊິ່ງເປັນແຖວສູງສຸດໃນ Excel 2019 - 2007. ທ່ານສົມທຽບຕົວເລກນັ້ນກັບສູນ ແລະ, ດັ່ງນັ້ນ, ມີ TRUE ໃນຖັນຫວ່າງເປົ່າ. ແລະ FALSE ໃນຖັນທີ່ມີຢ່າງໜ້ອຍໜຶ່ງຕາລາງທີ່ບໍ່ຫວ່າງເປົ່າ. ເນື່ອງຈາກການໃຊ້ການອ້າງອີງເຊລທີ່ກ່ຽວຂ້ອງ, ສູດປັບໃຫ້ເໝາະສົມສຳລັບແຕ່ລະຖັນທີ່ມັນຖືກສຳເນົາ.
ໃນກໍລະນີທີ່ທ່ານກຳລັງຕັ້ງຄ່າແຜ່ນວຽກໃຫ້ຜູ້ອື່ນ, ເຈົ້າສາມາດ ຕ້ອງການຕິດປ້າຍຄໍລໍາໃນລັກສະນະທີ່ມີຄວາມຫມາຍຫຼາຍ. ບໍ່ມີບັນຫາ, ອັນນີ້ສາມາດເຮັດໄດ້ງ່າຍດ້ວຍຄຳຖະແຫຼງ IF ທີ່ຄ້າຍກັບອັນນີ້:
=IF(COUNTA(A2:A1048576)=0, "Blank", "Not blank")
ຕອນນີ້ສູດຄຳນວນຊີ້ບອກຢ່າງຈະແຈ້ງວ່າຖັນໃດຫວ່າງເປົ່າ ແລະອັນໃດບໍ່ແມ່ນ:
ເຄັດລັບ. ເມື່ອປຽບທຽບກັບມະຫາພາກ, ວິທີການນີ້ເຮັດໃຫ້ທ່ານມີຄວາມຍືດຫຍຸ່ນຫຼາຍຂຶ້ນກ່ຽວກັບວ່າຖັນໃດຄວນຖືກພິຈາລະນາຫວ່າງເປົ່າ. ໃນຕົວຢ່າງນີ້, ພວກເຮົາກວດເບິ່ງຕາຕະລາງທັງຫມົດ, ລວມທັງແຖວຫົວ. ນັ້ນຫມາຍຄວາມວ່າຖ້າຄໍລໍາມີພຽງແຕ່ສ່ວນຫົວເທົ່ານັ້ນ, ຖັນດັ່ງກ່າວບໍ່ຖືກຖືວ່າຫວ່າງເປົ່າ ແລະບໍ່ໄດ້ຖືກລຶບຖິ້ມ. ຖ້າທ່ານຕ້ອງການກວດສອບພຽງແຕ່ແຖວຂໍ້ມູນ ບໍ່ສົນໃຈສ່ວນຫົວຖັນ , ເອົາແຖວສ່ວນຫົວອອກຈາກຂອບເຂດເປົ້າໝາຍ (A3:A1048576). ດັ່ງນັ້ນ, ຖັນທີ່ມີສ່ວນຫົວ ແລະບໍ່ມີຂໍ້ມູນອື່ນຢູ່ໃນນັ້ນຈະຖືກຖືວ່າຫວ່າງເປົ່າ ແລະຂຶ້ນກັບການລຶບ. ນອກຈາກນັ້ນ, ທ່ານສາມາດຈໍາກັດຂອບເຂດຂອງແຖວທີ່ໃຊ້ສຸດທ້າຍ, ເຊິ່ງຈະເປັນ A11 ໃນກໍລະນີຂອງພວກເຮົາ.
ຂັ້ນຕອນ 3. ເອົາຖັນຫວ່າງເປົ່າອອກ
ມີຈໍານວນຖັນທີ່ສົມເຫດສົມຜົນ, ທ່ານພຽງແຕ່ສາມາດເລືອກ ທີ່ມີ "ຫວ່າງ" ໃນແຖວທໍາອິດ (ເພື່ອເລືອກຫຼາຍຖັນ, ກົດປຸ່ມ Ctrl ຄ້າງໄວ້ໃນຂະນະທີ່ທ່ານຄລິກໃສ່ຕົວອັກສອນຖັນ). ຈາກນັ້ນ, ໃຫ້ຄລິກຂວາໃສ່ຖັນໃດນຶ່ງທີ່ເລືອກ, ແລະເລືອກ ລຶບ ຈາກເມນູບໍລິບົດ:
ຖ້າມີຫຼາຍສິບ ຫຼືຫຼາຍຮ້ອຍຖັນຢູ່ໃນແຜ່ນງານຂອງເຈົ້າ, ມັນເຮັດໃຫ້ຄວາມຮູ້ສຶກທີ່ຈະເອົາອັນເປົ່າຫວ່າງທັງຫມົດມາເບິ່ງ. ເພື່ອເຮັດສິ່ງນີ້, ໃຫ້ເຮັດດັ່ງຕໍ່ໄປນີ້:
- ເລືອກແຖວເທິງທີ່ມີສູດ, ໄປທີ່ແຖບ ຂໍ້ມູນ > ຈັດຮຽງ ແລະການກັ່ນຕອງ ກຸ່ມ, ແລະຄລິກໃສ່ກຸ່ມ ປຸ່ມ ຈັດຮຽງ .
- ໃນກ່ອງໂຕ້ຕອບເຕືອນທີ່ປາກົດ, ເລືອກ ຂະຫຍາຍການເລືອກ , ແລະຄລິກ ຈັດຮຽງ…
- ອັນນີ້ຈະເປີດກ່ອງໂຕ້ຕອບ Sort , ບ່ອນທີ່ທ່ານຄລິກໃສ່ປຸ່ມ ຕົວເລືອກ… , ເລືອກ ຈັດຮຽງຈາກຊ້າຍໄປຂວາ, ແລະ ຄລິກ ຕົກລົງ .
- ກຳນົດຄ່າພຽງແຕ່ລະດັບການຈັດລຽງຕາມທີ່ສະແດງຢູ່ລຸ່ມນີ້ ແລະຄລິກຕົກລົງ:
- ຈັດຮຽງຕາມ: ແຖວທີ 1
- ຈັດຮຽງຕາມ: ຕາລາງຄ່າ
- ຄຳສັ່ງ: A ຫາ Z
ດັ່ງນັ້ນ, ຖັນຫວ່າງເປົ່າຈະຖືກຍ້າຍໄປຢູ່ສ່ວນຊ້າຍຂອງແຜ່ນງານຂອງທ່ານ:
- ເລືອກຖັນຫວ່າງທັງໝົດ - ຄລິກທີ່ຕົວອັກສອນຖັນທຳອິດ, ກົດ Shift ແລະ ຈາກນັ້ນຄລິກທີ່ຕົວອັກສອນຂອງຖັນຫວ່າງສຸດທ້າຍ.
- ຂວາ- ຄລິກຖັນທີ່ເລືອກແລ້ວເລືອກ ລຶບ ຈາກເມນູປັອບອັບ.
ແລ້ວໆ! ທ່ານໄດ້ກໍາຈັດຖັນຫວ່າງເປົ່າແລ້ວ ແລະບໍ່ມີອັນໃດທີ່ຈະປ້ອງກັນບໍ່ໃຫ້ທ່ານລຶບແຖວເທິງສຸດດ້ວຍສູດໄດ້.
ວິທີທີ່ໄວທີ່ສຸດທີ່ຈະເອົາຖັນຫວ່າງເປົ່າໃນ Excel
ໃນ ການເລີ່ມຕົ້ນຂອງບົດສອນນີ້, ຂ້າພະເຈົ້າໄດ້ຂຽນວ່າບໍ່ມີວິທີຫນຶ່ງຄລິກເພື່ອລຶບຖັນເປົ່າໃນ Excel. ໃນຄວາມເປັນຈິງ, ມັນບໍ່ແມ່ນຄວາມຈິງແທ້ໆ. ຂ້າພະເຈົ້າຄວນຈະເວົ້າວ່າບໍ່ມີວິທີການ inbuilt. ຜູ້ໃຊ້ Ultimate Suite ຂອງພວກເຮົາສາມາດເອົາຊ່ອງຫວ່າງໃນ Excel ອອກໄດ້ໂດຍການຄລິກສອງສາມຄັ້ງ :)
ໃນແຜ່ນວຽກເປົ້າຫມາຍ, ສະຫຼັບກັບແຖບ Ablebits Tools , ໃຫ້ຄລິກໃສ່ Delete Blanks ແລະເລືອກ Empty Columns :
ເພື່ອໃຫ້ແນ່ໃຈວ່ານັ້ນບໍ່ແມ່ນການຄລິກເມົ້າໂດຍບັງເອີນ, add-in ຈະຂໍໃຫ້ທ່ານຢືນຢັນວ່າ. ທ່ານຕ້ອງການລຶບຖັນຫວ່າງເປົ່າອອກຈາກແຜ່ນງານນັ້ນແທ້ໆ:
ຄລິກ ຕົກລົງ , ແລະໃນຂະນະນັ້ນ ຖັນຫວ່າງເປົ່າທັງໝົດຈະຫາຍໄປ!
ເຊັ່ນດຽວກັບມະຫາພາກທີ່ໄດ້ກ່າວມາຂ້າງເທິງ, ເຄື່ອງມືນີ້ຈະລຶບພຽງແຕ່ຖັນເຫຼົ່ານັ້ນທີ່ ຫວ່າງເປົ່າແທ້ໆ . ຖັນທີ່ມີມູນຄ່າດຽວ, ລວມທັງສ່ວນຫົວ, ແມ່ນຮັກສາໄວ້.
ລຶບຊ່ອງຫວ່າງ ເປັນພຽງໜຶ່ງໃນຫຼາຍຄຸນສົມບັດທີ່ປະເສີດທີ່ສາມາດເຮັດໃຫ້ຊີວິດຂອງທ່ານເປັນຜູ້ໃຊ້ Excel ງ່າຍຂຶ້ນ. ເພື່ອຊອກຫາເພີ່ມເຕີມ, ທ່ານສາມາດດາວໂຫລດເວີຊັນທົດລອງຂອງ Ultimate Suite for Excel ຂອງພວກເຮົາໄດ້.
ຖັນເປົ່າບໍ່ໄດ້ຖືກລຶບ! ເປັນຫຍັງ?
ບັນຫາ : ທ່ານໄດ້ລອງວິທີການຂ້າງເທິງທັງໝົດແລ້ວ, ແຕ່ຖັນຫວ່າງເປົ່າໜຶ່ງ ຫຼືຫຼາຍກວ່ານັ້ນຕິດຢູ່ໃນແຜ່ນງານຂອງທ່ານ. ເປັນຫຍັງ?
ສ່ວນຫຼາຍອາດຈະເປັນເພາະຖັນເຫຼົ່ານັ້ນບໍ່ຫວ່າງແທ້ໆ. ຕົວອັກສອນທີ່ແຕກຕ່າງກັນຫຼາຍທີ່ເບິ່ງບໍ່ເຫັນດ້ວຍຕາມະນຸດອາດຈະລີ້ຢູ່ໂດຍບໍ່ໄດ້ສັງເກດເຫັນຢູ່ໃນຕາຕະລາງ Excel ຂອງທ່ານ, ໂດຍສະເພາະຖ້າທ່ານນໍາເຂົ້າຂໍ້ມູນຈາກແຫຼ່ງພາຍນອກ. ນັ້ນອາດຈະເປັນພຽງແຕ່ສະຕຣິງຫວ່າງເປົ່າ ຫຼືຕົວອັກສອນຍະຫວ່າງ, ພື້ນທີ່ບໍ່ແຕກ ຫຼືບາງຕົວອັກສອນທີ່ບໍ່ໄດ້ພິມ. . ຕົວຢ່າງ, ຖັນ C ໃນຮູບໜ້າຈໍຂ້າງລຸ່ມບໍ່ຫວ່າງເປົ່າເນື່ອງຈາກມີຕົວໜັງສືຊ່ອງຫວ່າງດຽວໃນ C6:
ກົດສອງເທື່ອໃນຕາລາງເພື່ອເບິ່ງວ່າມີອັນໃດຢູ່ໃນນັ້ນ ຫຼືງ່າຍໆ. ກົດປຸ່ມ Delete ເພື່ອກໍາຈັດສິ່ງທີ່ບໍ່ຮູ້. ແລະຫຼັງຈາກນັ້ນເຮັດຊ້ໍາຂັ້ນຕອນຂ້າງເທິງເພື່ອຊອກຫາວ່າມີສິ່ງທີ່ເບິ່ງບໍ່ເຫັນອື່ນຢູ່ໃນຖັນນັ້ນ. ເຈົ້າອາດຈະຕ້ອງການເຮັດຄວາມສະອາດຂໍ້ມູນຂອງທ່ານໂດຍການລຶບຊ່ອງຊັ້ນນໍາ, ຕິດຕາມ ແລະບໍ່ທໍາລາຍ.
ຂ້ອຍຂໍຂອບໃຈທີ່ອ່ານ ແລະຫວັງວ່າຈະໄດ້ພົບເຈົ້າໃນບລັອກຂອງພວກເຮົາໃນອາທິດໜ້າ!