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 : Sélectionner tout - Visualiser dans une fenêtre à part
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