Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1811 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [RESOLU] Comment reconnaître un apostrophe???

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[RESOLU] Comment reconnaître un apostrophe???

n°1388794
acorsa
Posté le 16-06-2006 à 11:17:27  profilanswer
 

Bonjour,
Toujours avec mon problème de parcours d'un texte (ms ça avance peu à peu...). Cette fois ci je voudrais savoir si il y a un moyen de dire "si caractère en cours =  '  alors avancer".
En fait si je fais If Selection.text =" ' " Then bla bla bla le teste ne marche pas ça me retourne faux dc il faudrait que je connaisse soit le code de ce caractère, soit faire un test du genre If Selection.text <> lettre ms il me faudrait savoir ce qui me permettrait de trouver ttes les lettres...Capisci??
 
Merci


Message édité par acorsa le 16-06-2006 à 14:43:37
mood
Publicité
Posté le 16-06-2006 à 11:17:27  profilanswer
 

n°1388802
kiki29
Posté le 16-06-2006 à 11:23:00  profilanswer
 

Aide en ligne VBA ASCII jeu de caractères 0 à 127 (39) ?

n°1388814
acorsa
Posté le 16-06-2006 à 11:27:56  profilanswer
 

merci!

n°1388839
acorsa
Posté le 16-06-2006 à 11:39:13  profilanswer
 

En fait j'ai bien essayé ms mon aide en ligne refuse de m'afficher la page (et uniquement cette page!!(grrrrrrrrrr)) quand je clique sur le lien "jeu de caractère".
A part ça tout va bien!

n°1388893
acorsa
Posté le 16-06-2006 à 12:09:20  profilanswer
 

Rassurez -moi...Pour comparer un caractère avec un code c'est bien: Selection.Text > Chr(0)?
 (si bien sur je sélectionne le caractère en question)
Parce-que la j'y arrive pas du tout, il m'affiche le caractère et je compare avec une quote ou un apostrophe et ça marche pas!!!
Vous ne connaissez pas un autre test que je peux faire? Ou un truc du genre: MsgBox Selection.codeASCII????
Un truc simple quoi!!

n°1388911
kiki29
Posté le 16-06-2006 à 12:43:11  profilanswer
 


Sub Test()
Dim i As Long, Taille As Long
Dim str As String
 
    ActiveDocument.Select
    str = Selection
    Taille = Len(str)
     
    For i = 1 To Taille
        If Selection.Characters(i) = Chr(146) Then
            Debug.Print i, Selection.Characters(i)
        End If
    Next
End Sub


Message édité par kiki29 le 16-06-2006 à 13:31:44
n°1388995
acorsa
Posté le 16-06-2006 à 14:07:23  profilanswer
 

Merci tu m'as sauvé la vie!!! Je testais avec Chr(46) donc ça ne marchait pas.
@+


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [RESOLU] Comment reconnaître un apostrophe???

 

Sujets relatifs
[Access] [résolu] problème de recherche[Résolu] [CSS] Comment justifié ?
[Résolu] [MySQL] SELECT sur plusieurs tables[ VB6] [Résolu] Passer un argument a une Macro
[Résolu]extraire un fichier .zip en vba?[resolu][vb6]probleme extraterrestre avec 3 boutons radios
comment cacher un message d'erreur (résolu)modifier le contenu d'une cellule [résolu]
[RESOLU] liaison javascript / PHP[RÉSOLU] Problèmes divers FOR /F
Plus de sujets relatifs à : [RESOLU] Comment reconnaître un apostrophe???


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR