> Tous les forums > Forum Bureautique
 Fonctione Remplacer sous WORD 2003
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
n2c_coxiste
  Posté le 10/01/2008 @ 18:09 
Aller en bas de la page 
Petit astucien

Bonjour,

je rame un peu avec mon WORD.

Je voudrais reformater le tableau des marées du port de Dunkerque OUEST pour l'utiliser sous EXCEL, et faire mes calculs...

Le format de chaque paragraphe est de type ANNEE MOIS JOUR PAS1 PAS2..... PAS288 chaque pas correspond à 5mn, la valeur est en centimètre et correspond à la hauteur de marée.

Je voudrais isoler la date en entête de chaque § puis ordonner les données sur une colonne avec l'heure à gauche

2008 1 1

00h00 175

00h00 176

etc...

j'ai beau chercher à faire ça par étape, avec les * et ? je ne parviens pas à mes fins!

remplacer "2008 ? * " par "2008 ? * ^|"

Et ça me place des ? dans mon résultat à la place des jours...

vous auriez une piste?

Merci par avance.

Greg.

[quote]

UT+0 DUNKERQUE_OUEST 51 1N 2 10 E

2008 1 1 175 176 177 179 181 183 185 188 191 194 198 202 206 211 216 221 227 233 239 246 252 259 266 274 282 290 298 306 315 323 332 341 350 359 368 378 387 396 405 414 423 431 440 448 456 464 471 478 485 491 497 502 507 511 515 519 522 524 527 528 530 531 532 532 532 532 531 531 530 528 527 525 523 521 519 516 514 511 507 504 500 496 492 488 483 478 473 468 462 456 450 444 438 431 425 418 411 404 397 390 383 376 369 362 354 347 340 333 326 319 312 305 298 292 285 278 272 266 259 253 247 241 235 230 224 219 214 209 204 199 195 191 187 183 179 176 172 169 167 164 161 159 157 156 154 153 152 152 152 152 152 153 154 155 157 159 162 165 168 171 175 179 183 188 193 199 204 210 216 223 229 236 244 251 259 267 275 284 292 301 310 319 328 338 347 357 366 375 385 394 403 411 420 428 436 444 451 458 464 470 476 481 486 490 494 498 501 504 507 509 511 512 514 515 515 516 516 516 516 516 515 514 513 512 510 508 506 503 501 498 495 491 487 483 479 474 470 465 460 454 449 443 437 432 426 419 413 407 401 395 388 382 375 369 363 356 350 344 337 331 325 319 312 306 301 295 289 283 278 272 267 262 257 252 247 243 238 234 230 226 222 219 215 212 209 206 203 201

2008 1 2 198 197 195 194 192 191 190 189 189 189 189 189 190 191 192 193 195 197 200 203 206 209 213 217 221 225 230 235 241 246 252 258 264 270 277 284 291 298 305 313 320 328 336 344 352 360 368 376 384 392 400 408 416 423 430 438 444 451 457 463 469 474 479 484 488 492 496 499 502 504 506 508 510 511 512 513 513 513 513 513 512 511 510 509 507 505 503 501 498 496 493 489 486 482 478 474 470 466 461 456 451 446 440 435 429 424 418 412 406 400 394 388 381 375 369 362 356 349 343 336 330 324 317 311 304 298 292 286 280 274 268 262 257 252 246 241 236 231 227 222 218 213 209 205 202 198 194 191 188 185 182 180 177 175 173 172 170 169 168 168 167 168 168 169 170 171 173 175 177 180 183 186 190 194 198 202 207 211 217 222 228 233 240 246 252 259 266 273 281 288 296 304 312 321 329 337 346 354 362 371 379 387 395 403 410 418 425 432 438 444 450 456 461 466 470 475 479 482 486 489 492 494 496 498 500 501 502 503 504 504 504 504 504 503 502 501 499 497 495 493 491 488 485 482 478 475 471 467 463 458 454 449 444 439 434 429 424 419 413 408 402 396 390 385 379 373 367 361 355 349 343 337 331 325 319 313 308 302 297 291 286 281 276 271 266 261 257 252

