Bonsoir Marcello
J'ai vu que tu t'étais trompé de Forum, mais ça arrive, pas grave
Sinon voilà un code :
Sub WhereIsActiveCellColumn()
Dim ActiveCellColumn As Integer
ActiveCellColumn = ActiveCell.Column
If ActiveCellColumn = 8 Then
MsgBox 'on est bien en colonne ''H'''
End If
End Sub
Bonne Soirée
@+Thierry