A voir également:
- Cellule excel & VB
- Excel vba récupérer valeur cellule active - Forum Visual Basic
- Excel afficher lien hypertexte dans cellule ✓ - Forum Visual Basic
- Selectionner la derniere cellule non vide d'une colonne excel vba - Forum Visual Basic 6
- Derniere cellule remplie d'une colonne - Forum Visual Basic 6
- Vba dernière cellule non vide (Ignorer les formules résultat "") - Forum VBA Office (Excel, Word ...)
1 réponse
Slu!
Pour les cellules, c'est la même chose: Cells(ligne, colonne)= ...
Pour les requêtes, essaye ça:
------------------------------------------------------------
Private nom_table As DAO.Recordset
Public Sub nom_fonction()
Set table = db.OpenRecordset("select * from nom_table") 'pour sélectionner tous les références de la table
table.MoveFirst 'Aller au premier enregistrement
Do Until table.EOF 'Tant que l'on est pas à la fin de la table
'... Ton code
table.MoveNext 'Aller au prochain enregistrement
Loop
End Sub
------------------------------------------------------------
Pour obtenir les valeurs de chaque référence contenue dans tes tables, tu fais:
table!nom_référence = valeur_champ
Voilà! Si c'est pas assez clair, dis-le!
A+
@-plume
Pour les cellules, c'est la même chose: Cells(ligne, colonne)= ...
Pour les requêtes, essaye ça:
------------------------------------------------------------
Private nom_table As DAO.Recordset
Public Sub nom_fonction()
Set table = db.OpenRecordset("select * from nom_table") 'pour sélectionner tous les références de la table
table.MoveFirst 'Aller au premier enregistrement
Do Until table.EOF 'Tant que l'on est pas à la fin de la table
'... Ton code
table.MoveNext 'Aller au prochain enregistrement
Loop
End Sub
------------------------------------------------------------
Pour obtenir les valeurs de chaque référence contenue dans tes tables, tu fais:
table!nom_référence = valeur_champ
Voilà! Si c'est pas assez clair, dis-le!
A+
@-plume