2008 1 3 248 244 241 237 233 230 226 223 220 217 214 211 208 206 204 202 200 199 197 196 196 195 195 195 195 196 197 198 200 202 204 206 209 212 215 218 222 226 230 234 239 244 249 254 259 265 271 277 283 290 296 303 310 317 325 332 340 347 355 363 370 378 386 393 400 408 415 422 429 435 441 447 453 458 464 469 473 477 481 485 488 492 494 497 499 501 503 504 505 506 506 506 506 506 505 504 503 501 500 498 495 493 490 487 484 481 478 474 470 466 462 458 454 449 444 440 435 430 424 419 413 408 402 396 390 384 378 372 366 359 353 347 340 334 328 322 315 309 303 297 292 286 280 275 269 264 259 254 249 244 239 234 230 225 221 217 213 209 205 201 198 194 191 188 186 183 181 179 178 177 176 175 174 174 175 175 176 177 178 180 182 184 186 189 192 195 199 202 206 211 215 220 225 230 236 242 248 254 261 268 275 282 290 297 305 313 321 329 338 346 354 362 370 378 386 394 401 409 416 423 429 436 442 448 453 459 464 469 473 477 481 485 488 491 494 497 499 500 502 503 504 505 505 505 505 504 503 502 501 499 497 495 493 490 488 485 482 478 475 471 468 464 460 455 451 446 442 437 432 426 421 416 410 404 398 393 387 381 375 369 363 356 350 344 338 332 327 321

[quote]

Publicité
fth
 Posté le 11/01/2008 à 00:35 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour n2c,

J'ai créé une petite macro qui peut te récupérer le tableau des marées.

Tu trouveras deux fichier ci-joint (subfth.xls et janvier.txt)

Tu peux directement le tester en ouvrant le fichier subfth.xls et dans la TextBox qui s'ouvre, tu introduits "janvier"

En gros la marche à suivre est la suivante :

  1. copier/coller le tableau des marées dans un nouveau document word
  2. dans word, je lui demande de remplacer tout les "espaces" par un saut de ligne "^p" en cochant la case "Utiliser les caractères génériques"
  3. sauvegarder le fichier dans le même répertoire que le fichier "subfth.xls" au format "Texte seulement(*.txt)"
    1. tu vas avoir un message te disant que le fichier contient peut-être des fonctionnalités non compatible avec ce format, tu t'en fout, tu clic "oui"
    2. tu peux voir le résultat dans le fichier "janvier.txt"
  4. ouvrir le fichier "subfth.xls" et introduire le nom du fichier à importer dans la TextBox

Est ce que c'est ce genre de procédure que tu souhaitais ?

@+



Modifié par fth le 11/01/2008 02:47
n2c_coxiste
 Posté le 11/01/2008 à 09:00 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Nickel!

je n'ai pas encore compris le sub FTH, mais je vais dépioter!

Merci, prochaine étape, rechercher les Basses mer et les Hautes mer de matin et d'après-midi.... pour alléger le fichier.

En finalité de dois avoir ça:

