Discussion :

[Mist-e-Fire]

Bonjour,

Je cherche à définir la valeur d'un caractère d'un string à une position définie, mais variable.
Un élément simplifie les choses: cette position est située systématiquement après la suite "(R" dans le string.

Pour commencer, j'ai tenté d'utiliser "SEARCH" qui me donne la position de la parenthèse dans le string.

Il me suffit d'ajouter 2 et j'obtiens la position de mon caractère dans le string.

Et la je ne trouve pas de fonction qui renvoie la valeur du caractère à cette position.
Quelle est cette fonction (si elle existe?)


Merci!

[gFZT82]

Bonjour,

Regarde du coté de la fonction =STXT()

Cordialement.

[Mist-e-Fire]

Bonjour

Merci de la réponse rapide.

Si j'ai bien vu, son équivalent anglais c'est MID.

Merci, ça a l'air de bien fonctionner!

[Mist-e-Fire]

Bonjour,

En fait, non, ça ne marche pas du tout
Ca marche bien quand je rentre la fonction dans la worksheet, mais dés que je passe en macro, je reçois messages d'erreur sur messages d'erreur.

Etant, novice, je ne m'en sors pas

Qu'y a-t-il de mauvais dans ce code?
(l'array Vpnj est déclaré integer en public et je m'en sers pour définir les positions variables)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub Search()
    Dim Rsearch As Integer
    Rsearch = Search("(R", Cells(Vpnj(6, 4), 1), 1) ' chercher (R sur la cell de row variable dans la colonne 1
    Vpnj(4, 3) = Mid(Cells(Vpnj(6, 4), 1), Rsea + 2, 1) ' prendre la valeur juste après le (R de cette même cellule
    Cells(1, 1) = Vpnj(4, 3) 'afficher dans la première case la valeur de ce caractère
 
End Sub

[enernaej]

Bonjour,

Il semble qu'il y ait une petite coquille

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    Vpnj(4, 3) = Mid(Cells(Vpnj(6, 4), 1), Rsea + 2, 1) ' prendre la valeur juste après le (R de cette même cellule

ne serait-il pas plutôt ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

   Vpnj(4, 3) = Mid(Cells(Vpnj(6, 4), 1), Rsearch + 2, 1) ' prendre la valeur juste après le (R de cette même cellule

[Mist-e-Fire]

Exact, mais en fait, c'est la ligne avec la fonction search qui bloque, le programme n'est pas encore arrivé à la ligne suivante.

le message d'erreur que je reçois est "wrong number of arguments or invalid property asignement" (avec le "search" surligné)