Macro suppression d'espace
Fermé
dorotheedalaine
-
19 avril 2007 à 18:39
Dodo2008 Messages postés 2 Date d'inscription jeudi 19 avril 2007 Statut Membre Dernière intervention 20 avril 2007 - 20 avril 2007 à 11:28
Dodo2008 Messages postés 2 Date d'inscription jeudi 19 avril 2007 Statut Membre Dernière intervention 20 avril 2007 - 20 avril 2007 à 11:28
A voir également:
- Macro suppression d'espace
- Espace insécable word - Guide
- Forcer suppression fichier - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Comment liberer de l'espace sur gmail - Guide
- Macro word - Guide
3 réponses
Oui mon problème n'est toujours pas résolu.
Tu pourrais m'aider? Tu es mon dernier espoir...
Tu pourrais m'aider? Tu es mon dernier espoir...
xjl
Messages postés
232
Date d'inscription
mardi 27 mars 2007
Statut
Membre
Dernière intervention
12 juin 2007
183
20 avril 2007 à 09:56
20 avril 2007 à 09:56
Comme je l'ai dit juste en dessous, à mon avis il n'y a pas besoin de macro pour résoudre ton problème, après à toi de voir si ma solution fonctionne chez toi ou pas, ou si tu as vraiment envie de t'embêter pour rien... ;-)
xjl
Messages postés
232
Date d'inscription
mardi 27 mars 2007
Statut
Membre
Dernière intervention
12 juin 2007
183
20 avril 2007 à 09:47
20 avril 2007 à 09:47
Salut,
si tu vas dans Outils, Options, dans l'onglet internationnal tu peux cocher Utiliser les séparateurs système et normalement il considèrera que 32 564 = 32564 et tu pourras faire tous les calculs que tu veux dessus... ;-)
si tu vas dans Outils, Options, dans l'onglet internationnal tu peux cocher Utiliser les séparateurs système et normalement il considèrera que 32 564 = 32564 et tu pourras faire tous les calculs que tu veux dessus... ;-)
Dodo2008
Messages postés
2
Date d'inscription
jeudi 19 avril 2007
Statut
Membre
Dernière intervention
20 avril 2007
20 avril 2007 à 10:06
20 avril 2007 à 10:06
Cela ne fonctionne pas. As tu une autre idée?
xjl
Messages postés
232
Date d'inscription
mardi 27 mars 2007
Statut
Membre
Dernière intervention
12 juin 2007
183
>
Dodo2008
Messages postés
2
Date d'inscription
jeudi 19 avril 2007
Statut
Membre
Dernière intervention
20 avril 2007
20 avril 2007 à 10:29
20 avril 2007 à 10:29
C'est quand même bizarre, chez moi ça fonctionne bien !
Tu peux utiliser cette macro, en remplaçant 10 par le nombre de lignes que tu veux modifier et le 1 de Cells(i,1).Value par le numéro de la colonne où se trouvent tes données à modifier:
Sub suppreespace()
For i = 1 To 10
For j = 1 To Len(Cells(i, 1).Value)
If Mid(Cells(i, 1).Value, j, 1) = " " Then
Cells(i, 1).Value = Left(Cells(i, 1).Value, j - 1) & Right(Cells(i, 1).Value, Len(Cells(i, 1).Value) - j)
End If
Next j
Next i
End Sub
Tu peux utiliser cette macro, en remplaçant 10 par le nombre de lignes que tu veux modifier et le 1 de Cells(i,1).Value par le numéro de la colonne où se trouvent tes données à modifier:
Sub suppreespace()
For i = 1 To 10
For j = 1 To Len(Cells(i, 1).Value)
If Mid(Cells(i, 1).Value, j, 1) = " " Then
Cells(i, 1).Value = Left(Cells(i, 1).Value, j - 1) & Right(Cells(i, 1).Value, Len(Cells(i, 1).Value) - j)
End If
Next j
Next i
End Sub
Dodo2008
Messages postés
2
Date d'inscription
jeudi 19 avril 2007
Statut
Membre
Dernière intervention
20 avril 2007
>
Dodo2008
Messages postés
2
Date d'inscription
jeudi 19 avril 2007
Statut
Membre
Dernière intervention
20 avril 2007
20 avril 2007 à 11:28
20 avril 2007 à 11:28
Je n'y arrive toujours pas mais certainement parce que je ne maîtrise pas les macros.
J'ai aussi essayé ça:
strDecSep = Worksheets("Jan06").QueryTables(1) _
.TextFileThousandsSeparator
Worksheets("Janv06").QueryTables(1) _
.TextFileThousandsSeparator = ","
Mais cela indique erreur d'exécution.
Je craque...
J'ai aussi essayé ça:
strDecSep = Worksheets("Jan06").QueryTables(1) _
.TextFileThousandsSeparator
Worksheets("Janv06").QueryTables(1) _
.TextFileThousandsSeparator = ","
Mais cela indique erreur d'exécution.
Je craque...
20 avril 2007 à 09:50