ຂໍ້ມູນທີ່ເປັນປະໂຫຍດໃນແຖບສະຖານະ

ບາງຄົນມັກ, ແຕ່ຂ້ອຍເອງຕ້ອງການແຖບສະຖານະພຽງແຕ່ໃນ 2-3 ກໍລະນີ:

  • ຫຼັງຈາກການກັ່ນຕອງ, ມັນສະແດງຈໍານວນຄ່າທີ່ຍັງເຫຼືອຫຼັງຈາກການຄັດເລືອກ
  • ເມື່ອເລືອກໄລຍະໃດໜຶ່ງ, ມັນຈະສະແດງຜົນລວມ, ຄ່າສະເລ່ຍ ແລະຈຳນວນເຊລທີ່ເລືອກ
  • ໃນກໍລະນີຂອງໄຟລ໌ຫນັກ, ທ່ານສາມາດເບິ່ງຄວາມຄືບຫນ້າໃນການຄິດໄລ່ສູດໃນປື້ມ.

ບໍ່ຫຼາຍປານໃດສໍາລັບເສັ້ນທີ່ໃຊ້ເວລາເຖິງເກືອບຄວາມກວ້າງທັງຫມົດຂອງຫນ້າຈໍແລະ hangs ສຸດມັນຕະຫຼອດເວລາ. ໃຫ້ພະຍາຍາມຂະຫຍາຍບັນຊີລາຍຊື່ເລັກນ້ອຍນີ້ແລະເພີ່ມລັກສະນະທີ່ເປັນປະໂຫຍດອີກຈໍານວນຫນ້ອຍຫນຶ່ງໃຫ້ກັບມັນ 🙂

ຫຼັກການທົ່ວໄປສໍາລັບການຄຸ້ມຄອງແຖບສະຖານະ

ການຈັດການແຖບສະຖານະດ້ວຍ Visual Basic ແມ່ນງ່າຍຫຼາຍ. ເພື່ອສະແດງຂໍ້ຄວາມຂອງທ່ານໃນມັນ, ທ່ານສາມາດນໍາໃຊ້ macro ງ່າຍດາຍ:

Sub MyStatus() Application.StatusBar = "Привет!" ຈົບຍ່ອຍ

ຫຼັງຈາກແລ່ນມັນ, ພວກເຮົາໄດ້ຮັບ:

ຂໍ້ມູນທີ່ເປັນປະໂຫຍດໃນແຖບສະຖານະ

ເພື່ອຟື້ນຟູສະຖານະເດີມຂອງແຖບສະຖານະ, ທ່ານຈະຕ້ອງການ "ຕ້ານມະຫາພາກ" ສັ້ນດຽວກັນ:

Sub MyStatus_Off() Application.StatusBar = False End Sub

ໃນສະບັບພື້ນຖານ, ຕາມທີ່ເຈົ້າສາມາດເຫັນໄດ້, ທຸກສິ່ງທຸກຢ່າງແມ່ນງ່າຍດາຍຫຼາຍ. ຕອນນີ້ໃຫ້ພະຍາຍາມພັດທະນາແນວຄວາມຄິດ…

ທີ່ຢູ່ຂອງຊ່ວງທີ່ເລືອກໃນແຖບສະຖານະ

 ໃນມຸມຊ້າຍເທິງຂອງປ່ອງຢ້ຽມ Excel ໃນແຖບສູດ, ທ່ານສາມາດເບິ່ງທີ່ຢູ່ຂອງຕາລາງປະຈຸບັນໄດ້ຕະຫຼອດເວລາ. ແຕ່ຖ້າເລືອກທັງໝົດ, ໂຊກບໍ່ດີ, ພວກເຮົາຈະບໍ່ເຫັນທີ່ຢູ່ທີ່ເລືອກຢູ່ບ່ອນນັ້ນ - ໜ່ວຍດຽວທີ່ເຮັດວຽກດຽວກັນຈະສະແດງ:

ຂໍ້ມູນທີ່ເປັນປະໂຫຍດໃນແຖບສະຖານະ

ເພື່ອແກ້ໄຂບັນຫານີ້, ທ່ານສາມາດນໍາໃຊ້ macro ງ່າຍດາຍທີ່ຈະສະແດງທີ່ຢູ່ຂອງພື້ນທີ່ທີ່ເລືອກໃນແຖບສະຖານະ. ຍິ່ງໄປກວ່ານັ້ນ, ມະຫາພາກນີ້ຄວນຈະຖືກເປີດຕົວໂດຍອັດຕະໂນມັດ, ມີການປ່ຽນແປງໃດໆໃນການຄັດເລືອກໃນເອກະສານໃດໆ - ສໍາລັບນີ້ພວກເຮົາຈະວາງມັນໄວ້ໃນຕົວຈັດການເຫດການ. ການປ່ຽນແປງການເລືອກ ປື້ມຂອງພວກເຮົາ.

ເປີດ Visual Basic Editor ໂດຍໃຊ້ປຸ່ມຂອງຊື່ດຽວກັນຢູ່ໃນແຖບ ການພັດທະນາ (ຜູ້ພັດທະນາ) ຫຼືປຸ່ມລັດແປ້ນພິມ ຊ້າຍ Alt+F11. ຊອກຫາປຶ້ມຂອງທ່ານໃນມຸມຊ້າຍເທິງຂອງແຜງໂຄງການ ແລະເປີດໂມດູນໃນມັນໂດຍການຄລິກສອງຄັ້ງ ຫນັງສືເຫຼັ້ມນີ້ (ປື້ມຄູ່ມືນີ້):

