Recuperer des valeurs dans un fichier xls.

Recuperer des valeurs dans un fichier xls. - VB/VBA/VBS - Programmation

Marsh Posté le 30-10-2007 à 06:05:05    

Bonjour à tous
 
Desolé si le titre de mon sujet n'est pas des plus clairs; je ne savais pas trop comment formuler ça.
 
Je suis en train de travailler sur une petite application en vba sur excel qui permet de faire des bilans matieres à partir d'analyses.
Un appareil analyse des échantillons et vient sauver les resultats sous la forme de petits fichiers excel. Voici un exemple de ce que je pourrais avoir:
http://img140.imageshack.us/img140 [...] re1sa1.gif
 
A partir d'un fichier excel destiné à l'exploitation des resultats je voudrais avoir un bouton qui lance l'ouverture d'une fenetre qui m'amenerai dans le repertoire concerné (où sont rangés les petits fichiers resultats), et donc où je pourrais choisir le fichier voulu.
 
Apres selection de ce fichier il faudrait que je puisse retrouver la valeur d'un des composé (par exemple si je choisi ethanol la procedure doit pouvoir recuperer la valeur de 1.03%).
 
Pourriez vous m'indiquer comment proceder ? le plus gros probleme concerne l'ouverture de cette fenetre de choix du fichier; pour la mise en forme des données je devrais pouvoir me debrouiller, toutefois tout conseil est le bienvenu.
 
Je remercie d'avance toute personne desireuse de m'aider :)

Reply

Marsh Posté le 30-10-2007 à 06:05:05   

Reply

Marsh Posté le 30-10-2007 à 06:49:58    

bonjour,
Utilise GetOpenFileName :
 
Sub test()
i = Application.GetOpenFilename("Fichiers Excel(*.xls), *.xls" )
If i <> False Then MsgBox "Open " & i
End Sub
 
A+


Message édité par galopin01 le 30-10-2007 à 06:50:35
Reply

Marsh Posté le 30-10-2007 à 11:06:50    

Merci galopin (il me semble avoir deja vu ton pseudo, je crois que ce n'est pas la 1ere fois que tu me file un coup de main).
 
La procedure ouvre bien une fenetre permettant d'avoir l'emplacement du fichier, mais je me rend compte que je ne sais pas recuperer une valeur.
 
Pourrais tu me donner un petit exemple ? pour recuperer la valeur de la cellule b2 par exemple.
 
Merci d'avance :)


Message édité par Gruber Hans le 30-10-2007 à 11:31:21
Reply

Marsh Posté le 30-10-2007 à 20:14:34    

qq'un d'autre peut repondre aussi ;)

Reply

Marsh Posté le 31-10-2007 à 10:56:41    

Jour Bon
Pour faire avancer le smilblic concernant la lecture de x valeurs dans n fichiers fermés situés dans un même dossier voir http://forum.hardware.fr/hfr/Progr [...] 0232_1.htm post du 15-05-2006 et adapter


Message édité par kiki29 le 31-10-2007 à 11:19:41
Reply

Marsh Posté le 31-10-2007 à 19:00:42    

Excellent merci; avec ta reponse et celle de galopin j'ai toutes les données pour faire mon truc.
Merci encore.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed