Formater les différents retours à la ligne : LF (LineFeed) et CR (CarriageReturn)


Contenu du snippet

Function FormatLF(ByVal sData As String) As String
    'contient des vbcrlf  (13&10) ou vbcr(13) ou vblf(10)
    If InStr(1, sData, vbCrLf) Then
        FormatLF = Replace(sData, vbCrLf,  vbLf)
    ElseIf InStr(1, sData, vbCr) Then
        FormatLF = Replace(sData, vbCr, vbLf)
    Else
        FormatLF = sData
    End If
End Function

Compatibilité : VB6, VBA

Disponible dans d'autres langages :

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.