Sujet Précédent Sujet Suivant

Utiliser les pointeurs

damlaine Messages postés 18 Date d'inscription mardi 5 juillet 2011 Statut Membre Dernière intervention 24 juillet 2011 - 5 juil. 2011 à 14:35
NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 - 5 juil. 2011 à 22:17
Bonjour,

je rencontre un soucis pour ma programmation VBA Excel qui doit réaliser une extraction dans un bloc note et les placer dans des colonnes. Mon bloc note est sous cette forme :
[JUN 22 2011 11:00:09]: USR: MESURES PLATEAU FLACONS : 999
[JUN 22 2011 11:00:09]: USR:D(O/XY)=1536.12
[JUN 22 2011 11:00:09]: USR:D(O/XY)-D(X/Y)=50.23
[JUN 22 2011 11:00:09]: USR:D(O/X)-D(Y/XY)=-0.62
[JUN 22 2011 11:00:09]: USR:D(O/Y)-D(X/XY)=2.35
[JUN 22 2011 11:00:09]: USR:D(A2/A7)=1219.77 ; E(A2)=62.78 ; E(A7)=1282.07
[JUN 22 2011 11:00:09]: USR:D(A3/A6)=1221.53 ; E(A3)=20.24 ; E(A6)=1241.25
[JUN 22 2011 11:00:09]: USR:D(B1/B4)=1168.04 ; E(B1)=-189.57 ; E(B4)=978.42
[JUN 22 2011 11:00:09]: USR:D(B8/B5)=1172.19 ; E(B8)=-188.99 ; E(B5)=983.16
[JUN 22 2011 11:00:09]: USR:FIN MESURES
[JUN 22 2011 11:01:43]: USR: MESURES PLATEAU FLACONS : 998
[JUN 22 2011 11:01:43]: USR:D(O/XY)=1535.85
[JUN 22 2011 11:01:43]: USR:D(O/XY)-D(X/Y)=38.87
[JUN 22 2011 11:01:43]: USR:D(O/X)-D(Y/XY)=-0.58
[JUN 22 2011 11:01:43]: USR:D(O/Y)-D(X/XY)=6.61
[JUN 22 2011 11:01:43]: USR:D(A2/A7)=1219.61 ; E(A2)=62.34 ; E(A7)=1281.65
[JUN 22 2011 11:01:43]: USR:D(A3/A6)=1221.48 ; E(A3)=25.43 ; E(A6)=1246.58
[JUN 22 2011 11:01:43]: USR:D(B1/B4)=1167.98 ; E(B1)=-189.57 ; E(B4)=978.36
[JUN 22 2011 11:01:43]: USR:D(B8/B5)=1172.17 ; E(B8)=-188.92 ; E(B5)=983.21
[JUN 22 2011 11:01:43]: USR:FIN MESURES

Donc vous comprenez bien qu'il y a x mesures. Ce que je veux extraire sont les coordonnées chose que j'arrive à faire grace aux fonctions InStr() et Mid(). Cependant pour la prochaine étape je n'arrive pas à la réaliser. Cette étape est de placer ces coordonnées dans un tableau de telle sorte qui ressemble à ceci :

Pallette Flacons........Mesure 1.........Mesure 2........etc
Date H:MN
D(O/XY)
D(O/XY)-D(X/Y)
Etc

Pour réaliser cette étape il faut utiliser les pointeurs, c'est ce qu'on m'a conseillé, sauf que pour ça j'ai aucune notion. D'ailleurs ça fait seulement un peu plus d'une semaine que j'ai découvert la programmation VBA.
Donc si vous pouvez m'aider à m'en sortir c'est très important s'il vous plait.
Merci d'avance Cyril.

1 réponse

Réponse 1 / 1
NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 159
5 juil. 2011 à 22:17
Bonjour,

Question similaire à
http://www.vbfrance.com/forum/sujet-CODE-VBA-EXCEL_1533890.aspx#5

Mon site
0

Discussions similaires

L’opération doit utiliser une requête qui peut être mise à jour
cs_meryamaa -
meryamaa -

8 réponses
Envoi de fichiers via XMLHttpRequest
cs_ov3rdoze -
ov3rdoze -

9 réponses
Pointeur avec deux étoiles
Reacen -
CptPingu -

1 réponse
L'opération doit utiliser une requête qui peut être mise..
Levotre123 -
jordane45 -

1 réponse
LOPERATION DOIT UTILISER UNE REQUETE QUI PEUT ETRE MISE A JOUR
cs_nawal59 -
tecman -

1 réponse
Rejoignez-nous