Ajout d'un ' à une date Excel en macro
Résolu
Diegoms
Messages postés
10
Date d'inscription
Statut
Membre
Dernière intervention
-
Diegoms Messages postés 10 Date d'inscription Statut Membre Dernière intervention -
Diegoms Messages postés 10 Date d'inscription Statut Membre Dernière intervention -
Salut,
En excel j'ai une liste de dates sur la colonne A disons :
05/05/2010
05/06/2010
05/07/2010
05/08/2010
etc.
Je voudrais les transformer en TEXTE, qu'excel ne les reconnaisse pas comme des dates. Je peux faire F2 et ajouter un ' devant. ça marche. Cependant je veux faire ça en macro mais quand j'enregistre la macro sur par exemple la premiere et que j'ai
'05/05/2010
Jusque là ça va. Mais quand j'execute cette macro sur la ligne suivant au lieu de juste ajouter le ' devant 05/06/2010 il efface le texte de la colonne et le remplace par 05/05/2010. Donc si j'applique cette macro à la fin mon tableau sera :
05/05/2010
05/05/2010
05/05/2010
05/05/2010
Comment je fais, au secours !!!!!
PS : Si vous en avez besoin voici le code que crée ma macro, je ne m'y connais rien mais je crois que c'est ça le problème :
Sub Macro3()
'
' Macro3 Macro
' Macro enregistrée le 19/05/2010 par dmendez
'
'
Application.CutCopyMode = False
Selection.FormulaR1C1 = "'05/05/2010"
End Sub
En excel j'ai une liste de dates sur la colonne A disons :
05/05/2010
05/06/2010
05/07/2010
05/08/2010
etc.
Je voudrais les transformer en TEXTE, qu'excel ne les reconnaisse pas comme des dates. Je peux faire F2 et ajouter un ' devant. ça marche. Cependant je veux faire ça en macro mais quand j'enregistre la macro sur par exemple la premiere et que j'ai
'05/05/2010
Jusque là ça va. Mais quand j'execute cette macro sur la ligne suivant au lieu de juste ajouter le ' devant 05/06/2010 il efface le texte de la colonne et le remplace par 05/05/2010. Donc si j'applique cette macro à la fin mon tableau sera :
05/05/2010
05/05/2010
05/05/2010
05/05/2010
Comment je fais, au secours !!!!!
PS : Si vous en avez besoin voici le code que crée ma macro, je ne m'y connais rien mais je crois que c'est ça le problème :
Sub Macro3()
'
' Macro3 Macro
' Macro enregistrée le 19/05/2010 par dmendez
'
'
Application.CutCopyMode = False
Selection.FormulaR1C1 = "'05/05/2010"
End Sub
A voir également:
- Ajout d'un ' à une date Excel en macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Déplacer une colonne excel - Guide
- Mise en forme conditionnelle excel - Guide
- Word et excel gratuit - Guide
2 réponses
Salut,
Tu peux donc le faire par macro :
cellule par cellule : [tu sélectionnes la cellule et lances la macro]
Ou alors en boucle de A1 à A15896 (si toutes tes dates sont en colonne A) :
Tu peux donc le faire par macro :
cellule par cellule : [tu sélectionnes la cellule et lances la macro]
Sub pas_a_pas() ActiveCell.Value = "'" & ActiveCell.Value End Sub
Ou alors en boucle de A1 à A15896 (si toutes tes dates sont en colonne A) :
Sub ajout_col_A() Dim i, derlig As Integer derlig = Range("A65536").End(xlUp).Row For i = 1 To derlig Cells(i, 1).Value = "'" & Cells(i, 1).Value Next i End Sub