[Excel] Comporre un file Word da una check-list in Excel

[DanieleB]

Buongiorno a tutti, sono nuovo al forum e qui ho trovato alcune informazioni molto utili ma purtroppo non riesco a trovare una soluzione al mio problema che è il seguente:

Avrei bisogno di creare un file word da una check-list in excel, chiaramente il file deve comporsi in maniera differente in base a come è stata compilata la check-list, è una check-list molto semplice sviluppata su due colonne e 15 righe, nella prima è presente la denominazione e nella seconda si segna se è presente o meno, faccio una piccola rappresentazione qui sotto:

Col. 1 Col. 2

A x
B
C x

in pratica A-B-C corrispondono a 3 diversi file ed in questo esempio avrei bisogno che venisse composto un file in word in cui sono presenti i file A e C e questi diventassero un file unico, non protetto e modificabile.

Cercando informazioni penso che questo si possa realizzare in VBA solo che purtroppo mi mancano le competenze per poterlo creare

Come avrete capito ho bisogno di un piccolo " generatore di file word " partendo da dei pezzi pre-fabbricati che li assembli assieme, io sto cercando questa soluzione in excel ma se esistono soluzioni più semplici o immediate ve ne sarei molto grato, sempre tenendo il meccanismo di base : Compilazione check-list --> file corrispondente

Inoltre non so nemmeno se è possibile poter unire attraverso funzioni 2 o più file word, il progetto è purtroppo al di sopra delle mie attuali competenze.

Al momento ho creato la check-list e questa in base alla compilazione mi restituisce un codice univoco ed inizialmente volevo usare quello per richiamare il file corrispondente ma le combinazioni sono ben oltre le 1000 ed ho abbandonato l'idea.

EDIT: Dimenticavo uso office 2003 ^^

Questo è quanto, grazie per il tempo dedicatomi e per tutte le eventuali risposte

Daniele

[DanieleB]

ho trovato come unire più file assieme, utilizzando VBA dovrebbe essere possibile utilizzare quella funzione, se io riesco a dare i riferimenti ai vari file e riuscire ad applicare la funzione il gioco dovrebbe essere fatto...

Continuo a non riuscire ad portare tutto questo su excel.. :/

[Avatar3]

Forse non ho capito bene il quesito
ma a me sembra che a te occorra fare un elenco di file (non so quale tipo)
quindi in excel avrai solo
A
C
poi vorresti mettere in un unico file di word questi due file
se quei due file sono di word o testo possiamo pensare di realizzare qualcosa tramite una macro in excel
ma se sono altro tipo non saprei...

ciao

[DanieleB]

si sono file word, chiaramente i file totali sono quindici e potrebbe anache essere necessario che vengano messi assieme tutti e 15 questi file word, chiarmente varia dalla compilazione della chek-list.

in soldoni: c'è una check-list da compilare e per ogni nominativo ( a,b,c, ecc ) corrisponde un file ed in base a come viene compilata devono essere uniti i corrispondenti file nell'esempio nel primo post il file da comporre è a+c

[Avatar3]

Facciamo questa prova
apri un file di excel nuovo
inserisci in un modulo questo codice

Codice: Seleziona tutto

Public perc As String
Sub ElencoFileXls()
perc = "C:\TEMP\"
Worksheets("Foglio1").Select
Range("A1").Select
  With ActiveCell
    Worksheets("Foglio1").Range(.Cells(1), .End(xlDown)).ClearContents
  End With
  ElencoFile Direct:=perc, Estens:="*.Doc", Inicell:=ActiveCell
End Sub
Sub ElencoFile(Direct As String, Estens As String, Inicell As Range)
  Dim i As Integer, f As String
  ChDir Direct
  f = Dir(Estens)
  If f = "" Then Exit Sub
  While f <> ""
    i = i + 1
    Inicell(i) = f
    f = Dir
  Wend
End Sub


In Perc metterai il percorso dei file di word
dopo l'esecuzione
nella colonna "A" avrai un elenco dei file.doc contenuti nella cartella del percorso

Se questo elenco corrisponde ai file da unire con una seconda macro cercheremo di unire i file in un unico file.doc

ciao

[DanieleB]

ehm.. non capisco dove mettere la macro, intendi in una casella di excel ?

puoi spiegarmi brevemente non ho mai usato una macro su excel :/

[Avatar3]

Ehmm
apri un nuovo file.xls
dal foglio1 (foglio di default)
premi il tasto ALT+F11
(avrai la schermata del VBA divisa in due finestre)
da Menu Inserisci -> Modulo
(il cursore si posizionerà nella finestra di destra)
dove incollerai l'intero codice copiato nel post (con seleziona tutto e copia)

Avvia la prima macro:
Sub ElencoFileXls()
posizionandoti all'interno del riquadro e premendo il tasto Esegui
(una freccetta sul Munu che somiglia al Play dei riproduttori Cd etc)

Ricorda di modificare il percorso dei file

ciao

[nagato]

Avatar3, che macro si potrebbe utilizzare per unire i file sopra?
Una volta scelti attraverso la prima macro che hai scritto che genera l'elenco, come si potrebbe poi avere in uscita un unico file formato da quei documenti elencati?


La domanda di nagato e' ripresa qui: viewtopic.php?f=26&t=91997
Usare "quella" discussione per eventali risposte.
Anthony