Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
nome vettore dinamico in vba access
50 views
Skip to first unread message
AlexB
Dec 3, 2014, 9:14:29 AM12/3/14
to
ciao a tutti
sto scrivendo un codice vba che mi va a scrivere i dati in una tabella. I dati vengono presi da 2 vettori (sono di più ma per qui ne riporto 2) ed il nome dei vettori è incluso in un altro vettore così con un unica istruzione inserisco tutti i record.
Come faccio a rendere dinamico il nome e l'indice del vettore dal quale prendere i dati da inserire nel rs?
In ptratica ho i vettori con i dati:
npv(i)
ncv(i)
e un vettore con i nomi dei vettori:
nomeVett= Array("npv","ncv")
poi avvio il recordset e inserisco i dati nella tabella leggendo i 2 vettori
Dovrebbe prima scrivere tutti i npv(i) e poi i ncv(i) in 2 record della tabella:
.... apro rs ecc
For v=1 to 2 'indice del vettore NomeVett
for i=1 to 10 ' indice dei vettori con i dati
rst.fields("" & i & "")= nomeVett(v) & "(" & i & ")" 'non mi prende il valore dal vettore ma la stringa npv(1)
next i
next v
....
sto scrivendo un codice vba che mi va a scrivere i dati in una tabella. I dati vengono presi da 2 vettori (sono di più ma per qui ne riporto 2) ed il nome dei vettori è incluso in un altro vettore così con un unica istruzione inserisco tutti i record.
Come faccio a rendere dinamico il nome e l'indice del vettore dal quale prendere i dati da inserire nel rs?
In ptratica ho i vettori con i dati:
npv(i)
ncv(i)
e un vettore con i nomi dei vettori:
nomeVett= Array("npv","ncv")
poi avvio il recordset e inserisco i dati nella tabella leggendo i 2 vettori
Dovrebbe prima scrivere tutti i npv(i) e poi i ncv(i) in 2 record della tabella:
.... apro rs ecc
For v=1 to 2 'indice del vettore NomeVett
for i=1 to 10 ' indice dei vettori con i dati
rst.fields("" & i & "")= nomeVett(v) & "(" & i & ")" 'non mi prende il valore dal vettore ma la stringa npv(1)
next i
next v
....
radica...@gmail.com
Dec 4, 2014, 6:59:06 AM12/4/14
to
Il giorno mercoledì 3 dicembre 2014 15:14:29 UTC+1, AlexB ha scritto:
> ciao a tutti
Dovresti usare un vettore n-dimensionale, non quella cosa
tremenda ... :-)
> ciao a tutti
Dovresti usare un vettore n-dimensionale, non quella cosa
tremenda ... :-)
gabriella...@gmail.com
Dec 5, 2014, 2:20:55 AM12/5/14
to
Il giorno mercoledì 3 dicembre 2014 15:14:29 UTC+1, AlexB ha scritto:
Se costruisci l'istruzione che vuoi eseguire, la metti in una stringa e la passi a EVAl dovrebbe funzionare...
0 new messages