FORUM WINDEV

Bonjour,

alors personne n'a une idée pour m'aider.


Bon dev

bonjour,

Personne n'est à l'écoute pour me répondre ............

Merci

re salut,

y-a-t-il quelqu'un qui peut m'aider........




merci

bonjour,

merci infiniment pour votre aide, mais j'ai pas encore eu de la chance pour réussir mon projet.


BON DEV

Bonjour,

tracer le code
Poser l'algorithme sur papier
faire des tests

Bonjour,

j'ai résolu mon probleme en utilisant ce code :

PROCEDURE SélectionDonnées()

SI TableImport1.Colonne1 = "" ALORS
Info ("Veuillez saisir le fichier excel ")
RepriseSaisie(Sais_Fic)
FIN
i est un entier
x, y est un booléen
x = ChaîneCompare(Détail_import.Num_de_lot,TableImport1.Colonne1)
y = HLitRecherche(Détail_import,Num_de_lot,TableImport1.Colonne1)
SI x = Faux ET y = Faux ALORS
POUR i = 1 A TableOccurrence(TableImport1)
Détail_import.Num_de_lot = Colonne1[i]
Détail_import.Date_reception = ChaîneVersDate(Colonne2[i])
Détail_import.Réf_mat = Colonne3[i]
Détail_import.Qte_importée = Colonne4[i]
Détail_import.nomspécificité = Colonne5[i]
Détail_import.Nom_société = Colonne6[i]
HAjoute(Détail_import)
FIN
SINON
Erreur("Attention !!, la saisie de ce lot à été bien éffectuée, Veuillez mettre à jour le fichier EXCEL... ")
Ferme()
FIN
Bon dev et merci.