Discussion :

[fllyann]

Bonjour tous

comme on peut s'en doutter j'ai quelques soucies avec VB
(je suis débutant en VB)

Partie du porjet :

sur la colonne A
tester les cellules si il y a du texte ou non.
si non alors tester la cellule au dessus ou en dessous ( j'ai pas encore choisi)
puis si il y a du texte : recherche une partie d'un texte précise ( en rouge )
écrire ce texte dans une autre feuille colonne A aussi mais les un après les autres


voici l'un de mes problèmes :

truc inutile---/1. nom_projet/truc_inutile

la taille du nom_projet n'est pas défini je sais juste que je dois prendre à partir de "l'espace" jusqu'au "/"

Si vous pouvez me mettre sur la voie je suis preneur !
Pour le reste de mes problème je devrais réussir mais celui ci m'empoisonne la vie...

[helas]

Bonjour,
voir les instruction Instr et Mid$
cela pourrait se traduire par

Code :

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

1
2
3
4
 
n1 = Instr( chaine , " ")  'position de l'espace
n2=instr( chaine , "/")  'position du /
retour = Mid$( chaine, n1, n2-n1 -1)

[Michel_M]

Bonjour,

une autre manière

Code :

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

1
2
3
4
Function extraire_partiel(texto As String) As String
    separe = Split(texto, "/")
    extraire_partiel = Right(separe(1), Len(separe(1)) - InStr(separe(1), " "))
End Function

par exmple :

Code :

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

1
2
3
sub test
tavariable=extrairepartiel(range("A2"))
end sub

[fllyann]

Merci helas & Michel_M

je viens de tester la dernière qui fonctionne correctement et je garder l'idée de solution de helas au cas ou qui fonctionne aussi très bien !

merci à vous deux !

pendant que je suis ici, il manque un "_" dans le sub test de Michel