Creare documento word vuoto con nome da campo tabella

di Anonimizzato32136 il
5 risposte
/
Anonimizzato32136
Utente anonimizzato
Buona sera,
sto cercando una soluzione per poter creare dei file word vuoti (in pratica devo associare una relazione tecnica al record in questione) che abbiano il nome derivante dal contenuto di un campo della tabella dati.
per es: premendo nella maschera di inserimento un pulsante al record 23 con campo "nome file = PRODOTTO" dovrei creare un documento word che si chiama : "23_PRODOTTO.docx"

siate clementi che sono alle prime armi !

5 Risposte

  • Super Famoso
    Iscritto da
    apr, 2012
    Messaggi
    7589
    Sicuramente servirà del codice VBA, ma se dici di essere alle prime armi...la vedo dura.
  • /
    Anonimizzato32136
    Utente anonimizzato
    Chiedo perché vorrei imparare ...
  • Super Famoso
    Iscritto da
    nov, 2011
    Messaggi
    21917
    Usa la CreateObject e la documentazione.add

    Cerca informazioni in rete
  • /
    Anonimizzato32136
    Utente anonimizzato
      '*********************** controllo se il file specifico esiste , se non esiste lo creo
  If CBool(Len(Dir$("C:\2CA\SCHEDE PRODOTTI LAVORATI\SCHEDE TEMATICHE\" & ID_ELEMENTI & "_" & desParametro & ".docx"))) = False Then
   Dim objFSO, strDoc, objFile
   Set objFSO = CreateObject("Scripting.FileSystemObject")
   strDoc = "C:\2CA\SCHEDE PRODOTTI LAVORATI\SCHEDE TEMATICHE\" & ID_ELEMENTI & "_" & desParametro & ".docx"
   Set objFile = objFSO.CreateTextFile(strDoc)
   objFile.Close
   Set objFile = Nothing
   Set objFSO = Nothing
  End If
   '******************************** apro il file specifico
  Dim word As Object
  Dim doc As Object
  Set word = CreateObject("Word.Application")
  word.Visible = True
  Set doc = word.Documents.Open("C:\2CA\SCHEDE PRODOTTI LAVORATI\SCHEDE TEMATICHE\" & ID_ELEMENTI & "_" & desParametro & ".docx")
    ho risolto cosi, o almeno cosi funziona
Devi accedere o registrarti per scrivere nel forum
5 risposte