[Excel] compatibilité Excel 2002 et 97

Bonjour,

j'ai créé une macro sous Excel 2002 et je dois l'adapter pour un poste ayant Excel 97.

Une première tentative de compilation sur le poste destinataire m'a donné les erreurs suivantes :

Code:

---

ThisWorkbook.Sheets("suivi").Range("F" & indI).Value = Format(Now, "mm/dd/yyyy hh:mm ")

---

Je pense que la méthode "Format" n'existe pas dans Excel 97. En faisant des recherches, la méthode DateSerial() est proposé pour formater la date, mais je ne sais pas comment obtenir la date du jour.

Code:

---

Mid(ActiveSheet.Range("B" & ligne).Value, 1, 3)

---

J'ai une erreur sur la méthode Mid(). Pourtant l'aide en ligne proposait un code pour Excel 4.0 utilisant cette méthode. Je vais réessayer avec cette méthode quand j'aurai à nouveau accès au poste Excel 97.

Code:

---

UCase(ThisWorkbook.Sheets("Feuil1").Cells(2, IndC).Value)

---

Je cherche un équivalent à la méthode UCase, ou la solution pour la faire fonctionner ^^

Code:

---

1 2 3 4 5 6 7 8

Sub help() ' 'bouton d'appel du fichier d'aide ' ActiveSheet.Shapes("Object 96").Select Selection.Verb End Sub

---

J'ai un bout de code permettant d'appeler un objet. Cet objet est un fichier word (je n'ai pas utilisé la librairie word pour diverses raisons).

Si vous savez comment contourner ces problème ou les résoudres, je suis preneur.

Merci,
Aethis

Format, Mid et UCase existent bien sous Excel 97.

Ton problème vient d'une librairie manquante.
Vérifie dans les Références (sous 97) s'il y en a une marquée Manquante.
Désactive-la et remplace la par celle de la version 97 (Pour 97, la version est 8.00).

Pour ton info, Format, Mid et UCase sont des fonctions et pas des méthodes.

Merci. Effectivement, j'avais activé une librairie word qui n'était pas présente sur le poste Excel 97 (je pensais que les références étaient spécifiques à chaque poste et non à chaque fichier...).

ça me résoud les problèmes de Mid, Format et UCase (qui sont donc des fonctions ;))

Il me reste donc le problème sur mon objet (erreur d'exécution "1004" : la méthode Verb de la classe OLEObjet à échoué). Et je ne comprend pas car si j'essaie de créer une macro avec l'outil automatique, il me génère un code 100% identique. Bref, je suis dans le flou.

bonjour

Tu peux tester

Code:

---

ActiveSheet.OLEObjects("objet 96").Verb

---

michel

J'ai testé avec

Code:

---

ActiveSheet.OLEObjects("objet 96").Verb

---

j'obtiens une erreur :

Citation:

---

erreur d'exécution '438'.
propriété ou méthode non gérée par cet objet.

---

Merci de votre aide en tout cas.

Aethis

OOupps...

J'avais oublié le C: à retester

Code:

---

ActiveSheet.OLEObjects("object 96").Verb

---

michel

j'ai fait un copier coller de ta réponse pour ma réponse mais le code contenais bien le C donc j'en suis bien au point plus haut :

Citation:

---

J'ai testé avec

Code:

---

ActiveSheet.OLEObjects("object 96").Verb

---

j'obtiens une erreur :

Citation:

---

erreur d'exécution '438'.
propriété ou méthode non gérée par cet objet.

---

Merci de votre aide en tout cas.

Aethis

---