Discussion :

[Runsh63]

Bonjour,

Tout est dans le titre, j'ai beau passé par l'enregistreur je n'arrive pas à faire ce que je veux (remettre un format "standard" sur une feuille Excel).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
    With Sheets("Final data")
        .UsedRange.EntireColumn.Delete
        With .Cells
            .NumberFormat = "General"
            .Borders = xlNone
            With .Font
                .Name = "Arial"
                .Size = 10
                .FontStyle = "Normal"
            End With
        End With
    End With

C'est cette ligne qui pose problème :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Borders = xlNone

Pourriez-vous me dire ce qui cloche SVP ?
Vous remerciant par avance,

[Runsh63]

Fausse alerte, j'ai fini par trouver... Il me fallait juste stimuler le petit pois qui me sert de cerveau
Bonne journée à vous toutes et tous !