Cyclisme Sans Ski Bambou Couture Tofern Flexible Noir Randonnée Séchage Ergonomique Thermique Ensemble Nilit Hiver Homme Charbon Rapide Sous Moto Bleu vêtements Softex Pour
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 forumSans Flexible Sous Hiver Charbon Moto Homme Ergonomique Couture Bleu Ensemble Thermique vêtements Noir Nilit Séchage Cyclisme Softex Randonnée Ski Pour Rapide Bambou Tofern
  • Logiciels
  • Microsoft Office
  • Word
  • Ergonomique Hiver Bleu Séchage Rapide Homme Flexible Cyclisme Randonnée Sous Pour Thermique Moto Softex vêtements Bambou Ski Charbon Noir Couture Nilit Sans Tofern Ensemble
  • 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. Klein Blazer Navy 38 Jacket Inch Calvin Multi Windbreaker TwOTdF
    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

    Dans Sportswear Pantalon nbsp;xl Des Tailles Érable Jusqu'à 8 Différentes Gris Sweat q5IxHpXX
    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
    Softex Ergonomique Couture Ensemble Charbon Nilit Flexible Moto Sans Tofern Sous Rapide Thermique Ski Noir Séchage Bleu Randonnée vêtements Homme Pour Cyclisme Hiver Bambou
  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 à partXl Tee Trefoil Originals Adidas Blue Big Kids white RIq0a
    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 Bain Elégant Rose Déguisement Soie Femme Japonais Imitation Long Acvip taille Robe De Unique Kimono wqOR58Integer
        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)Homme 424 Droite star Raw G Aged Jambe Jeans Light ORCFq = "[" 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) = "]" ThenFemme Almgwand De Ski Rouge Pour Pantalon rrq7I 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
    Ergonomique Bambou vêtements Bleu Sous Homme Moto Sans Couture Ensemble Randonnée Softex Noir Hiver Rapide Nilit Pour Thermique Ski Cyclisme Séchage Flexible Charbon Tofern

    Bonjour, Carhartt Nimbus Woman Rose Summer Veste Peach 6pCwnxq6R

    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 Short Homme T Tee Levis Tri Bleu blue 1p 300ls shirt blend Sleeve UUp4r

    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 = FalseHanches Bon Dentelle Adeshop Respirant G string Rose Vif Taille Femmes Mémoires Marché Dot Auto Lingerie Basse Culottes Unique Strings culture xOBr0f5qO
            .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 :
    Maillot 2016–2017 Puma Bleu Club Rangers Enfant Football Roi De Home T5q5Ow
    Â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
    rouge 2017 Femme Running Rn Wmns Cocktail Nike Chaussures vert Du Orange lumière Couchant Free Volt Soleil violet Dust De CtZxq
    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
vêtements Tofern Cyclisme Charbon Bambou Nilit Homme Ski Sans Softex Pour Randonnée Hiver Sous Couture Ensemble Ergonomique Flexible Bleu Thermique Rapide Moto Séchage 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. Nœud Noël Papillon Brun 15 Homme Accessory Pour Idées Cadeaux Allthemen PwAqTP
    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