Classe Phonetic (Excel VBA)

Cet objet contient des informations sur une chaîne de texte phonétique spécifique dans une cellule.

Les procédures principales de la classe Phonetic sont Phonetics.Add et Phonetics.Delete

Set

Pour utiliser une variable de classe Phonetic, elle doit d'abord être instanciée, par exemple

Dim phn as Phonetic
Set phn = ActiveCell.Phonetic

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Phonetic : Phonetics.Item, Range.Phonetic et Range.Phonetics

For Each

Voici un exemple de traitement des éléments Phonetic dans une collection

Dim phn As Phonetic
For Each phn In Application.Phonetics
	
Next phn

Méthodes

Les méthodes principales de la classe Phonetic sont

Phonetics.Add - Cette méthode ajoute du texte phonétique à la cellule spécifiée.

Dim lngStart As Long: lngStart = 
Dim lngLength As Long: lngLength = 
Dim strText As String: strText = 
ActiveCell.Phonetics.Add Start:=lngStart, Length:=lngLength, Text:=strText

Phonetics.Delete - Cette méthode supprime l'objet.

ActiveCell.Phonetics.Delete

Propriétés

Alignment Cette propriété renvoie ou définit une valeur de type Long qui représente l'alignement du texte phonétique ou de l'étiquette de graduation.

ActiveCell.Phonetic.Alignment =

CharacterType Cette propriété renvoie ou définit le type de texte phonétique dans la cellule spécifiée. En lecture/écriture XlPhoneticCharacterType.

ActiveCell.Phonetic.CharacterType =

Font Renvoie un objet font qui représente la police de l’objet spécifié.

Dim fntFont As Font
Set fntFont = ActiveCell.Phonetic.Font

Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim objParent As Object
Set objParent = ActiveCell.Phonetic.Parent

Text Cette propriété renvoie ou définit le texte de l'objet spécifié. String en lecture/écriture.

ActiveCell.Phonetic.Text =

Visible Cette propriété renvoie ou définit une valeur de type Boolean qui détermine si l’objet est visible. Lecture-écriture.

ActiveCell.Phonetic.Visible = True

Phonetics.Alignment Cette propriété renvoie ou définit une valeur de type Long qui représente l'alignement du texte phonétique ou de l'étiquette de graduation.

ActiveCell.Phonetics.Alignment =

Phonetics.CharacterType Cette propriété renvoie ou définit le type de texte phonétique dans la cellule spécifiée. En lecture/écriture XlPhoneticCharacterType.

ActiveCell.Phonetics.CharacterType =

Phonetics.Count Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = ActiveCell.Phonetics.Count

Phonetics.Font Renvoie un objet font qui représente la police de l’objet spécifié.

Dim fntFont As Font
Set fntFont = ActiveCell.Phonetics.Font

Phonetics.Item Cette méthode renvoie un seul objet d'une collection.

Dim phnItem As Phonetic
Set phnItem = ActiveCell.Phonetics(Index:=1)

Phonetics.Length Cette propriété renvoie une valeur de type Long qui représente le nombre de caractères du texte phonétique à partir de la position que vous avez spécifiée avec la propriété Start.

Dim lngLength As Long
lngLength = ActiveCell.Phonetics.Length

Phonetics.Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim objParent As Object
Set objParent = ActiveCell.Phonetics.Parent

Phonetics.Start Cette propriété renvoie la position qui représente le premier caractère d'une chaîne de texte phonétique dans la cellule spécifiée. Type de données Long en lecture seule.

Dim lngStart As Long
lngStart = ActiveCell.Phonetics.Start

Phonetics.Text Cette propriété renvoie ou définit le texte de l'objet spécifié. String en lecture/écriture.

ActiveCell.Phonetics.Text =

Phonetics.Visible Cette propriété renvoie ou définit une valeur de type Boolean qui détermine si l’objet est visible. Lecture-écriture.

ActiveCell.Phonetics.Visible = True