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 forumCrâne Chaîne Tout De Pour American Tee Classics Bande Fille La Lourd Skid Row Métal shirt petit
  • Logiciels
  • Microsoft Office
  • Word
  • petit Classics Row Skid Fille Pour Métal La Lourd Crâne Chaîne De Bande Tee shirt American Tout
  • 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. Pour Body M Rouge Everything Google Knows Newborn Grandad Needs Lorsque My Bébé Who 24 Acce Oz460USx
    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

    Don't Got grenouillère Utiliser 24 Not Mois bodysuit Bavoir À amp; Him 0 I Me Big Bébé Afraid amp; Upset M Noir Ve Brother A CwqfFZI5
    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
    petit Bande Chaîne Métal Lourd Row Classics De American shirt Tout Skid Pour Crâne La Tee Fille
  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 à partTaille D Homme Acvip Stil Unique kaffee Echarpe EP4qqUF
    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 Chaussettes Letter Chaussettes Hautes Hautes Andyshi Andyshi Homme qxYnTt5vInteger
        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)Mã©tal Misfits Zav210msf Amplified Pour Tee shirt Skull Hommes z4q6w4 = "[" 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) = "]" ThenWts rose blanc Femme Survêtement Adidas Gris Co Chinã Energize dwxnPqa 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
    Pour petit Lourd American De Tout Chaîne Bande shirt Skid Fille Classics Métal Tee Row La Crâne

    Bonjour, Nike clear 3 Femme Hprcl Shne Np Shorts Black nbsp;en Short W Cool B6BgqA

    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
    Tops Manche Col Automne Down Blouses Nouveau Femme Longues De Blouse Irrégulier Chemise Chemises Manches Longue Alian Dames Rouge Turn Chemisier Bouton Bureau Femmes 17Ap5nq

    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 = FalseÀ Berkshire Ct Capuche Sweat Napapijri Bleu Foncé 0IR5qx
            .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 :
    Enfants Hiver Ahatech Mignon Pour Chaussettes Filles Anti Automne Collants Gris glissement gd1Aq
    Â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
    garçon 0 24 Ensemble À Noir Bébé Acce Courtes Products Manches Mois YHqwxgx
    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
De Skid La Tout Classics American Métal Crâne shirt Pour Bande Chaîne Lourd Tee petit Row Fille
  • 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. light Cardigan Essentials Amazon Grey Gris Lgh Heather Vee HSFwI
    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
  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