Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
heureux-oli
Salut,
C'est pas lié à Word mais au logiciel OCR que tu utilises.
-- -- Heureux-oli Si rien n'est mentionné pour le code, c'est que j'en suis l'auteur. http://heureuxoli.developpez.com/ http://word.developpez.com/ http://marie-lebeau.heaj.be/
"J.L." a écrit dans le message de news: Zu5vn.166750$
Bonjour,
Voici mon problème :
Lorsque je numérise un document, ça crée automatiquement des zones de texte quand j'arrive dans Word pour travailler dans mon fichier.
Est-il possible d'éviter les zones de texte et d'avoir seulement et simplement les paragraphes?
Merci! Word 2007
Salut,
C'est pas lié à Word mais au logiciel OCR que tu utilises.
--
--
Heureux-oli
Si rien n'est mentionné pour le code, c'est que j'en suis l'auteur.
http://heureuxoli.developpez.com/
http://word.developpez.com/
http://marie-lebeau.heaj.be/
"J.L." <j.lac@live.ca> a écrit dans le message de news:
Zu5vn.166750$2r7.105587@newsfe05.iad...
Bonjour,
Voici mon problème :
Lorsque je numérise un document, ça crée automatiquement des zones de
texte quand j'arrive dans Word pour travailler dans mon fichier.
Est-il possible d'éviter les zones de texte et d'avoir seulement et
simplement les paragraphes?
C'est pas lié à Word mais au logiciel OCR que tu utilises.
-- -- Heureux-oli Si rien n'est mentionné pour le code, c'est que j'en suis l'auteur. http://heureuxoli.developpez.com/ http://word.developpez.com/ http://marie-lebeau.heaj.be/
"J.L." a écrit dans le message de news: Zu5vn.166750$
Bonjour,
Voici mon problème :
Lorsque je numérise un document, ça crée automatiquement des zones de texte quand j'arrive dans Word pour travailler dans mon fichier.
Est-il possible d'éviter les zones de texte et d'avoir seulement et simplement les paragraphes?
Merci! Word 2007
Circé
Bonsoir,
Y a bien cette petite macro signée Geo qui pourrait t'aider : http://faqword.com/index.php/wfaq/mise-en-forme/210
Circé http://faqword.com
J.L. a formulé la demande :
Bonjour,
Voici mon problème :
Lorsque je numérise un document, ça crée automatiquement des zones de texte quand j'arrive dans Word pour travailler dans mon fichier.
Est-il possible d'éviter les zones de texte et d'avoir seulement et simplement les paragraphes?
Merci! Word 2007
Bonsoir,
Y a bien cette petite macro signée Geo qui pourrait t'aider :
http://faqword.com/index.php/wfaq/mise-en-forme/210
Circé
http://faqword.com
J.L. a formulé la demande :
Bonjour,
Voici mon problème :
Lorsque je numérise un document, ça crée automatiquement des zones de texte
quand j'arrive dans Word pour travailler dans mon fichier.
Est-il possible d'éviter les zones de texte et d'avoir seulement et
simplement les paragraphes?
Comme j'ai deux zones de texte., la macrocommande n'a gardé que le contenu de la première, et a effacée la deuxième. C'est très embêtant puisque j'ai besoin des deux.
Y-a-t-il d'autres solutions?
Le 2010-04-08 12:44, Geo a écrit :
Bonjour
J'ai essayé la macrocommande, mais celle-ci ne fonctionne pas. Elle indique erreur de compilation sur la ligne Selection.
Comme j'ai deux zones de texte., la macrocommande n'a gardé que le
contenu de la première, et a effacée la deuxième. C'est très embêtant
puisque j'ai besoin des deux.
Y-a-t-il d'autres solutions?
Le 2010-04-08 12:44, Geo a écrit :
Bonjour
J'ai essayé la macrocommande, mais celle-ci ne fonctionne pas. Elle
indique erreur de compilation sur la ligne Selection.
Comme j'ai deux zones de texte., la macrocommande n'a gardé que le contenu de la première, et a effacée la deuxième. C'est très embêtant puisque j'ai besoin des deux.
Y-a-t-il d'autres solutions?
Le 2010-04-08 12:44, Geo a écrit :
Bonjour
J'ai essayé la macrocommande, mais celle-ci ne fonctionne pas. Elle indique erreur de compilation sur la ligne Selection.
Comme j'ai deux zones de texte., la macrocommande n'a gardé que le contenu de la première, et a effacée la deuxième. C'est très embêtant puisque j'ai besoin des deux.
Je regarderai ce qui ne colle pas, mais si vous n'avez que deux zones un simple copier / coller devrait faire l'affaire.
-- A+
Bonjour
Comme j'ai deux zones de texte., la macrocommande n'a gardé que le contenu de la
première, et a effacée la deuxième. C'est très embêtant puisque j'ai besoin des deux.
Je regarderai ce qui ne colle pas, mais si vous n'avez que deux zones
un simple copier / coller devrait faire l'affaire.
Comme j'ai deux zones de texte., la macrocommande n'a gardé que le contenu de la première, et a effacée la deuxième. C'est très embêtant puisque j'ai besoin des deux.
Je regarderai ce qui ne colle pas, mais si vous n'avez que deux zones un simple copier / coller devrait faire l'affaire.
-- A+
Geo
Re
[ Cette réponse est faite sur le forum public Word : news://msnews.microsoft.com/microsoft.public.fr.word ]
Essayez ceci : Public Sub SupprimeBoiteTexte() Dim Boite As Shape Dim NbZones As Integer Dim Texte As String Dim i As Integer NbZones = ActiveDocument.Shapes.Count For i = NbZones To 1 Step -1 Set Boite = ActiveDocument.Shapes(i) Texte = Boite.TextFrame.TextRange.Text Boite.Select Boite.Delete Selection.InsertAfter Texte Next End Sub
Testé avec 3 zones de texte. Vos zones ne sont pas imbriquées l'une dans l'autre ? Si ça ne marche pas, pouvez-vous mettre un exemple sur www.cjoint.com ? Ou si c'est gênant que le document soit public, je vous donnerai une adresse électronique.
-- A+
Re
[ Cette réponse est faite sur le forum public Word :
news://msnews.microsoft.com/microsoft.public.fr.word ]
Essayez ceci :
Public Sub SupprimeBoiteTexte()
Dim Boite As Shape
Dim NbZones As Integer
Dim Texte As String
Dim i As Integer
NbZones = ActiveDocument.Shapes.Count
For i = NbZones To 1 Step -1
Set Boite = ActiveDocument.Shapes(i)
Texte = Boite.TextFrame.TextRange.Text
Boite.Select
Boite.Delete
Selection.InsertAfter Texte
Next
End Sub
Testé avec 3 zones de texte.
Vos zones ne sont pas imbriquées l'une dans l'autre ?
Si ça ne marche pas, pouvez-vous mettre un exemple sur www.cjoint.com ?
Ou si c'est gênant que le document soit public, je vous donnerai une
adresse électronique.
[ Cette réponse est faite sur le forum public Word : news://msnews.microsoft.com/microsoft.public.fr.word ]
Essayez ceci : Public Sub SupprimeBoiteTexte() Dim Boite As Shape Dim NbZones As Integer Dim Texte As String Dim i As Integer NbZones = ActiveDocument.Shapes.Count For i = NbZones To 1 Step -1 Set Boite = ActiveDocument.Shapes(i) Texte = Boite.TextFrame.TextRange.Text Boite.Select Boite.Delete Selection.InsertAfter Texte Next End Sub
Testé avec 3 zones de texte. Vos zones ne sont pas imbriquées l'une dans l'autre ? Si ça ne marche pas, pouvez-vous mettre un exemple sur www.cjoint.com ? Ou si c'est gênant que le document soit public, je vous donnerai une adresse électronique.
-- A+
J.L.
Merci beaucoup!
Ça fonctionne très bien! Je vais pouvoir sauver beaucoup de temps de manipulation.
Le 2010-04-08 16:03, Geo a écrit :
Re
[ Cette réponse est faite sur le forum public Word : news://msnews.microsoft.com/microsoft.public.fr.word ]
Essayez ceci : Public Sub SupprimeBoiteTexte() Dim Boite As Shape Dim NbZones As Integer Dim Texte As String Dim i As Integer NbZones = ActiveDocument.Shapes.Count For i = NbZones To 1 Step -1 Set Boite = ActiveDocument.Shapes(i) Texte = Boite.TextFrame.TextRange.Text Boite.Select Boite.Delete Selection.InsertAfter Texte Next End Sub
Testé avec 3 zones de texte. Vos zones ne sont pas imbriquées l'une dans l'autre ? Si ça ne marche pas, pouvez-vous mettre un exemple sur www.cjoint.com ? Ou si c'est gênant que le document soit public, je vous donnerai une adresse électronique.
Merci beaucoup!
Ça fonctionne très bien! Je vais pouvoir sauver beaucoup de temps de
manipulation.
Le 2010-04-08 16:03, Geo a écrit :
Re
[ Cette réponse est faite sur le forum public Word :
news://msnews.microsoft.com/microsoft.public.fr.word ]
Essayez ceci :
Public Sub SupprimeBoiteTexte()
Dim Boite As Shape
Dim NbZones As Integer
Dim Texte As String
Dim i As Integer
NbZones = ActiveDocument.Shapes.Count
For i = NbZones To 1 Step -1
Set Boite = ActiveDocument.Shapes(i)
Texte = Boite.TextFrame.TextRange.Text
Boite.Select
Boite.Delete
Selection.InsertAfter Texte
Next
End Sub
Testé avec 3 zones de texte.
Vos zones ne sont pas imbriquées l'une dans l'autre ?
Si ça ne marche pas, pouvez-vous mettre un exemple sur www.cjoint.com ?
Ou si c'est gênant que le document soit public, je vous donnerai une
adresse électronique.
Ça fonctionne très bien! Je vais pouvoir sauver beaucoup de temps de manipulation.
Le 2010-04-08 16:03, Geo a écrit :
Re
[ Cette réponse est faite sur le forum public Word : news://msnews.microsoft.com/microsoft.public.fr.word ]
Essayez ceci : Public Sub SupprimeBoiteTexte() Dim Boite As Shape Dim NbZones As Integer Dim Texte As String Dim i As Integer NbZones = ActiveDocument.Shapes.Count For i = NbZones To 1 Step -1 Set Boite = ActiveDocument.Shapes(i) Texte = Boite.TextFrame.TextRange.Text Boite.Select Boite.Delete Selection.InsertAfter Texte Next End Sub
Testé avec 3 zones de texte. Vos zones ne sont pas imbriquées l'une dans l'autre ? Si ça ne marche pas, pouvez-vous mettre un exemple sur www.cjoint.com ? Ou si c'est gênant que le document soit public, je vous donnerai une adresse électronique.
Geo
Bonjour
[ Cette réponse est faite sur le forum public Word : news://msnews.microsoft.com/microsoft.public.fr.word ] Merci beaucoup!
Ça fonctionne très bien! Je vais pouvoir sauver beaucoup de temps de manipulation.
merci pour le retour. Bon courage.
-- A+
Bonjour
[ Cette réponse est faite sur le forum public Word :
news://msnews.microsoft.com/microsoft.public.fr.word ]
Merci beaucoup!
Ça fonctionne très bien! Je vais pouvoir sauver beaucoup de temps de manipulation.