dans l'affichage d'access, en mode affichage/details, il y a une colonne
description.
pour tous objets (forms, reports, tables, etc...), chacune de mes
descriptions commence par le caractere "*" (c'etait un moyen de tagger des
modifs validées sur les objets)
à présent je souhaiterais virer toutes ces etoiles par code .
modifier ainsi un string, ça va,
mais je ne sais pas comment parcourir les objets de la base, lire leur
description et la modifier.
aussi si quelqu'un a une piste je suis preneur.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
3stone
Salut,
"loutox" | dans l'affichage d'access, en mode affichage/details, il y a une colonne | description. | | pour tous objets (forms, reports, tables, etc...), chacune de mes | descriptions commence par le caractere "*" (c'etait un moyen de tagger des | modifs validées sur les objets) | | à présent je souhaiterais virer toutes ces etoiles par code .
Exemple pour les tables...
Public Function fnDescription(NomTable As String) Dim DB As DAO.Database Dim Tb As DAO.TableDef Dim Fd As DAO.Field Dim strCom As String
On Error Resume Next Set DB = CurrentDb() Set Tb = DB.TableDefs(NomTable) For Each Fd In Tb.Fields strCom = Fd.Properties("Description") Debug.Print strCom Next End Function
"loutox"
| dans l'affichage d'access, en mode affichage/details, il y a une colonne
| description.
|
| pour tous objets (forms, reports, tables, etc...), chacune de mes
| descriptions commence par le caractere "*" (c'etait un moyen de tagger des
| modifs validées sur les objets)
|
| à présent je souhaiterais virer toutes ces etoiles par code .
Exemple pour les tables...
Public Function fnDescription(NomTable As String)
Dim DB As DAO.Database
Dim Tb As DAO.TableDef
Dim Fd As DAO.Field
Dim strCom As String
On Error Resume Next
Set DB = CurrentDb()
Set Tb = DB.TableDefs(NomTable)
For Each Fd In Tb.Fields
strCom = Fd.Properties("Description")
Debug.Print strCom
Next
End Function
"loutox" | dans l'affichage d'access, en mode affichage/details, il y a une colonne | description. | | pour tous objets (forms, reports, tables, etc...), chacune de mes | descriptions commence par le caractere "*" (c'etait un moyen de tagger des | modifs validées sur les objets) | | à présent je souhaiterais virer toutes ces etoiles par code .
Exemple pour les tables...
Public Function fnDescription(NomTable As String) Dim DB As DAO.Database Dim Tb As DAO.TableDef Dim Fd As DAO.Field Dim strCom As String
On Error Resume Next Set DB = CurrentDb() Set Tb = DB.TableDefs(NomTable) For Each Fd In Tb.Fields strCom = Fd.Properties("Description") Debug.Print strCom Next End Function