01/01/2008 mar BM00h48 01,74m PM06h19 05,31m BM13h21 01,51m PM19h04 05,16m
02/01/2008 mer BM01h47 01,88m PM07h25 05,13m BM14h21 01,67m PM20h09 05,04m
03/01/2008 jeu BM02h51 01,94m PM08h35 05,06m BM15h24 01,74m PM21h12 05,04m
04/01/2008 ven BM03h56 01,90m PM09h39 05,12m BM16h29 01,70m PM22h10 05,16m
05/01/2008 sam BM05h00 01,75m PM10h36 05,29m BM17h28 01,57m PM23h02 05,35m
06/01/2008 dim BM05h54 01,54m PM11h25 05,49m BM18h15 01,42m PM23h45 05,57m
07/01/2008 lun BM06h36 01,34m PM12h06 05,70m BM18h54 01,27m
08/01/2008 mar PM00h19 05,78m BM07h14 01,15m PM12h42 05,88m BM19h31 01,14m
09/01/2008 mer PM00h54 05,95m BM07h52 00,98m PM13h16 06,03m BM20h08 01,03m
10/01/2008 jeu PM01h29 06,08m BM08h30 00,85m PM13h51 06,13m BM20h46 00,96m
11/01/2008 ven PM02h05 06,14m BM09h09 00,77m PM14h29 06,16m BM21h24 00,94m
12/01/2008 sam PM02h41 06,13m BM09h46 00,75m PM15h07 06,12m BM22h01 00,97m
13/01/2008 dim PM03h17 06,08m BM10h24 00,78m PM15h46 06,04m BM22h39 01,04m
14/01/2008 lun PM03h55 06,02m BM11h04 00,84m PM16h27 05,92m BM23h19 01,15m
15/01/2008 mar PM04h41 05,93m BM11h48 00,96m PM17h17 05,77m
16/01/2008 mer BM00h08 01,31m PM05h35 05,78m BM12h41 01,13m PM18h17 05,58m
17/01/2008 jeu BM01h06 01,50m PM06h39 05,59m BM13h48 01,31m PM19h27 05,39m
18/01/2008 ven BM02h20 01,65m PM07h53 05,44m BM15h05 01,41m PM20h49 05,32m
19/01/2008 sam BM03h41 01,63m PM09h16 05,45m BM16h25 01,36m PM22h09 05,45m
20/01/2008 dim BM05h02 01,42m PM10h33 05,67m BM17h40 01,16m PM23h15 05,70m
21/01/2008 lun BM06h09 01,10m PM11h36 05,96m BM18h39 00,94m
22/01/2008 mar PM00h09 05,96m BM07h03 00,80m PM12h28 06,20m BM19h28 00,79m
23/01/2008 mer PM00h50 06,17m BM07h51 00,59m PM13h14 06,36m BM20h12 00,73m
24/01/2008 jeu PM01h32 06,28m BM08h35 00,48m PM13h57 06,40m BM20h53 00,74m
25/01/2008 ven PM02h12 06,31m BM09h16 00,46m PM14h38 06,34m BM21h31 00,82m
26/01/2008 sam PM02h50 06,27m BM09h53 00,53m PM15h16 06,21m BM22h06 00,95m
27/01/2008 dim PM03h25 06,16m BM10h28 00,68m PM15h52 06,03m BM22h39 01,10m
28/01/2008 lun PM03h59 06,01m BM11h02 00,87m PM16h26 05,81m BM23h12 01,27m
29/01/2008 mar PM04h36 05,80m BM11h37 01,11m PM17h03 05,55m BM23h49 01,49m
30/01/2008 mer PM05h19 05,52m BM12h18 01,41m PM17h49 05,24m
31/01/2008 jeu BM00h35 01,77m PM06h12 05,17m BM13h11 01,73m PM18h48 04,91m

n2c_coxiste
 Posté le 11/01/2008 à 09:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bon, mon Word me joue des tours... je fichier complet 2008, contient approx 300*366 données. (soit 109800)

quand je lance la fonctione remplace [ESPACE] par [^p] word a du mal... il doit créer plus de 100000lignes, et apparemment il n'aime pas ça!

Il faut que je trouve une méthode différente: aller chercher pour chaque mois dans le fichier texte l'ensemble des hauteurs de marées (trouver d'abord "2008" puis verifier le mois, puis le jour, puis les pas de 5mn.

Définir pour la matinée {de 00h00 à 12h00} la basse mer et la haute mer, trouver la même chose pour l'après midi {de 12h05 à 23h55} ==> ce sont des heures UT donc 2 heure de décalage l'été et 1 heures de déclage l'hiver...

