Page 1 sur 1

mise a jour du nom d'un champ "variable" dans un f

MessagePublié: 06 Juin 2003 à 14:58
par Seb
bjrlors d'une imporation depuis un fichier excel je place ensuite mes valeurs ds un champ d'un doc notes par la commande :doc.vue_code = .Cells( xlrow, xlcln ).Valuecependant je veux que le nom du champ (vue_code)soit variable car il ne sera pas tjr sur le meme masque et ne se nommera pas tjr "vue_code"!quel est la syntaxe pour pouvoir specifier une variable 'texte' qui pourai me permettre de le modifier.. a chaque boucle..voici un bout du code si besoin !...Do While True With xlSheet xlrow = xlrow + 1 Set view = db.GetView("nom_vue") Set doc = db.CreateDocument doc.form = "nom_form" If .Cells(xlrow,xlcln).Value="" Then Goto Done '***********//je sors du prog +loin... Else doc.vue_code = .Cells( xlrow, xlcln ).Value End If Call doc.Save( True, True ) written = written + 1 Print " Maj liste ligne :" & written &" --> Champ :" & .Cells( xlrow,xlcln ).Value End WithLoop......Merci pour le coup de main !

Re: mise a jour du nom d'un champ "variable" dans

MessagePublié: 06 Juin 2003 à 16:22
par philippeG
Bonjour,tu peux utiliser la méthode ReplaceItemValue de NotesDocumentDim item as NotesItemDim NomChamp$ as stringDim Valeurchamp as VariantNomChamp$ = 'Formule qui calcule le nom du champValeurChamp = .Cells( xlrow, xlcln ).ValueSet item = doc.ReplaceItemValue(NomChamp$,ValeurChamp)Call doc.save(true,true)

Mci..

MessagePublié: 10 Juin 2003 à 14:35
par Seb
Qd les gds esprits se rencontrent.. Au final j'en etais arivé à la meme conclusion..Merci bcp phillipe c'est nickela+Seb