Ùn hè micca un sicretu chì a maiò parte di l'utilizatori di Excel, quandu creanu tavule nantu à fogli, pensanu prima di tuttu à u so propiu cunfortu è comodità. Hè cusì chì nascenu tavulini belli, culuriti è ingombranti cù "headers" cumplessi, chì, à u stessu tempu, ùn ponu micca esse filtrati o ordenati in tuttu, è hè megliu micca pensà à un rapportu automaticu cù una tavola pivot.
Prima o dopu, l'utilizatori di un tali tavulinu venenu à a cunclusione chì "ùn pò esse micca cusì bellu, ma pò travaglià" è principia à simplificà u disignu di a so tavola, purtendu in linea cù i cunsiglii classici:
- un intestazione simplice di una linea, induve ogni colonna averà u so nome unicu (nome di campu)
- una linea - una operazione cumpleta (affare, vendita, pubblicazione, prughjettu, etc.)
- senza cellule unite
- senza rotture in forma di fila vacanti è colonne
Ma s'è vo fate un capu di una sola linea da un multi-livellu o split una colonna in parechji, hè abbastanza simplice, allura a ricustruzzione di a tavula pò piglià assai tempu (in particulare in grandezza grande). Significa a seguente situazione:
| Of |  | do |  |
In termini di basa di dati, a tavula ghjusta hè generalmente chjamata flat (flat) - hè sicondu tali tavule chì hè megliu di custruisce rapporti di tavule pivot (pivot tables) è cunduce analitiche.
Pudete cunvertisce una tavula bidimensionale à una tavula plana cù una macro simplice. Aprite l'Editor Visual Basic via a tabulazione Sviluppatore - Visual Basic (Sviluppatore - Visual Basic Editor) o scorciatoia da tastiera Alt+F11. Inserite un novu modulu (Inserisce - Modulu) è copià u testu di sta macro quì:
Sub Redesigner() Dim i As Long Dim hc As Integer, hr As Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько строк сколько строк False i = 1 Set inpdata = Selezzione Set ns = Worksheets.Add For r = (hr + 1) To inpdata.Rows.Count For c = (hc + 1) To inpdata.Columns.Count For j = 1 To hc ns. Cells(i, j) = inpdata.Cells(r, j) Next j For k = 1 To hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) Next k ns.Cells( i, j + k - 1) = inpdata.Celle (r, c) i = i + 1 Next c Next r End Sub Pudete tandu chjude l'editore VBA è torna à Excel. Avà pudemu selezziunà a tavola originale (completamente, cù un intestazione è a prima colonna cù mesi) è eseguisce a nostra macro. Sviluppatore - Macros (Sviluppatore - Macros) o cumminazzioni pressendu Alt+F8.
A macro inserisce un novu fogliu in u libru è crea una nova versione ricostruita di a tavola selezziunata nantu à questu. Pudete travaglià cù una tale tavola "in piena", utilizendu l'arsenale tutale di l'arnesi Excel per processà è analizà e grandi liste.
- Chì sò i macros, induve inserisce u codice macro in VBA, cumu utilizà
- Creazione di rapporti cù PivotTables
- Strumenta per redesignà e tavule XNUMXD à i piani da u PLEX add-on