Bonjour,
apparemment avec 2013 (ne me demande pas pourquoi :?), il faut une valeur plus grande que 0, essaie :

If CommandBars("ribbon").Height > 100 Then
CommandBars.ExecuteMso...