Visualizzazione dei risultati da 1 a 3 su 3

Discussione: VBA code Access 2007

  1. #1

    VBA code Access 2007

    Ciao a tutti.
    Scrivo per chiedervi aiuto con Microsoft Access e VBA coding.
    Ho creato un report in Access 2007; ogni text box è basata su una o due queries a loro volta prese da una tabella STANDARD1, importata da EXcel.
    Il mio lavoro consiste ora nel replicare tutto il procedimento.
    Per renderlo più chiaro, devo fare in modo che il report mostri, nelle apposite text boxes, non i valori delle queries basate su STANDARD1, ma su qualunque tabella STANDARDx (ovviamente ogni tabella è identica nel layout e nei nodeID rispetto alle altre).

    La cosa più semplice che mi hanno consigliato è creare una nuova tabella con una colonna ID (primary key) e una colonna con i nomi di tutti i file excel che dovrò "applicare" al report.
    Praticamente creare un Recordset con tutti i nomi, e creare una variabile "name" che si adatti a ogni nome del recordset.
    In pratica creare un loop, per cui qualunque file excel decida di aprire, quello sarà il mio "name".

    Poi inserire tale codice nel modulo VBA del report.

    Per riprodurre le varie queries, prendere il codice che si trova in SQL view, con il nome della tabella su cui si basa la query, copiarlo, e inserirlo in un'espressione come

    myDb.RunSQL("code")

    Alli'interno del codice, sostituire il nome della tabella con la variabile "name" preparate sopra.
    In questo modo si dovrebbe riuscire a replicare ogni query, qualunque sia la tabella di partenza.
    Secondo voi può funzionare? Potreste aiutarmi con i codici (specialmente quello per costruire la variabile "name"). Sono davvero sotto pressione.

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,466

    Moderazione

    E' ben difficile dare una risposta alla tua domanda senza riuscire innanzitutto a capire tutto lo scenario, e senza farsi un'analisi di una possibile risoluzione del problema.

    Detto questo, se ti occorre un aiuto specifico e circostanziato per un errore o un problema nel codice che hai scritto, allora è un conto, altrimenti è difficile affrontare una problematica così vasta, a meno che non venga scomposta in problemi più piccoli da trattare singolarmente, riservando a ciascuno una discussione dedicata.
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  3. #3
    Si me ne rendo conto.
    Allora andando con ordine.
    Ho una tabella con un elenco di fogli excel.
    Devo creare una variabile "nome" che, sottoposta a loop, comprenda tutti i nomi della tabella.
    Tale nome dovrà poi essere inserito (nel passo successivo) in un'espressione
    SQL = "SELECT name.[ID],name.Label,name.X" & _
    "FROM name" & _
    "WHERE (((name.[ID])='numero ID'))"

    In pratica, poi, tale espressione verrà inserita nel codice delle singole text boxes del mio report, in modo che ogni volta che si carica un diverso foglio excel si applichi direttamente il suo contenuto nella costruzione del report.

    Ma il punto di partenza è una definizione della variabile "name".
    Il mio problema è che ragiono troppo in "excel mode", non sapendo se per definirla vada bene

    Sub DefVar()
    Set name As String
    name = ....
    End sub

    Il problema è il loop

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.