5 votes

Saisir '=' comme premier caractère d'une cellule

J'ai une macro VBA qui s'exécute et qui a souvent besoin d'avoir "=" comme premier caractère dans une cellule. Les cellules sont remplies de valeurs telles que "= domestique", "<> domestique", etc.

Pour l'instant, je remplace "=" par "IS" comme solution rapide, mais j'aimerais pouvoir conserver le signe égal, par souci de cohérence avec les cellules qui utilisent des symboles tels que "<>". Lorsque j'essaie, Excel pense qu'il s'agit d'une fonction dont la syntaxe est incorrecte. J'utilise Cells(row, col).Value = xx est la chaîne de caractères qui peut ou non commencer par "=", pour entrer les données.

17voto

manji Points 26778

Ajouter une seule citation ' au début de la chaîne :

Cells(row, col).Value = "'" & x

et vous obtiendrez ce que vous voulez.

6voto

ray Points 3191

Il s'agit d'une méthode alternative

Sub Test()
    Dim myRange As Range

    Set myRange = Range("C:C") 'Column "C"
    myRange.NumberFormat = "@" 'Set cell format of range to plain text
    myRange.Cells(1, 1) = "= Domestic"

End Sub

Par rapport à la réponse de manji, elle n'apporte aucune amélioration de performance ou de taille... juste une différence.

Prograide.com

Prograide est une communauté de développeurs qui cherche à élargir la connaissance de la programmation au-delà de l'anglais.
Pour cela nous avons les plus grands doutes résolus en français et vous pouvez aussi poser vos propres questions ou résoudre celles des autres.

Powered by:

X