Fiosrachadh feumail anns a’ bhàr inbhe

Is toil le cuideigin, ach gu pearsanta feumaidh mi bàr inbhe a-mhàin ann an cùisean 2-3:

  • às deidh sìoladh, bidh e a’ taisbeanadh an àireamh de luachan a tha air fhàgail às deidh an taghadh
  • nuair a thèid raon a thaghadh, bidh e a’ taisbeanadh suim, cuibheasachd, agus àireamh nan ceallan taghte
  • a thaobh faidhlichean troma, chì thu an adhartas ann a bhith ag ath-àireamhachadh fhoirmlean san leabhar.

Chan eil uimhir airson loidhne a bheir suas cha mhòr leud an sgrion gu lèir agus a tha crochte air fad na h-ùine. Feuchaidh sinn ris an liosta bheag seo a leudachadh agus beagan fheartan feumail eile a chur ris 🙂

Prionnsabalan coitcheann airson a bhith a 'stiùireadh a' bhàr inbhe

Tha e glè fhurasta am bàr inbhe a riaghladh le Visual Basic. Gus an teacsa agad a thaisbeanadh ann, faodaidh tu macro sìmplidh a chleachdadh:

Sub MyStatus() Application.StatusBar = "Pròiseact!" Deireadh Fo

Às deidh dhuinn a ruith, gheibh sinn:

Fiosrachadh feumail anns a’ bhàr inbhe

Gus staid tùsail a’ bhàr inbhe a thoirt air ais, bidh feum agad air an aon “anti-macro” goirid:

Fo MyStatus_Off() Application.StatusBar = Deireadh meallta Fo

Anns an dreach bunaiteach, mar a chì thu, tha a h-uile dad gu math sìmplidh. A-nis feuchaidh sinn ris a’ bheachd a leasachadh…

Seòladh an raoin taghte sa bhàr inbhe

 Anns an oisean gu h-àrd air an taobh chlì den uinneag Excel anns a 'bhàr fhoirmeil, chì thu an-còmhnaidh seòladh na cealla làithreach. Ach ma thèid raon slàn a thaghadh, an uairsin, gu mì-fhortanach, chan fhaic sinn an seòladh taghaidh an sin - tha an aon chealla gnìomhach singilte air a thaisbeanadh:

Fiosrachadh feumail anns a’ bhàr inbhe

Gus an duilgheadas seo fhuasgladh, faodaidh tu macro sìmplidh a chleachdadh a sheallas seòladh na sgìre taghte sa bhàr inbhe. A bharrachd air an sin, bu chòir am macro seo a chuir air bhog gu fèin-ghluasadach, le atharrachadh sam bith san taghadh air duilleag sam bith - airson seo cuiridh sinn e ann an làimhseachadh an tachartais Atharrachadh taghaidh ar leabhar.

Fosgail an Deasaiche Visual Basic a ’cleachdadh a’ phutan den aon ainm air an taba -leasachaidh (Leasaiche) no ath-ghoiridean meur-chlàr Air chlì Alt+F11. Lorg do leabhar anns an oisean gu h-àrd air an taobh chlì de phannal a’ Phròiseict agus fosgail am modal ann le bhith a’ briogadh dùbailte An leabhar seo (An Leabhar-obrach Seo):

Anns an uinneag a tha a’ fosgladh, dèan lethbhreac agus pasg air a’ chòd macro a leanas:

Fo-leabhar-obrach prìobhaideach_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Application.StatusBar = "Выделено:" & Selection.Address(0, 0) End Sub

A-nis, nuair a thèid raon sam bith a thaghadh (a’ toirt a-steach barrachd air aon!), Thèid an seòladh aige a thaisbeanadh anns a’ bhàr inbhe:

Fiosrachadh feumail anns a’ bhàr inbhe

Gus casg a chuir air seòlaidhean grunn raointean a chaidh a thaghadh le Ctrl bho bhith a’ tighinn còmhla, faodaidh tu leasachadh beag a chuir ris - cleachd an gnìomh Replace gus cromag le àite a chuir an àite cromag:

Leabhar-obrach prìobhaideach_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Application.StatusBar = "Выделено:" & Replace(Selection.Address(0, 0), ",",", ",") Crìoch fo

An àireamh de cheallan taghte anns a’ bhàr inbhe

Nuair a thèid raon sam bith a thaghadh, thèid an àireamh de cheallan taghte neo-fholamh a thaisbeanadh air taobh deas a’ bhàr inbhe gu bunaiteach. Uaireannan feumaidh tu fios a bhith agad air an àireamh de riarachadh. Faodar an obair seo a choileanadh cuideachd le macro sìmplidh gus an tachartas leabhraichean SelectionChange a làimhseachadh, mar a chithear san eisimpleir roimhe. Bidh feum agad air macro mar:

Fo leabhar-obrach prìobhaideach_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 'àireamh shreathan ColumnsCount = rng.Column . Cunnt 'àireamh nan colbhan CellCount = CellCount + RowsCount * ColumnsCount 'cruinnich àireamh iomlan nan ceallan Next' taisbeanadh ann am bàr na h-inbhe Application.StatusBar = "Thaghte:" &CellCount &" cealla" Crìoch fo

Bidh am macro seo a’ lùbadh tro na raointean taghte Ctrl gu lèir (ma tha barrachd air aon ann), a’ stòradh na h-àireimh de shreathan is cholbhan anns gach raon anns na caochladairean RowsCount agus ColumnsCount, agus a’ cruinneachadh àireamh nan ceallan anns an caochladair CellCount, a tha an uairsin air a thaisbeanadh anns a 'bhàr inbhe. Aig an obair seallaidh e mar seo:

Fiosrachadh feumail anns a’ bhàr inbhe

Gu dearbh, faodaidh tu seo agus na macros roimhe a chur còmhla gus an dà chuid seòladh an raoin taghte agus an àireamh de cheallan a thaisbeanadh aig an aon àm. Chan fheum thu ach aon loidhne mu dheireadh atharrachadh gu:

Application.StatusBar = "Taghte: "&Replace(Selection.Address(0, 0),", ",", ",") & " - iomlan" &CellCount &" cealla"

An uairsin bidh an dealbh gu math iongantach:

Fiosrachadh feumail anns a’ bhàr inbhe

Uill, tha mi a’ smaoineachadh gum faigh thu am beachd. Mol anns na beachdan - dè eile a bhiodh feumail a thaisbeanadh sa bhàr inbhe?

  • Dè a th’ ann am macros, mar a tha iad ag obair, mar a chleachdas iad agus mar a chruthaicheas iad iad
  • Taghadh co-òrdanachaidh goireasach air duilleag Excel
  • Mar a nì thu foirmlean iom-fhillte nas lèirsinneach

Leave a Reply