Microsoft 365 Vba

[Phoenixx]

Bonjour, j’ai dans une feuille, des cellules avec plusieurs lignes. Je souhaiterais intégrer dans une variable uniquement la première ligne via une macro.
J’ai lu plusieurs topics mais je ne trouve pas ce que je cherche exactement.

Quelqu’un aurait la Solution ?

Merci !

 

[Gégé-45550]

Bonjour, j’ai dans une feuille, des cellules avec plusieurs lignes. Je souhaiterais intégrer dans une variable uniquement la première ligne via une macro.
J’ai lu plusieurs topics mais je ne trouve pas ce que je cherche exactement.

Quelqu’un aurait la Solution ?

Merci !

Bonjour,
Regardez la fonction Split.
Cordialement

 

[sylvanu]

Bonjour Phoenix, Gégé,
En formule :

=GAUCHE(ChaineAnalysée;CHERCHE(CAR(10);ChaineAnalysée)-1)

en VBA :

Sub Macro1()
    ChaineAnalysée = [A1]
    Chaine1 = Left(ChaineAnalysée, Application.Search(Chr(10), ChaineAnalysée) - 1)
End Sub
ou
Sub Macro2()
    ChaineAnalysée = [A1]
    Chaine1 = Split(ChaineAnalysée, Chr(10))(0)
End Sub

 

[Phoenixx]

Au top merci !! J’utilisais Mid mais ça ne fonctionnait pas comme je voulais.
Maintenant c’est parfait !

Merci de votre aide