Probléme avec Excel 2010

Bonjour,

J'utilise la méthode RIGHT comme suit:

Dim Nombre As Integer

NUMHEPTA = Heptagone 1552

dans mon programme NUMHEPTA prend différentes valeurs entre 1000 et 5000 mais garde toujours comme entête : Heptagone.

Nombre = Right(NUMHEPTA, 4)

Mon problème vient du fait que dans mon entreprise cela ne fonctionne pas sur tous les PC.
Sur certain pc il y a un message d'incompatibilité ????

Comment alors remplacer la méthode RIGHT par autre chose qui marche sur tous les pc?

Rebonjour,

Je précise que je travaille sous Windows 10 et sous 32 bits

Merci par avance de vos réponses

Citation:

---

Envoyé par baltazar007

Rebonjour,

Je précise que je travaille sous Windows 10 et sous 32 bits

Merci par avance de vos réponses

---

Re re bonjour,

Les autres ordinateurs sont également sous Windows 10, 32 bits , Excel 2010...

Salut

Integer fonctionne pour des nombres entiers compris entre -32768 et +32767. Peut-être la variable sort elle de cette fourchette pendant le traitement du code ?
Tu peux également avoir le cas où la valeur à partir de laquelle tu appliques right est en erreur ou non initialisée.

Enfin et surtout ton code laisse entendre que tu veux enregistrer la valeur "Heptagone 1552" dans ta variable "NUMHEPTA". Dans ce cas il te faut impérativement modifier ta ligne de code pour y ajouter des guillemets doubles. Seules les valeurs nombres se traitent sans les guillemets

Code:

---

1 2 3 4 5 6 7

Dim NUMHEPTA as string Dim Nombre as Integer NUMHEPTA = "Heptagone 1552" Nombre = Right(NUMHEPTA, 4) msgbox Nombre

---

Bonjour,

Essaie avec "VBA.Right" au lieu de simplement "Right".
J'ai déjà eu le souci avec certains PC qui n'aiment pas quand "VBA." est implicite alors qu'ils sont censés avoir exactement la même installation. Je ne sais en expliquer la raison.

Applique aussi ce principe pour toutes les fonctions issues de cette bibliothèque (Len, Left, Mid, InStr, etc).

Option base en début de code demande ensuite d'inclure vba. en certains endroits. Sans option base je n'ai jamais eu à ajouter vba.

Option base permet de démarrer les tableaux mémoire à 1 et pas 0.

Le problème que j'ai rencontré (sur deux parcs de PC différents) se produisait sur certains PC et pas sur d'autres avec le même fichier; ça ne pouvait donc pas être lié uniquement à l'option Base (mais je ne dis pas que ce n'est pas du tout lié).

Bonsoir

Si tous les paramètres se présentent sous cette forme, alors la fonction Split pourrait être utilisée.
Ceci avec pour séparateur l'espace(" ")

Ici

Code:

---

1 2 3

Dim Varnum as Long   Varnum = Split(lexpressionàscinder," ")(1) + 0

---

Ici, l'array résultat a pour 1er indice 0

Personnellement, j'ajoute 0 par prudence afin d'obtenir de façon certaine une valeur numérique.

D'autre part, pour rebondir sur ce qui précède, j'en suis revenu de l'

Code:

---

Option Base 1

---

qui peut amener à de mauvaises surprises.
Je préfère de loin, en ce qui concerne par exemple les tableaux, considérer le 1er indice par la propriété

Code:

---

Lbound

---