pb drawingobjects

[Michel]

bonjour je suis confronté a un pb depuis le passage d'un pg excel 95 vers 2000 :sick:

ON envoi les valeurs existantes dans la boite de dialogue
'
For n°_Ligne = premier To dernier Step 1
Cells(n°_Ligne, n°_colonne).Select
Let valeur_cellule = ActiveCell

A_x = 'A_' & n°_Ligne - 10 - 15 * (numéro - 1)

dlg.DrawingObjects(A_x).Strings = valeur_cellule Plantage a ce niveau
Next

n°_colonne = 5

'

 

[Abel]

Bonjour Michel,

Essaie en remplaçant 'Strings' par 'text'.

Abel.

 

[Abel]

Re,

Ben t'es encore là toi !
Wouarf !

Bonjour José.

Tu as raison. L'idéal serait de reprendre le code avec la 'nouvelle' syntaxe.

Ceci dit, je pense que le projet de Michel doit contenir des feuilles de dialogue (dialogsheet) d'où boulot pas négligeable en perspective.

J'ai eu le souci soulevé par Michel en passant d'Excel5 à 97.
J'ai eu aussi des problèmes de '+' qui se transformaient en '&' ou l'inverse, je ne sais plus. C'est aussi un truc à surveiller lors du Grand Saut.

Bon courage Michel.


Abel.

Message édité par: Abel, à: 17/06/2005 17:05