Discussion :

[JPaul94300]

Bonjour,

sous Access 2003, j'ai une liste modifiable avec x lignes et y colonnes,non liée à une table que je remplis dynamiquement avec diverses infos.

En fonction d'un résultats j'ai besoin d'aller modifier la valeur déjà entrée dans la liste modifiable à l'intersection d'une ligne et d'une colonne que je connais...

Quelqu'un saurait faire cela ?

Aujourd'hui à part stocker, pour cahque lignbe, chaque champ ligne/colonne dans des variables et modifier la variable qui m'intéresse puis recopier la ligne totale modifiée au bon endroit je en sais pas faire....

Merci

JPaul

[jimay]

Salut,

Je ne sais pas si il y a plus simple mais en attendant mieux ça fonctionne ^^

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
25
26
27
28
Function ModifierCase()
 
    Dim strRowSource As String
    Dim ligne, colonne As Integer
 
    'modifier la ligne 2 colonne 3
    ligne = 2
    colonne = 3
 
    ' On récupère les données de la liste et on rentre tt ça dans un tableau
    temp = Split(Me.TaListe, ";")
 
    ' On modifie la case qui nous intéresse
    temp(ligne * colonne) = "nouvelleValeur"
 
    ' On recréé le rowSource
    For i = 0 To UBound(temp)
        strRowSource = strRowSource & temp(i) & ";"
    Next
 
    'Pour retirer le dernier ';' ajouté précédement
    strRowSource = Left(strRowSource, Len(strRowSource) - 1)
 
    ' On re-applique le rowSource
    Me.TaListe.RowSource = strRowSource
 
 
End Sub