Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Insérer des données dans des champs vides d'une table déjà remplie [ Langages dérivés / VBA ] (pyb54)

lundi 21 juillet 2008 à 15:08:54 | Insérer des données dans des champs vides d'une table déjà remplie

pyb54

Bonjour à tous, j'ai une colle à posée ( enfin c'est une colle pour moi en tout cas )

J'ai une table remplie avec des données diverses, à partir de fichiers excel, seulement 3 colonnes ont été rajoutées pour s'y retrouver dans la table, colonnes qui elles n'existent pas dans le fichier excel.

bon j'ai un code !
Set oRs = CurrentDb.OpenRecordset(nomdetable, dbOpenDynaset)
oRs.Edit
nbligne = 1
Do While nbligne < lignetable

    oRs.Fields("Champ1").Value(nbligne) = info1
    oRs.Fields("Champ2").Value(nbligne) = info2
    oRs.Fields("Champ3").Value(nbligne) = info3
  nbligne = nbligne + 1
Loop

nbligne est à 1 pour ne pas écraser le nom du champ.
lignetable est une variable contenant le nombre max de lignes non vides de la table

lorsque je l'éxécute je remplis uniquement la première ligne de mes 3 champs, le reste, pour la peine reste vide, mais je dois remplir toute les lignes d'ou mon idée de départ de rajouter (nbligne) à chaque fois, sans succès hélas.

une exemple plus concret du résultat actuel de mon code

champ1 | champ2 | champ3 | champ4
 info1     | info2     |   info3   |  info4
             |              |              | info4
             |              |              | info4

j'aimerais que info1, info2, info3 soit présent à chaque fois. à noter qu'étant des références, ces infos ne peuvent être fixe à chaque fois. SI jamais je suis pas clair, ben hésitez pas !


lundi 21 juillet 2008 à 17:47:58 | Re : Insérer des données dans des champs vides d'une table déjà remplie

zen69

a place de nomtable dans ton openrs

"SELECT * FROM " & nomtable & " WHERE champ1='' OR champ2='' OR champ3=''"

Avant   nbligne = nbligne + 1
oRS.update


  zen69 aka Ortho Le Profett
  [site web]

mardi 22 juillet 2008 à 08:35:34 | Re : Insérer des données dans des champs vides d'une table déjà remplie

pyb54

Salut zen69 !

Merci pour ta réponse, seulement il doit manquer quelque chose car j'ai l'erreur too few parameters. Expected 2

j'ai repris ton code de la manière suivante :

Set oRs = CurrentDb.OpenRecordset("SELECT champ1,champ2,champ3 FROM " & nomdetable & " WHERE champ1='' OR champ2='' OR champ3=''", dbOpenDynaset)

Une idée ?

mardi 22 juillet 2008 à 08:50:19 | Re : Insérer des données dans des champs vides d'une table déjà remplie

pyb54

J'ai trouvé pour l'erreur, il fallait rajouter des apostrophes comme ceci :

Set oRs = CurrentDb.OpenRecordset("SELECT champ1,champ2,champ3 FROM " & nomdetable & " WHERE 'champ1'='' OR 'champ2'='' OR 'champ3'=''", dbOpenDynaset)

mais maintenant j'ai une erreur "No current Record"

mardi 22 juillet 2008 à 11:00:38 | Re : Insérer des données dans des champs vides d'une table déjà remplie

pyb54

Je ne trouve pas de solution pour le "no current record"

il se produit sur "oRs.Edit"
juste à la suite de la déclaration donc, est ce parce que le code sélectionne des champs vides ? comment y rémédier du coup ?


mardi 22 juillet 2008 à 13:39:45 | Re : Insérer des données dans des champs vides d'une table déjà remplie

pyb54

Si quelqu'un à une autre façon de procéder pour palier au problème de l'insertion qu'il n'hésite pas, je bloque depuis 2 jours la dessus :D



Cette discussion est classé dans : table, données, champs, ors, nbligne


Répondre à ce message

Sujets en rapport avec ce message

Remplir champs [ par dam94 ] Bonjour,Je dois remplir une table access à partir de données stockées dans un tableau de données de VB.Dans un 1er temps, j'ouvre ma base, puis je cré lecture d'un champs [ par fab101 ] salut a tous et a toutevoila j'ai encore un problème dans access (pour changer)j'expliquej'ai un fichier txt a travers lequel j'importe des donnéesdan Formater données 00:00:00 dans une table sous Access 2000 [ par phantom_2005 ] Bonjour,dans une table, j'ai un champs 'duree' dont les valeurs sont des durées en secondes.je cherche à formater ce champs de manière à obtenir des v Ecrire des données dans un champs d'une table existante... [ par phantom_2005 ] Bonjour,j'aimerais pouvoir écrire des données dans les champs d'une table existante.je m'explique:   j'ai une table avec 5 champs.   dans un form j'ai Base de données ORACLE [ par spike62300 ] Salut tous. G un probleme assez étrange avec Oracle. g créé une table et je veux y insérer des données. Je le fais sous VB mais cela ne fonctionne pas Problème d'enregistrements de données dans une table ! (help me) [ par arwenita ] J'ai un gros problème sous Access. J'ai créé un évènement lorsque je clique sur un bouton pour enregistrer les données de mon formulaire dans une tabl Importation table lié [ par Epoque51 ] Bonjour,Mon but est de fusionner 2 bases Access qui ont une structure identique mais des données différentes.Je voudrais savoir comment je peux faire Recuperation de champ de fusion Word via VB [ par dbaf ] Bonjour,J'ai fais un prog permettant de fusionné des documents avec un fichier de données via VB. Cependant je cherche à vérifier les champs de fusion Valider table à partir d'un DataGrid [ par bamyes ] J'ai un problème et je sollicite votre aide.En fait, je veux à partir de mon DataGrid où j'affiche les données d'une table, valider toutes les modific recordset & sql [ par LILAS_82 ] bonjour,j'ai une table ('ma_table') qui contient un champs (mon_champs). dans ce champs, j'essaie d'inclure ce que l'utilisateur a saisie dans 'textb


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,203 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.