Celle di riferimento di altre tabelle nella tabella modalità org


8

Ho un lungo documento con 10 tabelle e desidero avere una tabella di riepilogo alla fine del documento. Qualcosa del genere:

TAB1

| Nº | Description | Value |
+----+-------------+-------+
|...                       |
+----+-------------+-------+
|    | TOTAL       |   XXX |

...

tab10

| Nº | Description | Value |
+----+-------------+-------+
|...                       |
+----+-------------+-------+
|    | TOTAL       |   XXX |

tab-sintesi

| Description      | Value |
+------------------+-------|
| Total of Table 1 |   XXX |
| Total of Table 2 |   XXX |
| ...                      |
+------------------+-------|
| Grand Total      |   XXX |

C'è un modo per fare riferimento al totale di ogni tabella, invece di copiare manualmente i risultati nella tabella di riepilogo?

Risposte:


13

Stai cercando riferimenti a tabella remota :

#+TBLNAME: tab1
| Nº  | Description | Value |
|-----+-------------+-------|
|     | TOTAL       |     1 |

...

#+TBLNAME: tab10
| Nº | Description | Value |
|----+-------------+-------|
|    | TOTAL       |     2 |

tab-summary
| Description       | Value |
|-------------------+-------|
| Total of Table 1  |     1 |
| Total of Table 10 |     2 |
|-------------------+-------|
| Grand Total       |     3 |
#+TBLFM: @2$2=remote(tab1,@2$3)::@3$2=remote(tab10,@2$3)::@>$2=vsum(@I$2..@II$2)

Nota, questa domanda ha già una risposta lì: Come fare riferimento a tabella denominata o blocco di codice in modalità Org


Puoi persino generare tab-summaryautomaticamente. Questo è facile se le formule possono essere scritte direttamente nelle celle della tabella. Di seguito ctrl-c-ctrl-c-hookè possibile installare tutte le formule di tabella dalle celle.

(defun org-table-install-formulas ()
  "Install formulas in cells starting with = or := at the bottom of the table as #+TBLFM line.
Do nothing when point is not inside a table."
  (interactive)
  (when (org-table-p)
    (save-excursion
      (goto-char (org-table-begin))
      (org-table-next-field)
      (while (progn
           (org-table-maybe-eval-formula)
           (looking-at "[^|\n]*|\\([[:space:]]*\n[[:space:]]*|\\)?[^|\n]*\\(|\\)"))
    (goto-char (match-beginning 2)))
      ))
  nil)

(add-hook #'org-ctrl-c-ctrl-c-hook #'org-table-install-formulas)

La generazione automatica della tabella di somma totale è mostrata nell'esempio seguente:

#+TBLNAME: tab1
| Nº  | Description | Value |
|-----+-------------+-------|
|     | TOTAL       |     1 |

...

#+TBLNAME: tab2
| Nº | Description | Value |
|----+-------------+-------|
|    | TOTAL       |     2 |

#+TBLNAME: tab3
| Nº | Description | Value |
|----+-------------+-------|
|    | TOTAL       |     3 |


#+BEGIN_SRC emacs-lisp :var basename="tbl" start=1 stop=3
(append
 '(("Description" "Value")
   hline)
   (cl-loop for i from start upto stop
        collect (list (format "Total of Table %d" i) (format ":=remote(tab%d,@>$3)" i)))
   '(
     hline
     ("Grand Total" ":=vsum(@I$2..@II$2)")))
#+END_SRC

#+RESULTS:
| Description      | Value               |
|------------------+---------------------|
| Total of Table 1 | :=remote(tab1,@>$3) |
| Total of Table 2 | :=remote(tab2,@>$3) |
| Total of Table 3 | :=remote(tab3,@>$3) |
|------------------+---------------------|
| Grand Total      | :=vsum(@I$2..@II$2) |

L'esempio mostra la tabella come risulta dall'esecuzione del blocco sorgente emacs lisp.

Se hai installato il org-ctrl-c-ctrl-c-hookpunto sopra indicato nella tabella della somma totale e premi C-c C-c, otterrai la seguente tabella:

| Description      | Value |
|------------------+-------|
| Total of Table 1 |     1 |
| Total of Table 2 |     2 |
| Total of Table 3 |     3 |
|------------------+-------|
| Grand Total      |     6 |
#+TBLFM: @2$2=remote(tab1,@>$3)::@3$2=remote(tab2,@>$3)::@4$2=remote(tab3,@>$3)::@5$2=vsum(@I$2..@II$2)

3
Come posso fare questo ( remote) in una formula elisp?
Zelphir Kaltstahl,
Utilizzando il nostro sito, riconosci di aver letto e compreso le nostre Informativa sui cookie e Informativa sulla privacy.
Licensed under cc by-sa 3.0 with attribution required.