Interdire ' dans colonne C D E

[franck17]

Bonsoir tout le monde

Comment faire pour interdire la saisie d'une apostrophe dans les colonnes C D E.

MERCI pour votre aide.

 

[myDearFriend!]

Re : Interdire ' dans colonne C D E

Bonsoir franck17,

Tu peux peut-être essayer quelque chose comme ça :

[SIZE=2][COLOR=GRAY][B][I]DANS LE MODULE DE CODE DE LA FEUILLE[/I][/B][/COLOR]

[COLOR=NAVY]Private Sub[/COLOR] Worksheet_Change([COLOR=NAVY]ByVal[/COLOR] Target [COLOR=NAVY]As[/COLOR] Range)
    [COLOR=NAVY]If Not[/COLOR] Application.Intersect(Target, Range("C:E")) [COLOR=NAVY]Is Nothing Then[/COLOR]
        Target.Replace What:="'", Replacement:=" "
    [COLOR=NAVY]End If
End Sub[/COLOR][/SIZE]

Cordialement,

 

[franck17]

Re : Interdire ' dans colonne C D E

Bonsoir Didier

Merci pour ton aide impeccable.

Bonne fin de soirée ou bonne nuit