Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 3 su 3

Access: Stampa unione del record corrente

  1. #1
    laser82 non è in linea Novello
    Buongiorno a tutti, premetto di saperne meno di zero di programmazione e vba e chiedo a chi mi risponde di aver pazienza e che mi spieghi in termini più pratici e meno tecnici cosa devo fare.
    Espongo prima il progetto a cui sto lavorando con tantissima difficoltà e poi qual'è il problema.
    Ho una maschera di access con vari campi e alcuni modelli di word preparati per la stampa unione.
    Finchè procedo manualmente, la stampa unione funziona.
    Vorrei creare un pulsante che automatizzi il tutto, restituendomi unicamente il file .doc già bello pronto.
    Il codice che tra 1000 casini ne è venuto fuori è il seguente:

    Private Sub BtnAccompagnamento_Click()
    
    Dim wordMailMerge As Object
    Dim wordApp As Object
    Dim wordDoc As Object
    
    Set wordApp = CreateObject("Word.Application")
    wordApp.Visible = True
    
    Set wordDoc = wordApp.Documents.Open("F:\Inserimento dati\filetest.dotx", True, False)
    Set wordMailMerge = wordDoc.MailMerge
    wordMailMerge.OpenDataSource "F:\Inserimento dati\MASCHERA DATI.mdb"
    
    Dim cmdSql As String
    cmdSql = "SELECT [Tabella dati].* INTO [Tabella dati Unione] FROM [Tabella dati] WHERE [Tabella dati].ID =" & CStr(Me.ID)
    CurrentProject.Connection.Execute cmdSql
    wordMailMerge.Destination = 0
    wordMailMerge.Execute
          
    wordDoc.Close
    Set wordMailMerge = Nothing
    Set wordDoc = Nothing
    wordApp.Quit
    Set wordApp = Nothing
    
    End Sub
    
    Il problema è che alla pressione del pulsante, mi si apre il modello ed immediatamente mi spunta una finestra in cui mi si chiede di selezionare la tabella. Non so dove sia l'inghippo, ma inizialmente non mi chiedeva nulla, poi potevo scegliere tra "Tabella dati" e "~TMPCLP+numeri". Poi si è aggiunta anche "Tabella dati Unione" e ora si stanno aggiungendo altri ~TMPCLP. Sto brancolando nel buio. In più, quelle poche volte che è andata a buon fine la stampa unione, non si trattava del record corrente.
    Dove sbaglio?
    Grazie a tutti.
    Ultima modifica di laser82; 11-11-2014 23:32  Motivo: I tag CODE

  2. #2
    Quote Originariamente inviato da laser82 Visualizza il messaggio
    meno di zero di programmazione e vba
    Ma, fatta questa premessa, non potrai usufruire di nessun suggerimento sul codice. A meno che qualcuno non ti scriva tutto il codice.

    E in questo forum non è possibile.

    Come risolviamo?
    ℹ️ Leggi di più su AntonioG ...

  3. #3
    laser82 non è in linea Novello
    Beh, spiegatemelo in termini umani se potete....poi mi sembra che buona parte del codice sia ormai già scritto....no?
    Se non potete aiutarmi, grazie lo stesso per la disponibilità.

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Stampa Record Corrente
    Da leondoro nel forum Microsoft Access
    Risposte: 3
    Ultimo Post: 07-04-2016, 17:30
  2. [Word] Stampa Unione - Next e record vuoto
    Da Baphomet nel forum Microsoft Word
    Risposte: 3
    Ultimo Post: 27-03-2014, 00:50
  3. Stampa unione: stampa record
    Da Teo's nel forum Microsoft Excel
    Risposte: 2
    Ultimo Post: 23-07-2013, 11:19
  4. stampa unione da access
    Da zizou81 nel forum Microsoft Access
    Risposte: 8
    Ultimo Post: 14-05-2010, 14:49
  5. [Access - VBA] Stampa Unione
    Da Albus! nel forum Microsoft Access
    Risposte: 3
    Ultimo Post: 18-06-2008, 16:46