Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
5960 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Jeux des 7 erreurs

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Jeux des 7 erreurs

n°1879066
Fouinette8​5
Posté le 29-04-2009 à 09:36:05  profilanswer
 

Bonjour le forum,  
 
Je suis toujours un peu débutante dans la programmation et sur le même fichier de gestion de stocks. J'ai 2 versions de mon fichier, une qui fonctionne et une copie avec des fonctionalités supplémentaires mais qui ne fonctionnes pas sur certaines fonctions aux quelles normalement je n'ai rien modifié. Donc si quelqu'un se sent d'âme à essayer de m'aider à retrouver où pourrait bien se cacher l'erreur ça serais avec grand plaisir^^.
 
http://www.yousendit.com/download/ [...] V3hMWEE9PQ
 
Principe du fichier : En deux mots, il s'agit de completer des tableaux de gestion de stock à partir de fichier CSV d'entrée et de sortie de stock.  
Différence entre les deux fichiers : Dans le premier il n'y a que la fonction d'entrée de stock d'implanté et qui fonctionne normalement. Dans le second j'ai rajouté la fonction de sortie de stock sensiblement identique à celle d'entrée de stock mais dans les 2 fonctions aucunes données n'arrive sur la feuille récéption des données et encore moins dans chaque feuille de produit.  
 
Le problème porte donc sur les fonctions d'importations de données c'est à dire d'entrée et de sortie de stock (bouton sur l'onglet acceuil). Les deux fonctions ne bug pas dans les deux fichiers. Mais dans le 2ème les données ne sont pas récéptionnées alors que la fonction ne plante pas.  
 
Je sais qu'il est compliqué de se plonger dans un projet complet mais je pense que l'erreur doit être relativement évidente pour des gens plus expérimenté que moi.  
 
Merci à ceux qui lirons le poste jusqu'au bout et d'autant plus à ceux qui m'aiderons à résoudre mon problème.

mood
Publicité
Posté le 29-04-2009 à 09:36:05  profilanswer
 

n°1879705
Fouinette8​5
Posté le 30-04-2009 à 14:06:22  profilanswer
 

Bon mon problème n'a pas l'air d'intéresser grand monde, tanpis je vais essayer de me débrouiller autrement.

n°1879908
seniorpapo​u
Posté le 30-04-2009 à 18:50:18  profilanswer
 

Bonsoir,
j'ai jeté un oeil, mais j'avoue ne pas avoir tout suivi.
j'ai juste remarqué que le ubound(ar) était de l'ordre de 5604 ce qui me semble grand, et la boucle sur while not eof ne "tournait" qu'une fois.  
Ce n'est peut-être pas la bonne piste.  
mais je n'ai pas beaucoup de temps en ce moment.
Cordialement
 
par contre, tes csv sont compatibles avec la séquence suivante:
 
Workbooks.Open Filename:=   "C:\....ton chemin....\Entrée de stock.csv"
ce qui permet d'ouvrir ton csv sous excel, puis de choisir tes colonnes.


Message édité par seniorpapou le 30-04-2009 à 18:57:56
n°1880167
seniorpapo​u
Posté le 02-05-2009 à 12:44:39  profilanswer
 

Bonjour,
je confirme: le csv n'a pas une structure de CR/LF  
reconnue par le line input. L'ouverture avec le bloc note le montre bien.
Pour faire un test, j'ai ouvert le csv avec word, puis je l'ai sauvé en .txt et enfin renommé en csv: le "qui bug" fonctionne alors parfaitement.
le "qui fonctionne"  , ne fonctionne pas non plus, la feuille intermédiaire "reception_donnees" montre, en la rendant visible, qu'on alimente la première ligne seulement. L'illusion du fonctionnement vient du fait que la feuille qui s'affiche en fin est déjà remplie.
Cordialement


Message édité par seniorpapou le 02-05-2009 à 12:48:36
n°1880182
seniorpapo​u
Posté le 02-05-2009 à 15:34:14  profilanswer
 

Bonsoir,
 
Dim fso, fil
Dim maligne
Set fso = CreateObject("Scripting.FileSystemObject" )
Set fil = fso.OpenTextFile(Chemin, 1, -2)
 Do Until fil.AtEndOfStream = True
 
Chaine = fil.readline
 
   MsgBox (Chaine)
Loop
fil.Close
 
 
voici une séquence qui peut lire tes csv ligne par ligne, à adapter à tes besoins


Message édité par seniorpapou le 02-05-2009 à 15:53:17
n°1880451
Fouinette8​5
Posté le 04-05-2009 à 10:19:49  profilanswer
 

Je rentre de gros week end compète je vais étudiez ça. Merci bien :p


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Jeux des 7 erreurs

 

Sujets relatifs
[Script] Piloter une application windows avec une gestion des erreurscréer jeux-video
créer jeux-videoJe monte une team de développement de jeux vidéos ! Engagez-vous !
Probleme Sur Création d'un jeux en lignejeux
Code retour et gestion des erreursJeux de caractère Mysql
gestion des erreurs 
Plus de sujets relatifs à : Jeux des 7 erreurs


Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)