A voir également:
- Apostrophe Excel Texte
- Liste déroulante excel - Guide
- Formule excel - Guide
- Formule excel si contient texte alors texte ✓ - Forum Excel
- Dans le texte, un seul mot a réellement été écrit en lettres capitales (majuscules). quel est ce mot ? ✓ - Forum Word
- Excel si cellule contient texte alors ✓ - Forum Excel
6 réponses
eriiic
Messages postés
24512
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
24 mars 2023
7 168
28 oct. 2011 à 18:13
28 oct. 2011 à 18:13
Re,
Copie ta feuille (je suppose que tu n'y as pas de formules) et fais un collage spécial valeur dans une autre feuille, ça a l'air d'être bon.
eric
Copie ta feuille (je suppose que tu n'y as pas de formules) et fais un collage spécial valeur dans une autre feuille, ça a l'air d'être bon.
eric
koma_666
Messages postés
429
Date d'inscription
mardi 26 juin 2007
Statut
Membre
Dernière intervention
9 mai 2016
34
Modifié par koma_666 le 28/10/2011 à 16:09
Modifié par koma_666 le 28/10/2011 à 16:09
Salut,
avec un "remplacer" ? ctrl +f, onglet "remplacer". Remplacer " ' " par " " (un espace ou un vide)
avec un "remplacer" ? ctrl +f, onglet "remplacer". Remplacer " ' " par " " (un espace ou un vide)
koma_666
Messages postés
429
Date d'inscription
mardi 26 juin 2007
Statut
Membre
Dernière intervention
9 mai 2016
34
Modifié par koma_666 le 28/10/2011 à 16:22
Modifié par koma_666 le 28/10/2011 à 16:22
je viens d'essayer, cela fonctionne chez moi.
Tu peux me copier un extrait de ton texte stp ?
Tu peux me copier un extrait de ton texte stp ?
Vaucluse
Messages postés
26495
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
8 avril 2022
6 319
28 oct. 2011 à 16:24
28 oct. 2011 à 16:24
Bonjour
la solution de Koma s'applique si l'apostrophe en début de texte est visible dans les cellules.
C'est ce que je vous souhaite, mais cela ne fonctionne pas si elle est seulement présente en tant que spécification de texte (uniquement visible dans la barre de formule)
pour ma part, et hors macro, je ne connais qu'une solution pour faire disparaître ce signe dans ce cas:
en ligne avec le champ texte ou en liaison sur une autre feuille:
=SUBSTITUE(A1;"'";;1)
qui fait disparaître l'apostrophe
on peut ainsi traiter toute la feuille en copie liée et directement passer en num ou en texte sans apostrophe avec la formule:
=SI(ESTERREUR(SUBSTITUE(A1;"'";;1)*1);SUBSTITUE(A1;"'";;1);SUBSTITUE(A1;"'";;1)*1)
il suffit après de faire un copier /collage spécial "valeur" sur la feuille d'origine
crdlmnt
la solution de Koma s'applique si l'apostrophe en début de texte est visible dans les cellules.
C'est ce que je vous souhaite, mais cela ne fonctionne pas si elle est seulement présente en tant que spécification de texte (uniquement visible dans la barre de formule)
pour ma part, et hors macro, je ne connais qu'une solution pour faire disparaître ce signe dans ce cas:
en ligne avec le champ texte ou en liaison sur une autre feuille:
=SUBSTITUE(A1;"'";;1)
qui fait disparaître l'apostrophe
on peut ainsi traiter toute la feuille en copie liée et directement passer en num ou en texte sans apostrophe avec la formule:
=SI(ESTERREUR(SUBSTITUE(A1;"'";;1)*1);SUBSTITUE(A1;"'";;1);SUBSTITUE(A1;"'";;1)*1)
il suffit après de faire un copier /collage spécial "valeur" sur la feuille d'origine
crdlmnt
koma_666
Messages postés
429
Date d'inscription
mardi 26 juin 2007
Statut
Membre
Dernière intervention
9 mai 2016
34
28 oct. 2011 à 16:31
28 oct. 2011 à 16:31
hum ok. je n'avais pas saisi qu'il s'agissait de valeurs. désolé.
Vaucluse
Messages postés
26495
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
8 avril 2022
6 319
28 oct. 2011 à 16:36
28 oct. 2011 à 16:36
Pas de quoi être désolé Koma, je n'ai pas dit que cela ne marchait pas, et ne sachant pas ce que devient un texte depuis AUTOCAD vers Excel, il est encore largement possible que vous ayez raison,
le demandeur nous le dira.
crdlmnt
le demandeur nous le dira.
crdlmnt
Merci pour toutes ces réponses, effectivement cela fonctionne avec
=SUBSTITUE(A1;"'";;1)
mais je souhaiterais automatiser cela dans une macro.
Merci d'avance !
=SUBSTITUE(A1;"'";;1)
mais je souhaiterais automatiser cela dans une macro.
Merci d'avance !
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
eriiic
Messages postés
24512
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
24 mars 2023
7 168
28 oct. 2011 à 17:03
28 oct. 2011 à 17:03
Bonjour,
Sélectionner la plage à traiter et lancer la macro.
eric
Sélectionner la plage à traiter et lancer la macro.
Sub suppApostrophe1()
Dim c As Range
For Each c In Selection
c = c
Next c
End Sub
eric
merci, mais cela ne fonctionne pas...
Ton programme fonctionne très bien si dans ma cellule j'ai
'2
mais si j'ai 'texte rien ne change ...
d'autres idées ?
Merci !
Ton programme fonctionne très bien si dans ma cellule j'ai
'2
mais si j'ai 'texte rien ne change ...
d'autres idées ?
Merci !
eriiic
Messages postés
24512
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
24 mars 2023
7 168
28 oct. 2011 à 17:32
28 oct. 2011 à 17:32
chez moi ça fonctionne bien (excel 2003)...
eric
eric
eriiic
Messages postés
24512
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
24 mars 2023
7 168
28 oct. 2011 à 17:57
28 oct. 2011 à 17:57
oui, c'est ça
Mais j'ai testé sur 2010 et je constate la même chose que toi.
J'ai essayé d'autres façons de faire mais rien de mieux pour l'instant
Mais j'ai testé sur 2010 et je constate la même chose que toi.
J'ai essayé d'autres façons de faire mais rien de mieux pour l'instant
eriiic
Messages postés
24512
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
24 mars 2023
7 168
28 oct. 2011 à 18:05
28 oct. 2011 à 18:05
J'avoue être à court d'idée :-)
J'ai essayé avec une variable intermédiaire, en vidant la cellule, avec replace() : l'apostrophe revient dans la cellule tout le temps...
J'ai essayé avec une variable intermédiaire, en vidant la cellule, avec replace() : l'apostrophe revient dans la cellule tout le temps...
28 oct. 2011 à 18:18
Est ce que cette opération est envisageable en programmation ( VBA) ?
28 oct. 2011 à 19:30
ctrl+c suivi de ctrl+v ne nécessite pas vraiment de macro, n'exagérons rien
29 oct. 2011 à 14:23
C'est juste que je souhaiterais complètement automatiser le programme, afin que les utilisateurs n'est plus qu'a appuyer sur un bouton qui lance la macro ...
J'avoue être débutante pour l'instant sur VBA, alors si tu sais faire en VBA :
sélectionner toute la feuille puis copier
collage spécial avec en sélection" valeur" , sur un nouvel onglet, je suis vraiment preneuse !!!!
Merci beaucoup de ton aide !
29 oct. 2011 à 14:59
Par sécurité il faut que ta feuille origine s'appelle toujours pareil, ici "Source".
Sub collerValeurs() Dim shSource As Worksheet ' nom de la feuille à copier Const nomFeuilleSource As String = "Source" Set shSource = Worksheets(nomFeuilleSource) Sheets.Add shSource.UsedRange.Copy ActiveSheet.[A1].PasteSpecial xlPasteValues ' suppression feuille originale sans confirmation Application.DisplayAlerts = False shSource.Delete Application.DisplayAlerts = True ' renommer feuille ActiveSheet.Name = nomFeuilleSource End Suberic
29 oct. 2011 à 15:05