Remplacer données dans une variable tableau
Bonjour,
J'aimerais pouvoir remplacer des valeurs dans une variable tableau sans avoir à passer en revu chaque valeur avec une boucle. Est ce possible ?
Pour info : ma variable tableau est alimentée à l'aide d'un GetRows depuis un RecordSet créé à partir d'une requête SQL. Peut être est il possible de faire la modif en amont sans, bien entendu, toucher à la table d'origine ?
Merci
Voici mon code :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
|
Function rqt_sql_ope(ByVal nom_process As String) As Variant
Dim rcd As DAO.Recordset
Dim rqt_sql As String
Dim rqt_tab As Variant
Dim cpt As Integer
rqt_sql = "RQT SQL" 'celle-ci fonctionne très bien. Je l'ai enlevé.
Set rcd = CurrentDb.OpenRecordset(rqt_sql, dbOpenSnapshot)
rcd.MoveLast
cpt = rcd.RecordCount
rcd.MoveFirst
rqt_tab = rcd.GetRows(cpt)
rcd.Close
Set rcd = Nothing
'ici j'aimerais remplacer des valeurs qui sont maintenant dans rqt_tab
End Function |