J'aurais besoin d'extraire des informations d'une cellule, jusque là ça n'a pas l'air trop compliqué.
Seulement voilà? ma cellule contient trop d'informations et je ne sais pas quelle formule utilisée pour n'extraire qu'une partie.
Je vous joins un extrait de mon excel qui comporte des dizaines de milliers de lignes, ou certaines cellules sont remplies à la main mais vu la taille du fichier je ne peux pas faire tout comme ça.
Function ValUnit(ByVal Z As String, ByVal U As String)
Dim TSpl() As String
On Error Resume Next
TSpl = Split(Split(Z, U)(0), " ")
ValUnit = CDbl(TSpl(UBound(TSpl)))
If Err Then ValUnit = ""
End Function
on trouve déjà pas mal de choses avec ces formules :
En B2, à propager sur 18 lignes :