Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  • Quoi de neuf ?
  • Forum
    • Actions
      • Marquer les forums comme lus
      • Bugs & Suggestions
    • Réseau social
      • Groupes
      • FAQ forum
      • Liste des utilisateurs
      • Voir l'équipe du site
    • Blogs
    • Agenda
    • Règles
  • Blogs
  • Projets
  • Recherche avancée
  • Index du forumEn A4 Maille Moyen doré nbsp;n2206 Débardeur bkg Réversible N2206 nbsp;n2206 Noir Mixte
  • Logiciels
  • Microsoft Office
  • Word
  • Débardeur Maille Réversible doré Noir nbsp;n2206 En N2206 A4 bkg nbsp;n2206 Moyen Mixte
  • VBA Word
  • [WD-2003] recherche de mots entre crochets

+ Répondre à la discussion

Discussion: recherche de mots entre crochets

  • Outils de la discussion
    • Afficher une version imprimable
    • S'abonner à cette discussion…
  • Affichage
    • Choisir le mode hybride
    • Choisir le mode arborescent
  1. s Shirt Blanc Rounder Tee Blanc Alpinestars xC1gz8R
    02/02/2011, 10h21 #1
    moht66
    Futur Membre du Club
    Assistant de recherche
    Inscrit en
    février 2011
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe :
    Localisation : Belgique

    Informations professionnelles :
    Activité : Assistant de recherche

    Informations forums :
    Inscription : février 2011
    Messages : 8
    Points : 8
    Points
    8

    recherche de mots entre crochets

    Woven white Nike Short Homme Academy18 Obsidian obsidian 1xSUwvqS
    Bonjour à tous,

    je suis occupé à créer un code dans Visual Studio (sur lequel je débute depuis 1 semaine) afin de vérifier des références biblio citées au sein d'un texte word2003.
    J'ai plus ou moins créé un code qui devrait fonctionner mais je n'arrive pas à savoir comment stocker la référence contenue entre [...], à savoir l'auteur et la date : [auteur, date]. J'arrive à faire identifier le premier [ mais pas celui de la fin...or les longueurs des références varient fortement...

    Quelqu'un aurait-il un idée de comment stocker ces références entre crochets??

    Merci d'avance!!
    Répondre avec citation   0  0

  2. Ju1.0
    Membre habitué
    Ingénieur Automaticien
    Inscrit en
    novembre 2010
    Messages
    125
    Détails du profil
    Informations personnelles :
    Sexe :
    Âge : 34
    Localisation : France, Val d'Oise (Île de France)

    Informations professionnelles :
    Activité : Ingénieur Automaticien
    Secteur : Industrie

    Informations forums :
    Inscription : novembre 2010
    Messages : 125
    Points : 158
    Points
    158

    De quelle manière recherche tu ton premier crochet ?
    Tu n'aurais pas un bout de code à nous montrer ?
    Je pense que dans une variable de type string j'enregistrerai caractère par caractère chaque caractère suivant ton premier crochet jusqu'à tomber sur le 2ème crochet, mais peut-être que il y a mieux, ou plus adapté à ton code.
    Répondre avec citation   0  0
    Réversible En bkg N2206 Mixte Débardeur Noir A4 Moyen nbsp;n2206 nbsp;n2206 Maille doré
  3. 02/02/2011, 17h23 #3
    moht66
    Futur Membre du Club
    Détails du profil
    Informations personnelles :
    Sexe :
    Localisation : Belgique

    Informations professionnelles :
    Activité : Assistant de recherche

    Informations forums :
    Inscription : février 2011
    Messages : 8
    Points : 8
    Points
    8

    Salut Ju.1

    C'est justement ce crochet qui m'embête...J'ai testé plus ou moins deux codes mais il y a des foirages aux deux:

    1er:

    Code : Sélectionner tout - Visualiser dans une fenêtre à partFemme Capuche Manteau Manches Parka hiver Automne Fourrure Casual Taille Grande Fausse Aimado Longues Rouge Doublée À Avec Veste UCpwx5q
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
     Dim reference() As String
        Dim n As Nike Short Femme dust Crew Dust 565SErqwInteger
        Dim i As Integer
        Dim mot() As String
     
    'ouverture du fichier word
            FileOpen(1, chaplivre.Text, OpenMode.Input)
     
            Do While Not EOF(1)
                i = i + 1
                ReDim Preserve mot(0 To i)
                Input(1, mot(i))
     
                MsgBox(mot(i))  'il lit les mots dans une autre language si issu de .word, et par paquet si issu de .txt
     
                If mot(i)Vert Bas Avec Manches Rayures D'écran Protection blanc Motif dYqnwS6pn = "[" Then
                    MsgBox("ok")           'c'est ici qu'il y a un stuut!
                    reference(i) = reference(i) + mot(i)  'début d'enregistrement des references
                    MsgBox(reference(i))
     
                    If mot(i) = "]" Then2 Homme Corps 0 De Altra Maillot Gris Pour wXaxgv8q reference(i) = reference(i)
     
                End If
     
            Loop
    -->dans ce cas le fichier word est lu sous un autre langage, si je le met en .txt, il lit par "paquets" de mots... Et en plus j'ai un stuut dans ma boucle car quand je n'obtiens rien dans mon fichier de sortie.




    J'ai commencé aussi avec :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
        Dim DocWord As Microsoft.Office.Interop.Word.Document
      DocWord = GetObject(chaplivre.Text)
            DocWord.Activate()
    -->le souci est que je ne vois pas du tout, mais alors pas du tout, comment continuer (lire le fichier, enregistrer les mots et identifier le crochet) avec cette deuxième solution possible (qui sait lire les .word logiquement)...
    Répondre avec citation   0  0

  4. 02/02/2011, 17h44 #4
    carden752
    Membre expert

    Spécialiste progiciel
    Inscrit en
    février 2010
    Messages
    1 745
    Détails du profil
    Informations personnelles :
    Sexe :
    Âge : 32
    Localisation : France, Haute Loire (Auvergne)

    Informations professionnelles :
    Activité : Spécialiste progiciel
    Secteur : Service public

    Informations forums :
    Inscription : février 2010
    Messages : 1 745
    Points : 3 007
    Points
    3 007
    En A4 bkg Mixte Débardeur Moyen N2206 doré nbsp;n2206 Maille nbsp;n2206 Réversible Noir

    Bonjour, Tight Airtracks Pantalon Running Course Funktions réflecteurs compression fluo Longue De respirant CCF6qUwO

    Personnellement, j'aurais recherché le premier crochet [ avec la fonction de recherche de Word Find.
    Ensuite, j'enregistre le myrange(i).start
    Je recherche le deuxième crochet ]
    Ensuite, j'enregistre le myrange(i).end
    J'incrémente mon i
    Et je fais cela en bouclant jusqu'à la fin du document en cherchant le crochet suivant [.
    (Il y a autant de crochet ouvrant que fermant?)

    Normalement myrange(i) contiendrait tes bouts de texte.
    Cordialement,
    Christophe

    Merci de ne pas oublier de mettre résolu quand le sujet l'est. Cela aide tous les DVPnautes dans leur recherche
    Répondre avec citation   0  0

  5. Sepia
    Rédacteur/Modérateur
    Levi's Cintrée Robe Coupe Fille Bleu Indigo rnrEH48qg

    Administrateur du cursus [email protected] - Chef de Projet NCU (digital learning) - Université de Rennes
    Inscrit en
    octobre 2007
    Messages
    3 117
    Détails du profil
    Informations personnelles :
    Sexe :
    Âge : 55
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Administrateur du cursus [email protected] - Chef de Projet NCU (digital learning) - Université de Rennes
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : octobre 2007
    Messages : 3 117
    Points : 6 847
    Points
    6 847

    Bonjour,

    Ben personnellement, j'aurais demandé à Word de faire le boulot pour moi. L'algo est le suivant
    Tu recherches tout ce qui est entre un "[" et "]" dans un document Word, ben ça devrait être ma référence (si tu veux plus d'explications sur les recherches dans Word, clique ici). Après tu la stockes dans une variable ou ailleurs dans un autre document, peu importe, ce qui compte après c'est de recommencer en partant de la position où tu étais auparavant.
    Voilà le code en VBA

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
     
       '// Variable de stockage des références. Évidemment pour une application professionnelle, il faut disposer de la taille nécessaire au stockage des variables, sinon ça va finir par planer Word sévère, mais ce n'est pas le sujet
       mesReferencesBibliographiques = ""
     
        Selection.Find.ClearFormatting
        With Selection.Find
            .Text = "[[]*[]]"
            .Replacement.Text = ""
            .Forward = True
            .Wrap = wdFindStop
            .Format = False
            .MatchCase = False
            .MatchWholeWord = FalseHommes Tressé Période Marron Ceinture Occasionnel Noir Élastique Accessorystation® 8vxqwnAPt
            .MatchWildcards = True
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute
        While Selection.Find.Found
            mesReferencesBibliographiques = mesReferencesBibliographiques
            '// Il n'y a pas besoin de séparateur de texte puisque le texte sélectionné commence par un "[" et finit par "]"
            Selection.MoveRight Unit:=wdCharacter, Count:=1
     
            Selection.Find.Execute
        Wend
    @+
    Répondre avec citation   0  0

  6. Heureux-oli
    Rédacteur/Modérateur


    Contrôleur d'industrie
    Inscrit en
    février 2006
    Messages
    21 018
    Détails du profil
    Informations personnelles :
    Sexe :
    Soutien Nike Favorites Femme Noir De Strappy gorge Sport blanc AqfPcrEqTn
    Âge : 54
    Localisation : Belgique

    Informations professionnelles :
    Activité : Contrôleur d'industrie
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : février 2006
    Messages : 21 018
    Points : 42 636
    Points
    42 636

    Salut,

    Un petit mot en plus, la méthode find de l'objet selection est de loin plus puissante que les autres méthodes que l'on pourrait utiliser y compris une boucle sur le contenu.
    J'ai pas encore de décodeur, alors, postez en clair ! Comment mettre une balise de code ?
    Débutez en VBA

    Mes articles


    Dans un MP, vous pouvez me dire que je suis beau, ... mais si c'est une question technique je ne la lis pas ! Vous êtes prévenus !
    Répondre avec citation   0  0

  7. 03/02/2011, 14h34 #7
    Ju1.0
    Membre habitué
    Ingénieur Automaticien
    Inscrit en
    novembre 2010
    Messages
    125
    Chaud Andyshi De Lot À Femmes Gants Gris D'extérieur Lapin En Rabat Souple Et Fourrure Polaire qqzT14U
    Détails du profil
    Informations personnelles :
    Sexe :
    Âge : 34
    Localisation : France, Val d'Oise (Île de France)

    Informations professionnelles :
    Activité : Ingénieur Automaticien
    Secteur : Industrie

    Informations forums :
    Inscription : novembre 2010
    Messages : 125
    Points : 158
    Points
    158

    Je me sens tout bête d'avoir proposer une boucle à la *$% alors que il y a 2 jours, cette méthode m'a sortie d'une impasse dans la quelle je tournai en rond à faire marcher une boucle
    Répondre avec citation   0  0

+ Répondre à la discussion
ActualitésF.A.Q WORDTUTORIELS WORDOUTILS WORDLIVRES WORDQUIZZ WORD
En nbsp;n2206 Mixte A4 Débardeur Maille Réversible Moyen N2206 doré bkg nbsp;n2206 Noir
  • Index du forum
  • Logiciels
  • Microsoft Office
  • Word
  • VBA Word
  • [WD-2003] recherche de mots entre crochets

« Discussion précédente | Discussion suivante »

Discussions similaires

  1. [2008R2] variable texte unique en entrée pour recherche avec mots clés
    Par rikidi dans le forum Développement
    Réponses: 6
    Dernier message: 19/02/2013, 15h40
  2. Allegra K Allegra Femme K Sandales Sandales Red 11Rrzqw
    Recherche de texte entre crochets
    Par thib3113 dans le forum Regex
    Réponses: 5
    Dernier message: 18/09/2011, 07h18
  3. [WD14] Recherche d'un mot entre deux textes
    Par wojc01 dans le forum WinDev
    Réponses: 6
  4. recherche mot entre deux délimiteurs
    Par dz_robotix dans le forum C++Builder
    Réponses: 8
    Dernier message: 19/10/2009, 12h29
  5. Supprimer mot entre crochets en shell
    Par sebcah dans le forum Linux
    Réponses: 2
    Dernier message: 05/05/2008, 13h21

Partager

Partager
  • Nous contacter
  • Developpez.com
  • Haut de page