[VB] Copie de variables dans un fichier excel

Bonoir,

pourrais tu nous dire ce que se passe toutes les 500 ms qui fait changer la variable?

A priori ça ne devrait pas être bien compliqué de rajouter une ligne ou deux dans ton module, mais tu ne nous dis même pas si c'est du VB pur, ou bien si ça tourne déjà sous Excel, faut-il que le module s'occupe aussi d'ouvrir ledit fichier Excel, enfin bref, ce genre de "détails"...

Pourquoi se compliquer la vie à faire simple, quand c'est si simple de faire compliqué?

Mon programme ne s'occupe pas du tout d'excel pour l'instant et en faite il récupère la valeur de signaux électrique à partir d'une carte d'acquisition toutes les 500 ms et trace une courbe dans une pictureBox.
C'est pour cela que mes variables changent.
Moi je voudrais sauvegarder ces variables dans un fichier excel
voila

Bonjour,

Le mieux, c'est de sauvegarder tes valeurs dans un fichier texte au format csv, chaque champ est séparé par une virgule, les textes sont délimités par des " ". Excel lit ce genre de fichier sans problème.
Mais à raison d'une valeur toutes les 500ms ça va faire un sacré tableau, suivant la durée de l'enregistrement.

Salut.

C'est pas grave je veux juste sauvegarder les variables dans 2 colonnes différentes même si il y en a beaucoup
comment puis-je faire en csv?

bonsoir,

J'ai un test avec un fichier .csv mais excel à mal interprété le format donc j'ai fait le meme test avec un fichier .txt et ça à marché

j'explique le principe:

Tout d'abord tu ouvre un fichier

fichier="mon fichier.txt"
open fichier for output as #1

dans une boucle
on commence la capture des signaux, on peut les mettre sur plusieurs colonnes

while not condition_de_sortie de boucle
signal1=.... : signal2=...... : signal3=........

on tranfère les valeurs dans le fichier

print #1,signal1 ; "," ; signal2 ; "," ; signal3

wend

on ferme le fichier
close #1

Voici un petit programme test

Sub test_txt()
Dim i As Integer, x As Double, y As Double, z As Double
i = 0
Open "c:\tets.txt" For Output As #1
While i < 30
i = i + 1
x = 1000 + (i / 3): y = 5000 - (i * 0.25): z = 160 + (2 * i / 5)
Print #1, i; ","; x; ","; y; ","; z
Wend
Close
msgox "le fichier c:\tets.txt à été créé"
End Sub

Avec Exel menu Fichier > Ouvrir > Types de fichiers Fichiers texte *.prn;*.txt;*.csv
choisir c:\test.txt > Ouvrir
Délimité > suivant
Separateur cocher Virgule > suivant
Format de données Standard > Terminé

Le résultat sera 4 colonnes de nombres que tu meut facilement manipuler.

En espérant que ça te sera utile, Ciao.

j'ai juste une petite correction c'est Msgox et non msgox

MsgBox "le fichier c:\tets.txt à été créé"

Salut

Ok je te remercie de ta réponse je vais appliquer tous cela