Redesigner mensam

Contents

Non occultum est quod maxime Excel users, cum tabulas in chartis creant, primum de proprio commodo et commodo cogitare. Haec quam pulchra, varia et gravia nascuntur tabulae cum complexu "capitis", quae simul eliquari vel digesti non possunt, et melius est non cogitare de fama latae tabulae cum cardine.

Serius vel serius, usus talis mensae concluditur quod "non ita sit pulchrum, sed operari potest" et incipit consilium mensae suae simpliciorem reddere, eamque in linea cum commendatione classica:

  • simplex caput unius lineae, ubi unaquaeque columna nomen proprium habebit (agri nomen)
  • una linea - una operatio completa (paciscor, venditio, dispositio, project, etc.)
  • nulla merged amet
  • sine rumpit formam vacuas ordines columnasque

Sed si unum caput ex pluribus gradibus unum vel unam columnam in plures dividere facias, satis simplex est, mensa refectionis multum temporis (praesertim in magnis magnitudinibus). Significat sequenti condicionem:

Of     Redesigner mensam   do     Redesigner mensam  

Secundum databases, tabula recta vulgo plana (plana) appellatur - secundum eas tabulas ut optima est tabulas cardolium (mensas) et analyticas ducere.

Mensam duplicem dimensivam ad planam mensam convertere potes simplici tortor utens. Aperi Visual Basic Editor per tab Developer - Visual Basic (Developer - Visual Basic Editor) aut claviaturae alt+F11. Modulus novus inserta (Inserere - OMNIBUS) et textum huius tortoris ibi transcribo:

Sub Redesigner() Dim i As Long Dim hc Ut Integer, hr Ut Integer Dim ns Ut Officina hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Слеолько столабцов? Falsum i = 1 Pone inpdata = Electio Pone ns = massa.Add Pro r = (hr + 1) Ad inpdata.Rows.Count Pro c = (hc + 1) Ad inpdata.Columns.Count Pro j = 1 Ad hc ns. Cellae(i, j) = inpdata.Cells(r, j) Next j For k = 1 Ad hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) Proxima k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 Next c Next r End Sub.  

Potes igitur editorem VBA claudere et ad Excel. Nunc tabulam originalem (omnino cum titulo et columna prima cum mensibus eligere possumus) ac tortorem nostram percurrere Elit - Macros (Developer - Macros) aut urgeat combination alt+F8.

Tortor novam schedam in librum inseret et novam, delectae tabulae in ea versionem restitutam, creabit. Talem mensam "in plena" operari potes, totam armamentarium Praecedo instrumentorum ad magnas tabulas expediendas et dividendas.

  • Quae sunt macra, ubi tortor codicem in VBA inserere, quomodo utatur?
  • Partum Renuntiationes cum PivotTables
  • Instrumentum ad redesign XNUMXD tabulas ad planas e plexu addendi

 

Leave a Reply