Je voudrais qu'un message apparaisse lorsque l'utilisateur sélectionne une cellule différente des cellules prévues. If ActiveCell.Address(0, 0 <> Range("f7") or ActiveCell.Address(0, 0 <> Range("h7") Then... Ne fonctionne pas !

Tu ne peux pas utiliser <> pour des objets, tu peux l'utiliser pour des textes (par ex pour l'adresse des plages)
Address est un texte, Range ou ActiveCell est un objet pour les objets, utilise: soit
If ActiveCell.Address<> Range("f7").Address and ActiveCell.Address<> Range("h7").Address Then...
soit
If Not ActiveCell. Is Range("f7") and Not ActiveCell Is Range("h7") Then
attention aussi au Or / And : si tu donnes comme condition If ActiveCell.Address<> Range("f7").Address Or _ ActiveCell.Address<>Range("h7").Address Then
la condition sera TOUJOURS remplie puisque la cellule active n'a pas don d'ubiquité et ne peut pas être à la fois en F7 et en H7. Si tu veux que la condition soit remplie si activecell n'est ni sur F7 ni sur h7 tu dois dire AND.
tu aurais aussi pu dire :
If Not(ActiveCell.Address= Range("f7").Address Or ActiveCell.Address= Range("h7").Address) Then...