défi sous word

Question

hello tout le monde !!!
bon voilà, j'ai trouvé un boulot d'été sympa sur poste informatique, et mon patron utilise des tableaux sous word. et sa manière de trier lui fait perdre du temps j'aimerais donc lui en faire gagner. j'explique le truc ; il a des tableaux sous cette forme :

Numéro Nom Niveau
12       Emilien  Expert
13        Antony  Debutant
14       Jonathan Debutant

vous allez me dire que vous voyez pas ou est le probleme et bien mon patron aimerait que ce tableau s'affiche comme ça :

Debutant Antony 13
Debutant Jonathan 14
Expert     Emilien 12

bref, trier par niveau et non par numéro. et en évitant les artifices du genre 1-debutant 2-expert parce que c'est ce qu'on fait déjà et c'est une grosse perte de temps.... voilà merci d'avance

antony un ami qui vous veut du bien

econs · Answer

Et c'est quoi la question ?

Manu

econs · Answer

A tout hasard, voici 2 ou 3 bricoles :

Dim objetWord As Word.Application
Set objetWord = CreateObject("Word.Application")
objetWord.Open "c:	oto.doc"
 - Ouverture du document Word

objetWord.ActiveDocument.Tables(i).Count
 - nombre de tableaux dans le document Word

objetWord.ActiveDocument.Tables(ob.ActiveDocument.Tables.Count).Rows(3).Delete
 - efface la troisième ligne du dernier tableau du doc Word

objetWord.ActiveDocument.Tables(i).Cell(j,k)
 - ième table du document
 - cellule de coordonnées (j,k)

Manu

econs · Answer

Au fait .... en VB ou en VBA ?

Manu

Défi sous word

3 réponses

Discussions similaires