Call docTemp.ReplaceItemValue(FieldToModif & "_" & Cint(NoField), doc.GetItemValue("FieldToModif " & "_" & Cint(TempNoField))(0))
in fact this should be ---- Call docTemp.ReplaceItemValue("NB_LPP_3", doc.GetItemValue("NB_LPP_1))
I have changed the code for quotes and qithout quotes......
I have used this code to test and it works for the doctemp is being modified, docTemp.NB_LPP_3 = "123456"