Electio coordinare

Magnum monitorem habes, sed mensas cum operaris maiora sunt. Et, perspicientes velum ad quaerendas notitias necessarias, semper facultas est "labi" oculos tuos ad lineam proximam et in partem non rectam intueri. Etiam scio homines qui, pro talibus occasionibus, ligneum principem semper tenent, ut eos ad lineam monitoris adiungat. Technologiae futuri! 

Et si current ordo et columna extolluntur quando cellula activa trans schedam movetur? Electio quaedam ordinatissima sic est:

Melius quam princeps, vox?

Plures modi variae multiplicitatis ad hoc efficiendum. Quisque modus pros et cons habet. Inspice singillatim.

Modus 1. Patet. Tortor qui currentem ordinem et columnam effert

Perspicuus modus est ad solvendum quaestionem nostram "in fronte" - tortor indigemus qui mutationem electionis in scheda vestiet et totum ordinem et columnam pro cellula currenti seliget. Optandum etiam est ut hoc munus, si opus sit, efficere possit ac disable, ut talis lectio transversalis nos non impediat, exempli gratia formulas, sed opera tantum, cum per album quaerendum necessarias inspicimus. indicium. Hoc nos ad tres macros (selectis, dativos et disable) nos ad schedae moduli adiungendas esse oportebit.

Aperi linteum cum tabula, in qua talem delectu coordinare vis. Dextra click in scheda tab et eligere mandatum ex contextu menu Source text (Source codicis).Fenestra Editor Visual Basic aperiat. Effingo hunc textum horum trium tortorum in illum:

Dim Coord_Selection Ut Boolean 'Global variabilis lectio in/off Sub Selection_On() 'Macro in lectio Coord_Selection = Verum finem Sub Selection_Off () 'Macro off lectio Coord_Selection = Falsum Finem Sub' Praecipua ratio faciens electionem Secretum Sub Worksheet_SelectionChange (ByVal Target As Range) Dim WorkRange sicut dolor si Target.Cells.Count> 1 Tunc Exit Sub 'si plus quam I cellula est electus, exitus Si Coord_Selection = Falsa Tunc Exit Sub' si lectio est off, exit Application.ScreenUpdating = Falsus Set WorkRange = Range ("A1:N6") oratio "inscriptio operis range intra quam electio est visibile"

Muta electronicam range laborantis ad tuam propriam – intra hoc ambitum ut nostra lectio operabitur. Tunc claude Editorem Visual Basic et ad Excel.

Press tincidunt brevis Alt + F8ut fenestram aperiat cum indice ma- rarum in promptu. Macro Election_Onut coniicere possis, in scheda hodierna includuntur coordinare ac macro Election_Off - vertit eum. In eadem fenestra, strepitando puga Morbi (Options) Potes claviaturas ad has macros faciles mittere.

Commoda huius methodi:

  • otium of implementation
  • lectio - operatio innocens est et contentum seu formatura schedae quovis modo mutat, omnia ut res est manet.

Cons hujus methodi;

  • talis lectio non recte operatur si cellulae in scheda confundantur - omnes ordines et columnae in unione inclusae statim selguntur.
  • si accidens clavem Delete premes, tunc non solum cellula activa patebit, sed area tota selecta, id est notitia totius ordinis et columnae delete.

Modus 2. Original. CELL + Conditionalis Formatting Function

Haec ratio, licet duo vitia habeat, perelegans mihi videtur. Ad efficiendum aliquid utens modo instrumenta in Praecedo constructa, minime in programmando in VBA aerobatica sunt.

Modus est usus functionis CELL, quae multam informationem variam dare potest in data cellula, altitudine, latitudine, columna numero, forma numero, etc. Hoc munus duas rationes habet;

  • signum verbi parametri, ut "columna" vel "ordo"
  • inscriptione cellae cuius pretium huius moduli definire velimus

Dolum est secundum argumentum ad libitum. Si non specificatur, cellula activa currenti sumatur.

