Accéder à une variable Noms de Champ

Dans MS Access 2010, je suis de la construction d'une requête de mise à jour (à l'aide du Concepteur de Requêtes).
Je voudrais passer le nom de la colonne à mettre à jour la variable au moment de l'exécution.

J'ai essayé d'écrire du SQL et de l'exécution de la requête en VBA. Cela semblait être le moyen le plus facile... mais le SQL pour terminer la mise à jour devient bien plus complexe. Je préfère le faire dans le générateur de requêtes de GUI .
Est-il possible?

Je l'ai essayé en entrant les noms de champ dans le générateur de requêtes:

expr1:[field_name]

Bien que l'Accès me demande "Field_name" le résultat est "Impossible de mettre à jour 'nom_champ'; un champ non modifiable.

Aussi, j'ai essayé cette méthode:

Expr1: "'" & [field_name] & "'"

qui se traduit par "'" & [field_name] & "'" n'est pas un nom valide; vérifier les signes de ponctuation.. etc

Ci-dessous est une capture d'écran de la requête, je suis en train de construire.

Accéder à une variable Noms de Champ

Il est probablement trop tard, mais je te suggère de modifier votre base de données - vous avez Employee1Hours, Employee2Hours et donc sur ce qui semble aller à l'encontre du relationnel points forts d'une base de données. Si ce sont les heures travaillées par les employés, ils ne devraient être tenues dans les 2 champs: un pour le numéro d'employé et un pour combien d'heures ils ont travaillé. Vous pouvez ensuite effectuer des tâches simples telles que somme de toutes les heures pour 1 employé.

OriginalL'auteur GRY | 2012-11-26

  1. 2

    Accès " moteur db ne vous permettra pas d'utiliser un paramètre, comme le nom du champ cible pour votre UPDATE déclaration.

    Si vous essayez d'une fonction définie par l'utilisateur au lieu d'un paramètre à fournir le nom du champ, le résultat sera le même ... pas de joie.

    Il semble que le moteur de base de données ne permet pas de résoudre les noms d'objet lorsqu'il exécute une instruction SQL. Cette limitation ne s'applique pas seulement à des noms de champs, mais les noms de table. OIE, la requête suivante va échouer avec un message d'erreur "ne peut pas trouver l'entrée de la table ou de la requête "donnez-moi un nom de table'".

    SELECT *
FROM [give me a table name];

    Même si ce n'est pas exactement le même que celui de votre situation, je soupçonne que la raison peut être. Le moteur de base de données est trop limité sur la résolution de noms d'objet dans la planification/exécution des requêtes.

    Je vois. Merci pour la clarification. Je viens de passer quelques temps à la manipulation des objets, en espérant trouver un moyen de l'atteindre. Aucun n'a été couronnée de succès. Je soupçonne votre réponse est totalement correcte.

    OriginalL'auteur HansUp

  2. 1

    Peut-être la meilleure méthode est d'utiliser SQL, construire vos invites et puis affecter ces valeurs à des variables dans VBA, puis il suffit d'ajouter la valeur de la variable dans votre SQL.

    Donc quelque chose le long de ces lignes. À l'aide de votre requête de mise à Jour, mais même logique

    Dim SQL as string
dim **FieldName** as string

SQL = "Select [table]![" & Chr(34) & **FieldName** & Chr(34) & "] from ........"

    Vérifier Ici pour SQL conseils pour la construction

    OriginalL'auteur David Poduska

  3. 0

    J'utilise cette méthode souvent - je sais que c'est un très vieux post, mais espérons que cela aide quelqu'un - en s'appuyant sur ce que dit David:

    Sub CreateQuery
Dim dbs As DAO.Database
Dim qdf As DAO.QueryDef
Dim strSQL As String
Set dbs = CurrentDb
Set qdf = dbs.CreateQueryDef("NameOfNewQuery")
strSQL = "Select " 'notice the space
strSQL = strSQL & "FROM " 'notice the sapce
strSQL = strSQL & "WHERE;"
qdf.SQL = strSQL
qdf.Close
Set qdf = Nothing
Set dbs = Nothing
End Sub

    OriginalL'auteur Schalton