Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 12
  1. #1
    Utente di HTML.it
    Registrato dal
    Jun 2007
    Messaggi
    31

    macro di stampa in access: problema

    ciao a tutti
    ho creato una maschera chiamata "menu di stampa" dove ho posizionato un pulsante di comando che lancia una macro.
    ho impostato tale macro che in sequenza mi fa le seguenti azioni:

    -chiude la maschera "menu di stampa"
    -apre il report associato in visualizzazione stampa.
    -stampa
    -chiude il report

    ora quando clicco il pulsante, in fase di stampa mi esce stampata, oltre al report correttamente, anche la maschera "menu di stampa"...

    qualcuno ha idea di dove sbaglio nella macro?
    se stampo "normalmente" senza macro il report, quest'ultimo non mi da problemi, per cui deduco che sia da parametrizzare la macro.
    ma come?

    help!!!!!!!!
    grazie mille ciao!

  2. #2
    Utente di HTML.it
    Registrato dal
    Jun 2007
    Messaggi
    31
    nessuno sa niente?

  3. #3
    Utente di HTML.it L'avatar di Misterxxx
    Registrato dal
    Oct 2003
    Messaggi
    3,704
    Usa il codice.
    Mettilo come routine evento (clicca sui puntini a dx nell'evento e scegli "esegui codice".
    codice:
    DoCmd.OpenReport nomereport, acNormal
    oltre a funzionare è anche più professionale.

    Ciao.
    Io ne ho viste cose che voi umani non potreste immaginare. Navi da combattimento in fiamme al largo dei bastioni di Orione e ho visto i raggi B, balenare nel buio vicino le porte di Tannhäuser. E tutti quei momenti ... andranno ... perduti nel tempo, come lacrime nella pioggia. È tempo di morire. (Roy Batty).

  4. #4
    Utente di HTML.it
    Registrato dal
    Jun 2007
    Messaggi
    31
    grazie mille per aver risposto. ho un dubbio: dove inserisco tale codice.
    nel senso: se vado nelle proprietà del pulsante di comando della maschera "menu-stampe" e vado su Evento, io ho routine evento e ci è associata la macro. il codice è il seguente:

    Option Compare Database

    Private Sub stampa_Click()
    On Error GoTo Err_stampa_Click

    Dim stDocName As String

    stDocName = "stampa"
    DoCmd.RunMacro stDocName

    Exit_stampa_Click:
    Exit Sub

    Err_stampa_Click:
    MsgBox Err.Description
    Resume Exit_stampa_Click

    End Sub
    Private Sub stampa_classifica_marcatori_Click()
    On Error GoTo Err_stampa_classifica_marcatori_Click

    Dim stDocName As String

    stDocName = "stampa classifica marcatori"
    DoCmd.RunMacro stDocName

    Exit_stampa_classifica_marcatori_Click:
    Exit Sub

    Err_stampa_classifica_marcatori_Click:
    MsgBox Err.Description
    Resume Exit_stampa_classifica_marcatori_Click

    End Sub
    Private Sub st_cl_marcatori_Click()
    On Error GoTo Err_st_cl_marcatori_Click

    Dim stDocName As String

    stDocName = "stampa class marc"
    DoCmd.RunMacro stDocName

    Exit_st_cl_marcatori_Click:
    Exit Sub

    Err_st_cl_marcatori_Click:
    MsgBox Err.Description
    Resume Exit_st_cl_marcatori_Click

    End Sub


    il tuo codice è sostitutivo del codice della macro o dove inserirlo dove?
    ti ringrazio in anticipo.
    ciao!

  5. #5
    Utente di HTML.it
    Registrato dal
    Jun 2007
    Messaggi
    31
    Originariamente inviato da Misterxxx
    Usa il codice.
    Mettilo come routine evento (clicca sui puntini a dx nell'evento e scegli "esegui codice".
    codice:
    DoCmd.OpenReport nomereport, acNormal
    oltre a funzionare è anche più professionale.

    Ciao.
    grazie mille ho risolto!
    un genio!

  6. #6
    Utente di HTML.it L'avatar di Misterxxx
    Registrato dal
    Oct 2003
    Messaggi
    3,704
    Io ne ho viste cose che voi umani non potreste immaginare. Navi da combattimento in fiamme al largo dei bastioni di Orione e ho visto i raggi B, balenare nel buio vicino le porte di Tannhäuser. E tutti quei momenti ... andranno ... perduti nel tempo, come lacrime nella pioggia. È tempo di morire. (Roy Batty).

  7. #7
    Utente di HTML.it
    Registrato dal
    Jun 2007
    Messaggi
    31
    Originariamente inviato da Misterxxx
    ciao!
    abuso della tua gentilezza, ma dato che ti vedo ferrato sull'argomento ti domando questo.

    è possibile creare un pulsante di comando (chiaramente all'interno di una maschera ) che mi apra una query e mi esporti in excel il risultato di tale query ?
    attualmente riesco con una macro ad aprire la query e ad aprire l'applicazione excel, ma non riesco a trasferire il risultato della query in excel.

    domando troppo?

  8. #8
    Utente di HTML.it L'avatar di Misterxxx
    Registrato dal
    Oct 2003
    Messaggi
    3,704
    Access può tutto ...
    Sicuramente si può fare; dubito a livello di macro quanto di VB.
    Per una delle mie applicazioni ho un modulo che fa però il contrario: estrae da un file .xls dei dati che riempiono una tabella di access ...
    Se mi dai un po' di tempo vedo di fare qlc, non so quando però.
    Io ne ho viste cose che voi umani non potreste immaginare. Navi da combattimento in fiamme al largo dei bastioni di Orione e ho visto i raggi B, balenare nel buio vicino le porte di Tannhäuser. E tutti quei momenti ... andranno ... perduti nel tempo, come lacrime nella pioggia. È tempo di morire. (Roy Batty).

  9. #9
    Utente di HTML.it L'avatar di Misterxxx
    Registrato dal
    Oct 2003
    Messaggi
    3,704
    Pensandoci bene c'è anche quel fenomeno dell'OutputTo che fungerebbe all'upo ... tipo:
    codice:
    DoCmd.OutputTo acOutputQuery, "nomequery", acFormatXLS, "E:\nomefoglio.xls", True
    Io ne ho viste cose che voi umani non potreste immaginare. Navi da combattimento in fiamme al largo dei bastioni di Orione e ho visto i raggi B, balenare nel buio vicino le porte di Tannhäuser. E tutti quei momenti ... andranno ... perduti nel tempo, come lacrime nella pioggia. È tempo di morire. (Roy Batty).

  10. #10
    Utente di HTML.it
    Registrato dal
    Jun 2007
    Messaggi
    31
    Originariamente inviato da Misterxxx
    Pensandoci bene c'è anche quel fenomeno dell'OutputTo che fungerebbe all'upo ... tipo:
    codice:
    DoCmd.OutputTo acOutputQuery, "nomequery", acFormatXLS, "E:\nomefoglio.xls", True
    UN GENIO!!!!!
    grazie mille milioni!
    ciao!

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.