Células de referência de outras tabelas na tabela de modo organizacional

8

Eu tenho um documento longo com 10 tabelas e quero ter uma tabela de resumo no final do documento. Algo parecido:

tab1

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

...

tab10

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

resumo da guia

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

Existe uma maneira de referenciar o total de cada tabela, em vez de copiar manualmente os resultados na tabela de resumo?

Jeff
fonte

Respostas:

13

Você está procurando referências de tabela 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)

Observe que esta pergunta já tem uma resposta: Como referenciar tabela nomeada ou bloco de código no modo de organização


Você pode até gerar tab-summaryautomaticamente. Isso é fácil se as fórmulas puderem ser gravadas diretamente nas células da tabela. A seguir, ctrl-c-ctrl-c-hookvocê pode instalar todas as fórmulas da tabela a partir das células.

(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)

A geração automática da tabela de soma total é mostrada no exemplo a seguir:

#+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) |

O exemplo mostra a tabela como resultado da execução do bloco de origem emacs lisp.

Se você instalou o org-ctrl-c-ctrl-c-hookponto de posição acima na tabela de soma total e pressione, C-c C-cobtém a seguinte tabela:

| 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)
Tobias
fonte
3
Como posso fazer isso ( remote) em uma fórmula elisp?
Zelphir Kaltstahl