Bonjour,
j'ai créé un programme dont la fonction principale est de remplir et de créer des dizaines zones sur une page... Seulement, le programme mets près de 5 secondes sur un ordinateur récent à faire sa routine, et plus de 35 secondes sur l'ordinateur sur lequel il devra tourner.
Est-il possible d'optimiser le code ?
Voici le code pour une zone qui est répété des dizaines de fois...
Code :
- ActiveDocument.Shapes.AddTextbox(msoTextOrientationHorizontal, CentimetersToPoints(0.6), CentimetersToPoints(0.8), CentimetersToPoints(5), CentimetersToPoints(0.4)).Select
- Selection.ShapeRange.TextFrame.TextRange.Select
- Selection.ShapeRange.Fill.Visible = msoFalse
- Selection.ShapeRange.TextFrame.MarginLeft = 0#
- Selection.ShapeRange.TextFrame.MarginRight = 0#
- Selection.ShapeRange.TextFrame.MarginTop = 0#
- Selection.ShapeRange.TextFrame.MarginBottom = 0#
- Selection.ShapeRange.Line.Weight = 0.75
- Selection.ShapeRange.Line.DashStyle = msoLineSolid
- Selection.ShapeRange.Line.Style = msoLineSingle
- Selection.ShapeRange.Line.Transparency = 0#
- Selection.ShapeRange.Line.Visible = msoFalse
- Selection.Collapse
- Selection.TypeText Text:=NomTextbox.Text
|
Optimisation pour une meilleure vitesse d'exécution possible ?
Merci ![:bounce: :bounce:](https://forum-images.hardware.fr/icones/smilies/bounce.gif)
Message édité par AssiuM le 11-08-2004 à 13:19:28