Discussion :

[ThonySp]

Bonjour à toutes et à tous,

Je dois mettre en place un code Visual Basic remplissant les critères suivantes :

Un bouton placé sur un fichier Excel de nom "SORTIE.xls" (le fichier destiné à recevoir les informations). Une fois qu'on a cliqué dessus, une fenêtre de dialogue s'ouvre demandant quel fichier ".asc" à sélectionner afin d'extraire les informations. Dans ce cas le nom du fichier est variable et toujours sous le format ".asc". Ensuite le code va extraire une plage de valeurs décimales du fichier ".asc" à des positions précises pour les mettre dans le fichier "SORTIE.xls" à des positions précises mais différentes.

Le gros problème est que j'ai des outils mais non adaptés (comme CommonDialog1.ShowOpen mais ca ouvre que des fichiers Excel...).

Ensuite je ne sais pas comment on fait pour extraire les valeurs du fichier .asc (qui s'ouvre sans problème sous .txt)

Voici un extrait de ce document :

500.00 2.50
600.00 2.54
700.00 2.84
800.00 3.01

Merci beaucoup d'avance !!

[patricktoulon]

Bonjour pour ouvrir ton fichier

il y a :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub choix_fichier()
ChDir "c:"
fileToOpen = Application _
 .GetOpenFilename("Text Files (*.asc), *.asc")
If fileToOpen <> False Then
 MsgBox "Open " & fileToOpen
End If
End Sub

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub choix_fichier2()
    Dim fichier As Long
 
    ' ouvre la fentre de recherche
    With Application.FileDialog(msoFileDialogOpen)
        .AllowMultiSelect = True 'permet de selectionner plusieur fichier ce qui dans ton cas est interressant je crois
        .Show
 
        ' Display paths of each file selected
        For fichier = 1 To .SelectedItems.Count
            MsgBox .SelectedItems(fichier)
        Next fichier
 
    End With
 
End Sub

[Marc-L]

Bonjour !

Consulter l'aide VBA intégrée - et son exemple - de l'instruction Line Input # entre autres …

Ne pas oublier non plus la et les tutoriels à disposition sur ce forum
tout comme les nombreux exemples dans les discussions !

Tout fichier texte peut directement être ouvert dans Excel comme un classeur !
Si l'Assistant de conversion n'est pas automatiquement proposé, il peut être lancé à la demande …
Et en activant le Générateur de macros, un code est livré sur un plateau !

[patricktoulon]

salut Marc

ou mais on ne sais toujours pas comment il les veux dans le fichier exel donc la méthode open risque de lui compliqué la tache
si il y a pas même un semblant de structure ressemblant a un csv pour dispatcher dans le sheets

peut être devrait il nous donner un exemple de fichier Excel avec les données rapatriées


ps: toujours pas de nouvelle d'hortensia et son IE8

[Marc-L]

Vu la pauvreté de sa présentation, c'est bien pour cela Patrick que je l'aiguille vers l'Assistant de conversion
avec lequel il peut se débrouiller comme un grand !

Le fichier source serait déjà plus intéressant accompagné d'une présentation claire & exhaustive …

[patricktoulon]

et ouis on a tous debuté

des questions du genre
je voudrais faire un truc mais je sais pas si je suis sur le bon machin pour poser ma question

alors je vous explique mon problème
j'ai un bidule que je dois importé dans ma machine je crois qu'elle s'appelle Excel mais j'en suis pas sur

avec ce truc je voudrais bidouiller dans les données pour en extraire la chose


avec cette chose j'aimerais que ma machine l'analyse et me calcule le montant de la fenêtre du balcon de Windows

en fin bref je suis débutant si quelqu'un a des pistes je le remercie d'avance