pour le pas balader de gros fichiers volumineux, il faudrait créer une feuille "temp", y travailler une journée, extraire BMs et HMs, remplir le calendrier final, puis passer au jour suivant... Sinon je vais devoir investir dans un calculateur! (j'ai un PIV 2,8GHz avec 1Go et XP pro, WORD 2003, et le remplacement de ne se fait pas... ou ne se termine pas)

J'ai placé mes fichiers ici

<> Greg.



Modifié par n2c_coxiste le 11/01/2008 10:10
fth
 Posté le 15/01/2008 à 13:36 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour Greg,

Juste pour dire que je ne t'ai pas oublié, je travaille sur une nouvelle version de l'exportation de tes données, je n'ai pas bcp de temps libre pour le moment ce qui fait que ça prend un peu de temps mais c'est en bonne voie

@+

fth
 Posté le 15/01/2008 à 17:15 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour Greg,

Ci-joint tu trouveras une première ébauche.

Enregistre les deux fichiers subfth.xls et extraction_DW.doc dans le même répertoire que tes fichiers DW_2008.txt, DW_2009.txt, etc...

Ouvre le fichier word extraction_DW.doc et introduit l'année pour laquelle tu veux extraire les indices des marées.

Ensuite lance le tri comme proposé sur le fichier excel qui s'ouvrira.

En fin de chaque tableau des marées, tu verras que j'ai déjà récupéré les indices BM et HM pour le matin et l'après midi, pour chaque jour.

Il reste maintenant à finaliser un résumer des BM et HM avec les dates et heures correspondantes, je le ferai dès que j'aurai un peu de temps.

Cette procédure fonctionne correctement chez moi, chez toi ça bloque toujours ?

@+

n2c_coxiste
 Posté le 15/01/2008 à 20:03 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Salut fth,

grand merci pour ton aide, je continue à avoir un bug avec mon WORD... il traine à convertir, et lance le debogger car la boîte de dialogue est toujours ouverte avant l'ouverture d'un nouveau fichier... ça rame, je vais ré-installer mon pack-office, car en plus ua lancement de WORD, l'install de VB EDITOR II se lance, et pointe vers un répertoire ou ne se trouvent pas les sources...

je vais étudier ton code, qui me sera très utile. Là je rentre de déplacement à Paris, je n'ai pas mis les mains dans le PC depuis plusieures jours...

Encore un Grand merci,

Greg.

fth
 Posté le 16/01/2008 à 10:23 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Etonnant, j'ai pourtant un vieux coucou comme pc, AMD 1.8GHz avec 512Mo de Ram, et la procédure d'extraction des données sous Word ne dure qu'une 10ène de secondes.

Je te joint un exemple de ce que donne l'exportation des données sur excel au départ du fichier DW_2008.txt, en +/- 15 secondes les 93805 valeurs sont extraites du fichier txt et répertoriées dans les tableaux xls (une feuille par mois est crée).

Je ne sais pas pourquoi ça coince chez toi .

n2c_coxiste
 Posté le 16/01/2008 à 17:08 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

bonjour fth,

yes, ça fonctionne pas mal au boulot, sous Excel et Word 2000. ça n'est pas très long, sans avoir une machine de compétition!

Par contre, la fonctione xlup doit bugger, car il ne prends pas 288 pas en conte, mais s'arrête vers 21h25 dans l'extraction de chaque journée. (pas 260)

Et, on ne peut utiliser les fonctions Min et Max pour la détection des marées, car le pas n'est pas multiple de 24h, le cadencement est plus proche des 11h... donc certeins jours il n'y a pas 2 BM par exemple, il faut sans doute utiliser des fonctions dédiées aux maths, à la trigo...

Mais ton code est truffé de fonctions que je ne connaissais pas... dont certaines sont encore obscures pour moi... En tout cas un énorme merci, ça fait grandement avancer mes recherches, et ça montre bien comment basculer d'un fichier de données en .txt, puis traiter avec word, puis ré-agencer sous Excel pour traitement.

Dans la partie traitement mensuel, j'ai remplacé les numéros de mois par une variable, celà fonctionne, je la ré-utilise dans la nom de sauvegarde du fichier ou de l'onglet.

allez, je m'y replonge dès que les zèbres me laissent en paix!!!

Publicité
fth
 Posté le 16/01/2008 à 17:49 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Salut Greg,

arf...en effet je n'ai pas vu ce détail qu'il s'arrêtait au pas 260 au lieu de 288. Etrange...je vais essayer de comprendre le pourquoi du comment

Concernant le cadencement des BM et HM, là je suis paumé...mais j'avoue que je n'ai pas le pied très marin .

n2c_coxiste
 Posté le 16/01/2008 à 18:06 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Ben oui, pourtant la fonction xlup est bien utilisée... je vais yeuter aussi, poser des flags et observer...

ici, c'est OYE PLAGE... donc en plein vent 200 jours par an... près d'Eurotunnel. (Dunkerque, Calais, Boulogne/mer)

C'est la particularité des marées, c'est comme une superposition d'armoniques, qui dépendent de l'inclinaison de la terre, de la position de la lune et du soleil, et du point de situation du port ou le calcul se fait (il y a des effets de retard)

Pas simple non... donc il va faloir passer par une solutionun peu mathématique...

Dans une feuille de calcul, j'arrive sur une journée à déterminer les marées montantes (le niveau en cm du pas n+1 et plus grand d'au moins 2cm au niveau du pas n. Pour la marées decendante, ben pareil, ecart entre deux valeurs successives supérieur à 2cm...) Pour la marée basse, niveau inférieur à 220cm (là c'est pour mes tests) et les valeurs successives sont égales, pour la haute mer, niveau > 220cm et valeurs siccessives égales)

Là ça fonctionne, sauf que ça fait une plage de 30mn au moins en marées basse ou haute (on appelle ça l'étale, c'est la partie horizontale de la sinusoïde)... reste à déterminer le plus précisément possible l'heure de la bascule... là les maths seront peut-être indispensables....

<> Ton boulot apporte déjà beaucoup. Je vais tenter de by-passer Word, et à partir d'excel aller chercher directement les valeurs des hauteurs d emarées dans le txt...

Greg.

un peu de théorie: http://www.kerignard.com/marees/

on peut y lire:

Précédemment nous avons considéré, pour le calcul des hauteurs d'eau, que les marées hautes étaient séparées de 12h00 par simplification. En fait il n'en est rien. La Lune ne tourne pas autour de la Terre en 24h00 mais en 24h50 mn. Il faut en effet attendre que la Terre tourne de 360° + 13° pour retrouver à nouveau la Lune au desus de sa tête. Les marées ayant étroitement liées à cette révolution, l'intervalle de temps entre une haute mer et une basse mer est de 24h50 / 4 = 6 h 13 (environ).

Le pas approximatif est donc de 6h et 13 minutes...

ici, encore plus fort, mais prévoir un tube d'UPSA...

http://www.imcce.fr/fr/ephemerides/astronomie/Promenade/pages5/525.html



Modifié par n2c_coxiste le 16/01/2008 19:05
fth
 Posté le 16/01/2008 à 19:29 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

avant de voir que tu avais apporté une modification à ton fichier, j'étais parti me noyer sur ce site là http://sauvmer.free.fr/meteo/calhaut.html
n2c_coxiste
 Posté le 16/01/2008 à 19:40 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Haha!

je ne connaissais pas celui-là, je vais y jeter un oeil.

on peut donc déterminer la première marée de l'année, puis 6h13 représentant dans ce cas ci 15 pas, on recherche un coup =PETITE.VALEUR(débplage:débplage + 15;3) un coup =GRANDE.VALEUR(débplage:débplage + 15;3) en ayant incrémenté débplage de 15 pas. (ou réinitialisé par rapport au pas de la dernière heure de marée trouvée) 6h13 n'est pas multiple de 5mn.

L'idéal serait donc de mettre sur une colonne la date+ l'heure (pas de 5mn) puis en colonne 2 placer l'ensemble des hauteur en cm... en colonne 3 placer du texte BM et HM aux bons endroits (366 jours x 288 pas = 105408 pour une année à 366 jours, 365 pour les autres)

Le cahier des charges se précise, il sera ainsi évident par la suite de chercher la suite des BM et des HM dans la colonne 3 puis de remplir le tableau des marées...

ça se précise.

Greg.

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Sujets relatifs
Appels de notes de bas de page sous Word 97-2003
Note de fin de document sous Word 2003
Etiquettes sous Word 2003
Word Art sous word 2003
Probléme à l'ouverture de word 2003 sous Wxp sp3
PB insertion auto sous word 2003
Choisir son programme de messagerie sous word 2003
impression sous word 2003
Zones de texte reliées sous word 2003
Impossible d'insérer une photo sous word 2003
Plus de sujets relatifs à Fonctione Remplacer sous WORD 2003
 > Tous les forums > Forum Bureautique