Vieux fichiers Excel

Question

Bonjour,

Je suis ennuy&#233; avec un fichier qui avait &#233;t&#233; r&#233;alis&#233; avec excel95 et qui ne fonctionne plus avec les versions de excel actuel.
Je ne connais absolument pas visual basic.
En gros voici la ligne sur laquelle le fichier plante. Message d'erreur "impossible de lire la propri&#233;t&#233; DrawingObjects de la classe dialogsheet"

Sheets("entr&#233;es").DrawingObjects("Modification 22").Select

Merci de m'aider et bonne soir&#233;e.

Ptigars67.

michelxld · Answer

bonsoir

sans garantie , tu pourrais tester

Sheets("entr&#233;es").shapes("Modification 22").Select

bonne soir&#233;e
michel

cs_ptigars67 · Answer

Bonjour Michel et merci pour ta r&#233;ponse.
Malheureusement j'ai maintenant un autre message d'erreur.

Erreur d'ex&#233;cution '-2147024809 (80070057)'
L'&#233;l&#233;ment portant ce nom est introuvable

C'est grave docteur?

Bonne soir&#233;e.

michelxld · Answer

rebonjour


tu peux essayer de retouver l'index de l'objet et ensuite l'utiliser dans la macro


par exemple :


Sheets("entr&#233;es").shapes(5).Select

pour retrouver l'index tu peux tester une procedure de ce type

Dim Obj As Shape
Dim i As Integer


For Each Obj In Worksheets("Feuil1").Shapes
i = i + 1
MsgBox Obj.Name & vbLf & "Index : " & i
Next

bonne journ&#233;e
michel

cs_ptigars67 · Answer

Bonjour Michel,

J'ai fais tourné ta macro mais je ne comprends pas le but de la manip.
Je ne vois pas par exemple l'index de "modification22"?!?
Autre question, est ce que "Sheets("entrées").Activate" est censé créer une feuille nommée "entrées", si oui elle n'apparaît pas ?!?
Essaye peut être de répondre à cette dernière question et ensuite je m'achète visual basic pour un super nul ;)

Merci de ton aide.
Bonne journée.
ptigars.

michelxld · Answer

bonsoir

Sheets("entr&#233;es").Activate permet d'activer la feuille nomm&#233;e "entr&#233;es"

tu es sur d'avoir un objet nomm&#233; "Modification 22" dans ta feuille ?

bonne soiree
michel

cs_ptigars67 · Answer

Bonjour Michel,
Je ne suis sûr de rien! Je crois que je vais laisser tomber...
En tout cas, merci pour ton aide.

A+
Ptigars.

Vieux fichiers Excel

6 réponses

Discussions similaires