Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
isabelle
bonjour Michel,
voici un extrait de l'aide xl2002 sur SmartTagOptions, objet
Utilisation de l'objet SmartTagOptions Utilisez la propriété SmartTagOptions de l'objet Workbook pour renvoyer un objet SmartTagOptions.
Une fois qu'un objet SmartTagOptions est renvoyé, vous pouvez utiliser les propriétés suivantes pour déterminer les options d'affichage des balises actives et si les balises actives doivent être incorporées dans le classeur actif.
EmbedSmartTags DisplaySmartTags Cet exemple montre comment activer la possibilité d'incorporer des balises actives dans le classeur actif, puis comment vérifier les paramètres d'affichage pour les balises actives.
Sub CheckDisplayOptions() 'Enable SmartTags to be embedded on the active workbook. ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True ' Check the display options for smart tags. Select Case ActiveWorkbook.SmartTagOptions.DisplaySmartTags Case xlButtonOnly MsgBox "The button for smart tags will only be displayed." Case xlDisplayNone MsgBox "Nothing will be displayed for smart tags." Case xlIndicatorAndButton MsgBox "The button and indicator will be displayed for smart tags." End Select End Sub
isabelle
Bonjour Comment supprimer l'apparition des balises en utilisant VBA ? Merci @+
bonjour Michel,
voici un extrait de l'aide xl2002 sur SmartTagOptions, objet
Utilisation de l'objet SmartTagOptions
Utilisez la propriété SmartTagOptions de l'objet Workbook pour renvoyer un objet SmartTagOptions.
Une fois qu'un objet SmartTagOptions est renvoyé, vous pouvez utiliser les propriétés suivantes pour déterminer
les options d'affichage des balises actives et si les balises actives doivent être incorporées dans le classeur actif.
EmbedSmartTags
DisplaySmartTags
Cet exemple montre comment activer la possibilité d'incorporer des balises actives dans le classeur actif, puis comment vérifier les paramètres d'affichage pour les balises actives.
Sub CheckDisplayOptions()
'Enable SmartTags to be embedded on the active workbook.
ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True
' Check the display options for smart tags.
Select Case ActiveWorkbook.SmartTagOptions.DisplaySmartTags
Case xlButtonOnly
MsgBox "The button for smart tags will only be displayed."
Case xlDisplayNone
MsgBox "Nothing will be displayed for smart tags."
Case xlIndicatorAndButton
MsgBox "The button and indicator will be displayed for smart tags."
End Select
End Sub
isabelle
Bonjour
Comment supprimer l'apparition des balises en utilisant VBA ?
Merci
@+
voici un extrait de l'aide xl2002 sur SmartTagOptions, objet
Utilisation de l'objet SmartTagOptions Utilisez la propriété SmartTagOptions de l'objet Workbook pour renvoyer un objet SmartTagOptions.
Une fois qu'un objet SmartTagOptions est renvoyé, vous pouvez utiliser les propriétés suivantes pour déterminer les options d'affichage des balises actives et si les balises actives doivent être incorporées dans le classeur actif.
EmbedSmartTags DisplaySmartTags Cet exemple montre comment activer la possibilité d'incorporer des balises actives dans le classeur actif, puis comment vérifier les paramètres d'affichage pour les balises actives.
Sub CheckDisplayOptions() 'Enable SmartTags to be embedded on the active workbook. ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True ' Check the display options for smart tags. Select Case ActiveWorkbook.SmartTagOptions.DisplaySmartTags Case xlButtonOnly MsgBox "The button for smart tags will only be displayed." Case xlDisplayNone MsgBox "Nothing will be displayed for smart tags." Case xlIndicatorAndButton MsgBox "The button and indicator will be displayed for smart tags." End Select End Sub
isabelle
Bonjour Comment supprimer l'apparition des balises en utilisant VBA ? Merci @+
