Re : Figer la largeur de certaines colonnes
Salut,
Merci Job75, pour ton code, j'aurai du préciser que mon code offre la possibilité de figer la largeur d'une cellule sur deux, si tu clique sur du texte en J et L etc ... les largeurs reste figé ce qui me permet de suivre et dès que je clique à coté tout revient à 6. Peut être à tu la solution !
Merci à lik pour avoir pris le temps de lire et répondre, mais il s'agit de largeur variable de colonne
A+
Je suis nul, il me suffisait de mettre un exit sub et j'avais la réponse, voila mon code
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(ActiveCell, Range("I:AN")) Is Nothing Then Exit Sub
If ActiveCell = "" Then
Columns("I:AN").ColumnWidth = 6
Exit Sub
Else
ActiveCell.EntireColumn.AutoFit
ActiveCell.Offset(0, 1).Columns.ColumnWidth = 6
ActiveCell.Offset(0, -1).Columns.ColumnWidth = 6
End If
End Sub
Encore merci à tous, ça fait du bien de se remettre en question et grâce aux discussions sur les forums on se remémore les connaissances les plus élémentaires.