ໃນປ່ອງຢ້ຽມທີ່ເປີດ, ຄັດລອກແລະວາງລະຫັດມະຫາພາກຕໍ່ໄປນີ້:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Application.StatusBar = "Выделено: " & Selection.Address(0, 0) End Sub

ດຽວນີ້, ເມື່ອເລືອກຊ່ວງໃດນຶ່ງ (ລວມທັງຫຼາຍກວ່າໜຶ່ງ!), ທີ່ຢູ່ຂອງມັນຈະສະແດງຢູ່ໃນແຖບສະຖານະ:

ຂໍ້ມູນທີ່ເປັນປະໂຫຍດໃນແຖບສະຖານະ

ເພື່ອປ້ອງກັນບໍ່ໃຫ້ທີ່ຢູ່ຂອງຫຼາຍໆໄລຍະທີ່ເລືອກດ້ວຍ Ctrl ຈາກການລວມເຂົ້າກັນ, ທ່ານສາມາດເພີ່ມການປັບປຸງເລັກນ້ອຍ - ໃຊ້ຟັງຊັນ Replace ເພື່ອແທນທີ່ເຄື່ອງໝາຍຈຸດດ້ວຍເຄື່ອງໝາຍຈຸດທີ່ມີຊ່ອງຫວ່າງ:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Application.StatusBar = "Выделено: " & Replace(Selection.Address(0, 0), ",", ", ") End Sub

ຈຳນວນຕາລາງທີ່ເລືອກໃນແຖບສະຖານະ

ເມື່ອເລືອກຊ່ວງໃດນຶ່ງ, ຈຳນວນຂອງເຊລທີ່ເລືອກທີ່ບໍ່ຫວ່າງເປົ່າຈະສະແດງຢູ່ເບື້ອງຂວາຂອງແຖບສະຖານະຕາມຄ່າເລີ່ມຕົ້ນ. ບາງຄັ້ງທ່ານຈໍາເປັນຕ້ອງຮູ້ຈໍານວນການຈັດສັນ. ວຽກງານນີ້ຍັງສາມາດສໍາເລັດດ້ວຍມະຫາພາກທີ່ງ່າຍດາຍເພື່ອຈັດການກັບເຫດການປື້ມ SelectionChange, ເຊັ່ນດຽວກັບຕົວຢ່າງທີ່ຜ່ານມາ. ທ່ານຈະຕ້ອງການ macro ເຊັ່ນ:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Dim CellCount as Variant, rng As Range for each rng In Selection.Areas 'Iterate through all selections RowsCount = rng.Rows.Count 'ຈຳນວນແຖວ ColumnsCount = rng. . Count 'ຈຳນວນຖັນ CellCount = CellCount + RowsCount * ColumnsCount 'ສະສົມຈຳນວນທັງໝົດຂອງເຊລ Next' ສະແດງຢູ່ໃນແຖບສະຖານະ Application.StatusBar = "ເລືອກ: " & CellCount & " cells" End Sub

macro ນີ້ loops ຜ່ານທຸກພື້ນທີ່ທີ່ເລືອກ Ctrl (ຖ້າມີຫຼາຍກວ່າຫນຶ່ງ), ເກັບຮັກສາຈໍານວນແຖວແລະຄໍລໍາໃນແຕ່ລະພື້ນທີ່ຢູ່ໃນຕົວແປ RowsCount ແລະ ColumnsCount, ແລະສະສົມຈໍານວນຈຸລັງຢູ່ໃນຕົວແປ CellCount, ເຊິ່ງຫຼັງຈາກນັ້ນຈະຖືກສະແດງ. ໃນແຖບສະຖານະ. ໃນ​ການ​ເຮັດ​ວຽກ​ມັນ​ຈະ​ເປັນ​ດັ່ງ​ນີ້​:

ຂໍ້ມູນທີ່ເປັນປະໂຫຍດໃນແຖບສະຖານະ

ແນ່ນອນ, ທ່ານສາມາດສົມທົບການນີ້ແລະ macros ທີ່ຜ່ານມາເພື່ອສະແດງທັງທີ່ຢູ່ຂອງຊ່ວງທີ່ເລືອກແລະຈໍານວນຈຸລັງໃນເວລາດຽວກັນ. ທ່ານ​ພຽງ​ແຕ່​ຕ້ອງ​ການ​ທີ່​ຈະ​ປ່ຽນ​ເສັ້ນ penultimate ຫນຶ່ງ​ເພື່ອ​:

Application.StatusBar = "ເລືອກ: " & Replace(Selection.Address(0, 0), ",", ", ") & " - ຈໍານວນທັງຫມົດ " & CellCount & " cells"

ຫຼັງຈາກນັ້ນ, ຮູບພາບຈະດີຫຼາຍ:

ຂໍ້ມູນທີ່ເປັນປະໂຫຍດໃນແຖບສະຖານະ

ດີ, ຂ້າພະເຈົ້າຄິດວ່າທ່ານໄດ້ຮັບຄວາມຄິດ. ແນະນໍາໃນຄໍາເຫັນ - ສິ່ງອື່ນທີ່ເປັນປະໂຫຍດທີ່ຈະສະແດງຢູ່ໃນແຖບສະຖານະ?

  • ມະຫາພາກແມ່ນຫຍັງ, ພວກມັນເຮັດວຽກແນວໃດ, ໃຊ້ ແລະສ້າງພວກມັນ
  • ການເລືອກປະສານງານທີ່ສະດວກໃນເອກະສານ Excel
  • ວິທີການເຮັດໃຫ້ສູດສະລັບສັບຊ້ອນຫຼາຍສາຍຕາ

ອອກຈາກ Reply ເປັນ