Apostrophe en début de cellule

  • Initiateur de la discussion Initiateur de la discussion tbft
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

tbft

XLDnaute Accro
Bonjour

J'utilise l'événement
VB:
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
 
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 🙂
 
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

Code:
Range("C1").PrefixCharacter

renvoie "'"
sinon il renvoie rien ""
 
Dernière édition:
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...
 
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.
 
Re : Apostrophe en début de cellule

Bonsoir à tous,

Tu peux éventuellement tenter ceci.

Code:
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
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
170
  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
369
Réponses
4
Affichages
197
Réponses
32
Affichages
1 K
Retour