Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Worksheet_SelectionChange

D

Delcourt

Guest
Bonjour

Ma macro événementielle :

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target = Range("b1") Then
MsgBox ("OK")
End If
End Sub
----------------------------------------------------------------------------------------
Type incompatible (erreur 13)
-----------------------------------------------------------------------------------------
Ce message apparaît parce que la cellule b1 est fusionnée avec c1.
Quelle bonne âme me donnera le moyen de l'éviter?

MERCI
 
R

Robert

Guest
Salut Delcourt, Salut le forum,

Il y a la solution de défusionner C11, puis de sélectionner à nouveau C11 et...
Menu Format / Cellule, onglet "Alignement", champ "Horizontal", sélectionner l'option "Centré sur plusieurs colonnes".

Visuellement c'est le même effet que la fusion sans ses inconvénients.

À plus,

Robert
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…