Secunda pars huius methodi est forma conditionalis. Hoc perquam utile Praecedo pluma sinit ut cellulas automatice format si condiciones certas offendunt. Si has duas ideas in unam coniungimus, sequentem algorithmum consequimur ad electionem nostram coordinatam per formationem conditionalem exsequendam:

  1. Mensam nostram, id est cellulas nostras eligimus in quibus delectu ordinatio in futuro exhibenda est.
  2. In Excel 2003 et maior, tabulam aperi Forma - Conditionalis Formatting - Formulae (Forma - Formatting Conditionalis - Formulae). In Praecedo 2007 et recentiore - click in tab domum (Domus)ipsum Conditionalis Formatting - Regula crea (Conditional Formatting - Create Rule) et eligere regulae genus Formula uter uter uter ad format (Formula usus)
  3. Ingrediatur formula delectu coordinata nostra:

    = OR(CEL("RO")=RO(A2), CELL("column")=column(A2))

    = OR(CEL(«row»)=ROW(A1), CELL(«column»)= COLUMN(A1))

    Haec formula coercet, si columnae cuiusque cellae in tabula eadem sit ac columnae numerus cellae currentis. Item cum columnis. Ita solum illae cellulae quae habent numerum vel numerum columnae vel ordinem numerorum quae cellae hodiernae congruit, implebuntur. Haec est lectio coordinata, quam consequi cupimus.

  4. torcular Framework (Forma) et implebis colorem.

Omnia fere parata sunt, sed una nugatio est. Praecedo quod non considerat mutationem lectionis quam mutationem in notitia in scheda. Et, consequenter, formularum recalculationem non felis nec formationem conditionalem decolorans solum cum positio cellae activae mutatur. Ideo addamus simplicem tortor ad schedae moduli qui hoc faciet. Dextra click in scheda tab et eligere mandatum ex contextu menu Source text (Source codicis).Fenestra Editor Visual Basic aperiat. Effingo hunc textum simplicis tortoris in illum:

Privatus Sub Worksheet_SelectionChange (ByVal target sicut dolor) ActiveCell.Calculate finem Sub

Nunc, cum delectu mutatur, processus formulae recalculandi cum functione deducetur CELLA in forma conditionali et inundare currentem ordinem et columnam.

Commoda huius methodi:

  • Conditionalis forma non frangit consuetudinem mensam formatting
  • Optio haec lectio cum cellulis immersis recte operatur.
  • Nullum periculum deletionis totius ordinis et columnae notitiarum in fortuito clic Delete.
  • Macros minime usus est

Cons hujus methodi;

  • Formula formandi conditionalis manually ingredi debet.
  • Non est velox via ut talis formatio possit / disable - semper para est donec regula deleta est.

Modus 3. Optimal. Forma conditionalis + Macros

Aurea mediocritas. Mechanismum utimur ad investigationem electionis in scheda utendo macros ex methodo-1 et in tuto ponendo addimus ad eam utendo condicionali ex methodo-2.

Aperi linteum cum tabula, in qua talem delectu coordinare vis. Dextra click in scheda tab et eligere mandatum ex contextu menu Source text (Source codicis).Fenestra Editor Visual Basic aperiat. Effingo hunc textum horum trium tortorum in illum:

Dim Coord_Selection As Boolean Sub Election_On() Coord_Selection = True Fin Sub Sub Sub Selection_Off() Coord_Selection = False Finis Sub Secreto Sub Worksheet_SelectionChange(ByVal Target As Range) Dim WorkRange Ut Range, CrossRange sicut Range Set WorkRange = Range ("A7:N300") 'адрес рабочего диапазона с таблицей Si Target.Count> I Tunc Exit Sub Si Coord_Selection = Falsa Tunc WorkRange.FormatConditions.Delete Exit Sub finem Si Application.ScreenUpdating = Falsa si non secent (Target, WorkRange si non secent (Target, WorkRange. WorkRange, Unionis (Target.EntireRow, Target.EntireColumn)) WorkRange.FormatConditions.Delete CrossRange.FormatConditions.Add Type:=xlExpression, Formula1:="=1" CrossRange.FormatConditions(1).Interior.ColorIndex = 1 Target.FormatConditions .Delete finem si finem Sub

Noli oblivisci ut rhoncus laborantem electronicam ad mensam tuam mutes. Claudere Visual Basic Editor et ad Excel. Uti adiectis utentis, pressuris claviaturae Alt + F8  ac pergamus eodem modo ac ratione 1 . 

Modus 4. Speciosa. FollowCellPointer addendi supra

Excel MVP Jan Karel Pieterse e Belgio liberam addendi in suo loco donatam donat FollowCellPointer(36Kb), quod problema idem solvit lineas sagittas graphicas trahendo utentes macros ad exaggerandam ordinem et columnam currentem;

 

Nice solutio. Non sine glitches in locis, sed experimentum certum pretium. Tabularium exsculpe, illud ad disci et in modum addendi install;

  • in Excel MMIII et maior - per menu Service - Add-ons - Overview (Instrumenta - Add-Ins - Browse)
  • in Excel 2007 et postea, per Fasciculus - Optiones - additiones Add - Ite - Browse (File - Excel Options - Add-Ins - Perge ad - Browse)

  • Quae sunt macra, ubi tortor codicem inserere in Visual Basic

 

Leave a Reply