Apostrophe en début de cellule

[tbft]

Bonjour

J'utilise l'événement

Private Sub Worksheet_Change(ByVal Target As Range)

Mon soucis est le suivant:
Lorsque je saisie '1 dans une cellule, je n'arrive pas a voir l'apostrophe.
Target.Value="1"

Pouvez vous me dire si il y a un moyen de savoir si la cellule comporte un apostrophe?

D'avance merci

 

[Paritec]

Re : Apostrophe en début de cellule

Bonsoir tbft le forum,
si tu nous disais pourquoi tu veux l'apostrophe?
en tout cas si tu mets un apostrophe devant un chiffre il n'est plus considéré comme un chiffre mais comme un texte
a+
Papou

 

[tototiti2008]

Re : Apostrophe en début de cellule

Bonjour tbft, Bonjour Paritec,

C'est une question qui est revenue souvent mais je n'avais jamais trouvé de réponse satisfaisante pour l'instant, j'ai donc cherché et je crois que j'ai trouvé :

si une cellule commence par une apostrophe alors

Range("C1").PrefixCharacter

renvoie "'"
sinon il renvoie rien ""

 

[tbft]

Re : Apostrophe en début de cellule

Bonjour

@Paritec : l'apostrophe me permet de faire la différence entre une cellule "commentaire" et une cellule à mettre en forme suivant sont contenue.

@tototiti : C'EST NICKEL....Merci beaucoup...

 

[Pacam]

Re : Apostrophe en début de cellule

Bonsoir,

Pour qu'une apostrophe en début de cellule s'affiche, il y a une solution très simple : suffit de placer une autre apostrophe devant.
La 1ère se masque, l'autre reste et c'est parfait. =)

Je remonte ce vieux sujet, j'espère que c'est autorisé ici, sinon toutes mes excuses.

 

[YANN-56]

Re : Apostrophe en début de cellule

Bonsoir à tous,

Tu peux éventuellement tenter ceci.

Dim CELLULE As Range

For Each CELLULE In Selection

   CELLULE = WorksheetFunction.Substitute(CELLULE, "'", "''")

Next

Amicalement,

Yann

Désolé, je n'avais pas lu ton dernier Post

 

[tbft]

Re : Apostrophe en début de cellule

Bonjour

Merci à tous pour votre aide...