Discussion :

[Bubale]

Bonjour à tous!
Pourquoi le code suivant ne fonctionne-t-il pas?
Dans la case H4 de la page option, il y a le texte suivant par exemple "$F$6" et moi je veux récupérer dans la variable nolign la valeur 6 ...qui est suceptible de changer!
Merci d'avance.

Code :

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

1
2
Dim nolign As Integer
nolign = Mid(Sheets("options").Range("H4").Value, 3)

[cafeine]

Hello,

a priori ça devrait marcher :

Code :

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

MsgBox Mid(Sheets("options").Range("H4").Value, 4)

[fring]

Bonjour,

$F$6
1234

donc Mid(Sheets("options").Range("H4").Value, 3) = $6

Mid(Chaîne, point de départ, nombre de caractères)
Si le paramètre "nombre de caractères" n'est pas spécifié, tous les caractères seront pris à partir du "point de départ"

Exemple :

Code :

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

Mid("Exemple", 4, 1)

renverra la valeur "m"

Code :

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

Mid("Exemple", 4)

renverra la valeur "mple"

[Bubale]

Ok merci à tous les deux!
J'avais encore un peu de mal avec cette fonction, mais maintenant, c'est bon!
Bonne journée et encore merci!