Agrandir les colonnes

Bonjour,

Je travail actuellement sur un fichier excel ou j'aimerais en une clic sur une image agrandir la largeur de mes colonnes. J'ai donc créé la macro suivante.

Columns("E:E").Select
Selection.ColumnWidth = 7.14
Columns("F:F").Select
Selection.ColumnWidth = 7.14
Columns("G:G").Select
Selection.ColumnWidth = 10
Columns("H:H").Select
Selection.ColumnWidth = 14
Columns("I:I").Select
Selection.ColumnWidth = 7.14
Columns("J:J").Select
Selection.ColumnWidth = 10
Columns("K:K").Select
Selection.ColumnWidth = 14
Columns("L:L").Select
Selection.ColumnWidth = 7.14
Columns("M:M").Select
Selection.ColumnWidth = 10
Columns("N:N").Select
Selection.ColumnWidth = 14
Columns("O:O").Select
Selection.ColumnWidth = 10
Range("C1").Select
End Sub

Lorsque je clique sur mon image les colonnes s’agrandisse mais pas comme je le souhaiterais en effet je retrouve par exemple la colonnes F a 14 de largeur alors que j'avait demandé 7,14.

Je vous remercie de votre aide.