Soir à tous
En Excel 2000
je trie mes Maigret par ordre alpha et je retrouve qqc comme :
L'auberge aux noyés
Le charretier de La Providence
...
Le voleur de Maigret
L'écluse n°1
Les caves du Majestic
...
Les vacances de Maigret
L'Étoile du Nord
Apparemment les apostrophes sont ignorées
Comment faire pour avoir tous les L'* convenablement regroupés ?? (et aussi
les caractères accentués)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JB
Bonsoir,
Sub TriApostrophe() [b:b].Insert For Each c In Range([A2], [a65000].End(xlUp)) c.Offset(0, 1) = Replace(c, "'", " ") Next c Range("A2").CurrentRegion.Select Selection.Sort Key1:=[B2], Header:=xlNo [b:b].Delete End Sub
http://cjoint.com/?mhvrnhStxA
JB
On 7 déc, 19:09, "olivier sur laposte" wrote:
Soir à tous En Excel 2000 je trie mes Maigret par ordre alpha et je retrouve qqc comme :
L'auberge aux noyés Le charretier de La Providence ... Le voleur de Maigret L'écluse n°1 Les caves du Majestic ... Les vacances de Maigret L'Étoile du Nord
Apparemment les apostrophes sont ignorées
Comment faire pour avoir tous les L'* convenablement regroupés ?? (et a ussi les caractères accentués)
Sub TriApostrophe()
[b:b].Insert
For Each c In Range([A2], [a65000].End(xlUp))
c.Offset(0, 1) = Replace(c, "'", " ")
Next c
Range("A2").CurrentRegion.Select
Selection.Sort Key1:=[B2], Header:=xlNo
[b:b].Delete
End Sub
http://cjoint.com/?mhvrnhStxA
JB
On 7 déc, 19:09, "olivier sur laposte" <omoulin-n0s...@laposte.net>
wrote:
Soir à tous
En Excel 2000
je trie mes Maigret par ordre alpha et je retrouve qqc comme :
L'auberge aux noyés
Le charretier de La Providence
...
Le voleur de Maigret
L'écluse n°1
Les caves du Majestic
...
Les vacances de Maigret
L'Étoile du Nord
Apparemment les apostrophes sont ignorées
Comment faire pour avoir tous les L'* convenablement regroupés ?? (et a ussi
les caractères accentués)
Sub TriApostrophe() [b:b].Insert For Each c In Range([A2], [a65000].End(xlUp)) c.Offset(0, 1) = Replace(c, "'", " ") Next c Range("A2").CurrentRegion.Select Selection.Sort Key1:=[B2], Header:=xlNo [b:b].Delete End Sub
http://cjoint.com/?mhvrnhStxA
JB
On 7 déc, 19:09, "olivier sur laposte" wrote:
Soir à tous En Excel 2000 je trie mes Maigret par ordre alpha et je retrouve qqc comme :
L'auberge aux noyés Le charretier de La Providence ... Le voleur de Maigret L'écluse n°1 Les caves du Majestic ... Les vacances de Maigret L'Étoile du Nord
Apparemment les apostrophes sont ignorées
Comment faire pour avoir tous les L'* convenablement regroupés ?? (et a ussi les caractères accentués)
*---de Carcajou---> Olivier MOULIN <-----------------* "JB" a écrit dans le message de news: Bonsoir,
Sub TriApostrophe() [b:b].Insert For Each c In Range([A2], [a65000].End(xlUp)) c.Offset(0, 1) = Replace(c, "'", " ") Next c Range("A2").CurrentRegion.Select Selection.Sort Key1:=[B2], Header:=xlNo [b:b].Delete End Sub
http://cjoint.com/?mhvrnhStxA
JB
On 7 déc, 19:09, "olivier sur laposte" wrote:
Soir à tous En Excel 2000 je trie mes Maigret par ordre alpha et je retrouve qqc comme :
L'auberge aux noyés Le charretier de La Providence ... Le voleur de Maigret L'écluse n°1 Les caves du Majestic ... Les vacances de Maigret L'Étoile du Nord
Apparemment les apostrophes sont ignorées
Comment faire pour avoir tous les L'* convenablement regroupés ?? (et aussi les caractères accentués)
*---de Carcajou--->
Olivier MOULIN
<-----------------*
"JB" <boisgontier@hotmail.com> a écrit dans le message de
news:5803e5f6-bf26-4d41-a0ed-48a9b308e652@a32g2000yqm.googlegroups.com...
Bonsoir,
Sub TriApostrophe()
[b:b].Insert
For Each c In Range([A2], [a65000].End(xlUp))
c.Offset(0, 1) = Replace(c, "'", " ")
Next c
Range("A2").CurrentRegion.Select
Selection.Sort Key1:=[B2], Header:=xlNo
[b:b].Delete
End Sub
http://cjoint.com/?mhvrnhStxA
JB
On 7 déc, 19:09, "olivier sur laposte" <omoulin-n0s...@laposte.net>
wrote:
Soir à tous
En Excel 2000
je trie mes Maigret par ordre alpha et je retrouve qqc comme :
L'auberge aux noyés
Le charretier de La Providence
...
Le voleur de Maigret
L'écluse n°1
Les caves du Majestic
...
Les vacances de Maigret
L'Étoile du Nord
Apparemment les apostrophes sont ignorées
Comment faire pour avoir tous les L'* convenablement regroupés ?? (et
aussi
les caractères accentués)
*---de Carcajou---> Olivier MOULIN <-----------------* "JB" a écrit dans le message de news: Bonsoir,
Sub TriApostrophe() [b:b].Insert For Each c In Range([A2], [a65000].End(xlUp)) c.Offset(0, 1) = Replace(c, "'", " ") Next c Range("A2").CurrentRegion.Select Selection.Sort Key1:=[B2], Header:=xlNo [b:b].Delete End Sub
http://cjoint.com/?mhvrnhStxA
JB
On 7 déc, 19:09, "olivier sur laposte" wrote:
Soir à tous En Excel 2000 je trie mes Maigret par ordre alpha et je retrouve qqc comme :
L'auberge aux noyés Le charretier de La Providence ... Le voleur de Maigret L'écluse n°1 Les caves du Majestic ... Les vacances de Maigret L'Étoile du Nord
Apparemment les apostrophes sont ignorées
Comment faire pour avoir tous les L'* convenablement regroupés ?? (et aussi les caractères accentués)
