Microsoft 365 Récupérer un bout de chaine (jusque l'apparition de : "-" )

J'aurai une autre question, j'aimerais récupérer la partie droite de la chaîne (ici : mot2) pour la mettre dans une cellule, j'ai tester ca mais ca ne fonctionne pas :
VB:Copier dans le presse-papier
If InStr(Cells(indextab, 11).Value, " - ") <> 0 Then
MsgBox (" - détécté")
Tableau = Split(Cells(indextab, 11).Value, " - ")
Cells(indextab, 10).Value = Split(Cells(indextab, 11).Value, " - ")
Cells(indextab, 11).Select

For i = 0 To Tableau.GetUpperBound(0)
MsgBox(Tableau(i))
Next i

End If
indextab est une variable incrémentée par une boucle for
Mais il m'indique à chaque fois, objet requis 🙁

exusez moi si c'est indiqué 2 fois 🙂

J'ai fais des modifs et ca marche, merci quand même 🙂

Pour les curieux :

If InStr(Cells(indextab, 11).Value, " - ") <> 0 Then
Cells(indextab, 11).Select
MsgBox (" - détécté")
Tableau = Split(Cells(indextab, 11).Value, " - ")
Cells(indextab, 10).Value = Split(Cells(indextab, 11).Value, " - ")
Cells(indextab, 12).Value = Tableau(UBound(Tableau))

End If

bonjour
perso je me dis que split pour split je vire instr
pourquoi tester instr pour splitter autant tester le ubound du split ca fait un code simple et plus facile a appréhender

Bonsoir Patrick,
C'est la même chose.
J'ai conservé l' Instr de Fabinou, il évite le transfert de la cellule dans le tableau en cas d'absences de " - ";
ensuite lequel est le plus rapide ....
Avec deux mots surement pas de différence, avec des chaines plus complexes, je ne saurais me prononcer.

Addon :
Just for the fun ...
Avec 28000 chaines sans " - ", sur mon PC, avec Instr : 0.253s, sans Instr : 0.316 soit 25% plus rapide avec Instr
Avec 1000 chaines avec " - ", sur mon PC, avec Instr : 0.242s, sans Instr : 0.234 soit 3% plus rapide sans Instr
Donc l'optimum va dépendre du ratio de chaîne avec et sans séparateur.🙂