Titre de colonne CSV avec un"é" transformé en "é"

Bonjour,

Quand j'ouvre un fichier csv issue d'un export, j'ai tous les "é" et les "' ' " qui deviennent des "é" et " ’ " respectivement.

Pourquoi cela se produit et comment éviter cela?

Cordialement

Agrimaman

Bonjour

Tu l'ouvres comment ?

Un CSV ne s'ouvre pas, il s'importe

Bonjour,

Il s'agit d'un problème d'encodage, c'est à dire qu'il faut bien "expliquer" dans quel "langage" est enregistré le fichier pour pouvoir le lire correctement.

Je vous invite à consulter ce lien. En cas de souci, vous pouvez aussi rectifier le problème en mode "bourrin", en utilisant le menu "Rechercher & Remplacer".

Bonjour,

Pedro22 j'ai fait la méthode "bourrin".

Le csv est exporté à partir d'un question et quand je dis ouvrir c'est double clique dessus.

Agrimaman

Bonjour à tous,

Avez-vous essayé de passer par Power Query pour importer vos données ?

Bonjour

Outre le temps perdu, il ne faudra pas s'étonner s'il subsiste des erreurs...

Bonjour à tous

Hier j'ai rencontré le même problème et j'ai trouvé une solution sur Internet qui fonctionnait alors je la partage

Function ReadUTF8CSVToSheet(file As String)
    Dim ws As Worksheet
    Dim strText As String

    ' read utf-8 file to strText variable
   With CreateObject("ADODB.Stream")
        .Open
        .Type = 1  ' Private Const adTypeBinary = 1
        .LoadFromFile file
        .Type = 2  ' Private Const adTypeText = 2
        .Charset = "utf-8"
        strText = .ReadText(-1)  ' Private Const adReadAll = -1
    End With

    ' parse strText data to a sheet
    Set ws = Sheets.Add()
    intRow = 1
    For Each strLine In Split(strText, Chr(10))
        If strLine <> "" Then
            With ws
                .Cells(intRow, 1) = strLine
                .Cells(intRow, 1).TextToColumns Destination:=Cells(intRow, 1), DataType:=xlDelimited, _
                    TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
                    Semicolon:=False, Comma:=True, Space:=False, Other:=False
            End With

            intRow = intRow + 1
        End If
    Next strLine

    ReadUTF8CSVToSheet = ws.Name

End Function

Typiquement importer le fichier par l'onglet données, sans utiliser de code est bien plus efficace et rapide à mon avis.

Je me joins aux commentaires précédents, pourquoi réinventer la roue quand l'importation de fichiers textes existe déjà dans Excel ?

Typiquement importer le fichier par l'onglet données, sans utiliser de code est bien plus efficace et rapide à mon avis.

Bonjour,

Merci pour vos retours.

Importer le csv par l'onglet données ok c'est noté.

Merci