Discussion :

[helenafr]

Bonjour,
comme on le sais, en EXCEL on peut affecter une valeur à une cellule spécifique, par ex.
workbook.wooksheet.Range("A1").Value = 10
'affecte 10 à la cellule 'A1'

mais après importer une fiche en format .xls dans Access, est ce qu'il est possible d' adresser une cellule spécifique comme dans Excel;
comment traduire la commande du ex. au dessus pour une table sous Access?
Merci bp!

[Heureux-oli]

Non.

La différence entre excel et access est tableur pour excel et base de donnée pour access.

Dans excel, lorsque tu ecris quelque chose dans une case, tu y fait référence dans le fichier .xls.

Dans une base de données les enregistrements sont mis les uns derrières les autres et sont simplement identifié par un ou pllusieurs index.
Les "indexés" peuvent changer de place.

Par contre un index ne change pas.

Si tu veux retrouver un donnée, fais référence à son index.

[random]

cela se fait par une requête mise à jour, en fait sous access il ne faut plus penser en termes matriciels
colonne 1 ligne 1
mais en termes de données ici colonne a sera remplacé par un nom de
champ et il n'y a pas de numéro de ligne si on veut adresser un numéro
on va ajouter à la table une clef par exemple un numéro automatique

[batou22003]

Bonjour,
comme on le sais, en EXCEL on peut affecter une valeur à une cellule spécifique, par ex.
workbook.wooksheet.Range("A1").Value = 10
'affecte 10 à la cellule 'A1'

mais après importer une fiche en format .xls dans Access, est ce qu'il est possible d' adresser une cellule spécifique comme dans Excel;
comment traduire la commande du ex. au dessus pour une table sous Access?
Merci bp!

Et bien A = la colonne , ou le champ de ta table.
Pour aller la récupérer, tu fais design/creation sur ta table et
tu recuperes le nom du champ.

Et 1 = numéro de ligne.
Après importation, Access te propose de créer un identifiant automatiquement, qui corrrespond en fait au numéro de ligne.
Récupere la valeur de cet indentifiant.

Il ne te reste plus qu'à modifier la valeur à cette position identifiée par
champ = monChamp et id=1

-Soit tu fais une requete update:

En VB:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim strRequeteUpdate as String 
 
strRequeteUpdate  = "update maTableImportee set monChamp=10 " _
& " where id=1" 
 
CurrenDb.Execute strRequeteUpdate,dbFailedOnError

-Ou tu mets la meme requete dans un objet requete d'access, et tu execute manuellement.

-Ou tu utilises les curseurs en methode DAO ou ADO, et ca donne
(après ajout des références DAO 3.6 par ex)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim MaDatabase as DAO.Database
Dim rst as DAO.Recordset 
 
Set db = currentdb
 
Set rst = db.OpenRecordset("select * from matableImportee where id=1")
 
if not rst.EOF then 
rst.edit
rst.Fields("monChamp")=10
rst.update
end if 
 
rst.close

En espérant avoir été complet sur la question.