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

[Access - VBA] Stampa Unione

  1. #1
    L'avatar di Albus!
    Albus! non è in linea Scolaretto
    ciao a tutti
    cercando sul forum ho trovato il seguente codice che dovrebbe pilotare la stampa unione da access che ho copiato e cercato di adattare alle mie necessità.

    Function MergeIt(File As String, Query As String)
    
    Dim objWord As Word.Document
    Dim FS, F
    
    Set FS = CreateObject("scripting.filesystemobject")
    Set F = FS.getfile("d:\lettera.doc")
    F.Attributes = 1 
    Set objWord = GetObject("d:\lettera.doc", "Word.Document")
    'rende invisibile il file
    objWord.Application.Visible = False
    objWord.MailMerge.OpenDataSource _
    name:="d:\lettera.doc", _
    ReadOnly:=True, _
    LinkToSource:=True, _
    Connection:="QUERY " & Query, _
    SQLStatement:="SELECT * FROM [" & Query & "]"
    
    objWord.Application.Visible = True
    objWord.MailMerge.ViewMailMergeFieldCodes = wdToggle 
    Set objWord = GetObject(File, "Word.Document")
    
    End Function
    
    dalla maschera richiamo con un pulsante
    Call MergeIt("d:\lettera.doc", "MiaQuery")
    
    quando premo il pulsante si apre una maschera "Propietà data Link" dove mi chiede nome utente e password e in ogni caso si blocca

    qualche suggerimento?
    grazie

  2. #2
    L'avatar di dragone bianco
    dragone bianco non è in linea Amanuense
    Ciao

    hai verificato la query?

    eventualmente esegui il codice passo a passo così vedi dove da il problema

    Ciao
    ℹ️ Leggi di più su dragone bianco ...

  3. #3
    L'avatar di Albus!
    Albus! non è in linea Scolaretto
    ciao
    in effetti il problema legato a quell'errore era qausato dalla query.

    ora però ho un'altro problema
    come faccio a filtrare i dati della query in modo da avere la stampa unione solo dei record che mi servono?

    es. dove il codie è uguale ad una variabile

    grazie

  4. #4
    L'avatar di Albus!
    Albus! non è in linea Scolaretto
    scusate.... risolto!

    colpa mia che ogni tanto mi perdo nelle banalità ...

    ciao e grazie

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. stampa unione da access
    Da zizou81 nel forum Microsoft Access
    Risposte: 8
    Ultimo Post: 14-05-2010, 14:49
  2. [Access - VBA] Stampa Unione A97
    Da Albus! nel forum Microsoft Access
    Risposte: 6
    Ultimo Post: 13-08-2008, 09:16
  3. VB6 - Stampa Unione - Si apre Access
    Da pietrorolli nel forum Visual Basic 6
    Risposte: 0
    Ultimo Post: 18-03-2008, 09:54
  4. [ACCESS] stampa unione
    Da niclo nel forum Microsoft Access
    Risposte: 10
    Ultimo Post: 02-03-2008, 14:20
  5. [access/word] stampa unione
    Da hirpus nel forum Microsoft Access
    Risposte: 6
    Ultimo Post: 02-11-2005, 11:52