Per prima cosa dal risorse del computer accedere alla cartella principale di Adhoc e fare una copia del file excel rinominandolo.
Per chi ha Office 97 il file si chiama ANBIL97.XLS, per Office 2000 o XP ANBIL00.XLS.
Nel caso dell'esempio, essendo la sigla dell'azienda PEU, l'ho chiamato ANBILPEU.XLS.
In Adhoc, nel menù 'Utility', 'Programmi di utility', 'Amministrazione sistema', selezionare la voce 'Impostazione procedure esterne' e nel campo 'Foglio Excel' inserire il percorso del file rinominato in precedenza.
Nel bilancio di Adhoc lanciare la stampa in Excel, tramite il pulsante
. Posizionarsi sul foglio Bilancio da Adhoc ed eseguire le seguenti operazioni.
Posizionarsi sulla prima cella libera della colonna A
Nel menù 'Dati' accedere a 'Carica dati esterni' e selezionare la voce 'Nuova query su database'.
Selezionare 'Tabelle di visual foxpro' e confermare con OK.
Configure Connection: verificare che sia abilitata 'Free table directory' e indicare il percorso della cartella USRTMP (presente nella cartella di Adhoc). Confermare con OK.
Cliccare su
della tabella del bilancio. Nel caso dell'esempio TBILA_1_ (il numero può essere diverso e dipende dal codice utente con cui si è entrati nel programma). TBI_0_ non va considerato. Selezionare TSCODICE e premere
Fare la stessa cosa con TSDESPIA, TS__DARE e TS_AVERE. Confermare con AVANTI.
Colonna da filtrare: selezionare TSCODICE
In 'Includi solo le righe' mettere 'Non termina con' e nella colonna a destra mettere 000. Confermare con AVANTI.
Ordina per: selezionare TSCODICE.
Verificare che sia abilitata la voce 'Crescente' e confermare con AVANTI.
Abilitare 'Restituisci i dati a Microsoft Excel' e premete SALVA QUERY.
Indicare la cartella di Adhoc. Mettere il nome del file (nell'esempio bilanpeu.dqy) e salvare.
Sovrascrivere eventualmente quello già esistente.
Confermare con FINE e dare OK nelle successive maschere.
Eliminare le vecchie righe (le prime del foglio).
Selezionare la voce 'Sposta celle in alto'
Posizionarsi sulla prima riga della colonna 'Saldo' di un sottoconto (E4) e mettere nella barra della formula come indicato in figura.
La cella precedente (E4) risulta col bordo in basso a destra più spesso. Cliccarci col tasto sinistro del mouse e trascinare fino all'ultima riga.
Compariranno in tale maniera gli importi su tutte le righe.
Posizionarsi sul foglio di Excel Piano dei Conti di Adhoc
Selezionare la prima cella libera della colonna A
Nel menù 'Dati', accedere a 'Carica dati esterni' e selezionare la voce 'Nuova query su database'.
Selezionare 'Tabelle di visual foxpro' e confermare con OK.
Configure Connection: verificare che sia abilitata la voce 'Free table directory' e indicare il percorso dell'archivio del piano dei conti. Normalmente si trova nella sottocartella con lo stesso nome del codice dell'azienda (presente nella cartella di Adhoc). L'archivio però può essere reso comune a tutte le aziende; in questo caso lo si trova nella cartella principale del programma.
Confermare con OK
Cliccare su
di PIA_CONT.Selezionare PC_CONTO e premere
Fare la stessa cosa con PCDESPIA e confermare con AVANTI.
Colonna da filtrare: selezionare PC_CONTO.
In 'Includi solo le righe mettere 'Non termina con' e nella colonna a destra mettere 000
Confermare con AVANTI.
Ordina per: selezionare PC_CONTO.
Verificare che sia abilitata la vice 'Crescente' e confermare con AVANTI.
Abilitare la voce 'Restituisci i dati a Microsoft Excel' e premere SALVA QUERY.
Indicare la cartella di Adhoc. Mettere il nome file (nell'esempio pianopeu.dqy) e salvare.
Sovrascrivere eventualmente quello già esistente.
Confermare con FINE e dare OK nelle successive maschere.
Eliminare le vecchie righe delle colonne A e B (quelle nelle prime righe del foglio).
Selezionare la voce 'Sposta celle in alto'.
Posizionarsi sulla prima riga della colonna 'Saldo' di un sottoconto (C4) e modificare come segue la formula presente della barra della formula.
N.B.
Nella formula sotto compare un 279; questo è un parametro relativo al bilancio specifico. Tale valore può essere diverso dalla formula già esistente; lasciarlo invariato.
=SE(VAL.ERRORE(CERCA.VERT(A4;'Bilancio da Ad Hoc'!$A$3:$E$279;5;FALSO));""; CERCA.VERT(A4;'Bilancio da Ad Hoc'!$A$3:$E$279;5;FALSO))
La cella precedente (C4) risulta col bordo in basso a destra più spesso. Cliccarci col tasto sinistro del mouse e trascinare fino all'ultima riga.
La colonna riciclassificazione eventualmente deve essere corretta a mano.
Accedere al menù 'File' di Excel e selezionare 'Salva'.
Nel caso si abbiano più aziende rinominare il file di Excel (ANBIL97.XLS o ANBIL00.XLS) con nomi diversi. Lo stesso vale per i files con estensione dqy.
Ricordarsi di volta in volta di inserire in Adhoc, nella 'Impostazione procedure esterne' nel campo 'Foglio excel' il nome appropriato.
