Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel
Excel Forum d'entraide sur Excel. Vos questions sur les fonctions, formules, manipulations, et tout sujet qui ne trouve pas sa place dans un sous-forum.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 17/07/2011, 18h44   #1
Membre du Club
 
Avatar de m@tix
 
Inscription : octobre 2006
Messages : 290
Détails du profil
Informations forums :
Inscription : octobre 2006
Messages : 290
Points : 42
Points : 42
Par défaut Format de nombre d'une cellule

Bonjour,

Je récupère des données d'un fichier via une macro dans un tableur. Il se trouve que les données en question sont de la forme 5.4E2 par exemple, mais je souhaite qu'elles apparaissent dans mon tableur sous la forme 540. J'ai pensé définir dans Format de cellule le type "Standard", ce qui fonctionne, mais uniquement lorsque la donnée est déjà importée. A chaque fois que je relance la macro, on repasse en écriture scientifique... Y-a-t-il une possibilité de conserver l'écriture standard ?

Merci d'avance.
m@tix est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 19h22   #2
Expert Confirmé Sénior
 
Avatar de jfontaine
 
Homme Jérôme FONTAINE
Contrôleur de Gestion
Inscription : juin 2006
Messages : 3 887
Détails du profil
Informations personnelles :
Nom : Homme Jérôme FONTAINE
Âge : 38
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Contrôleur de Gestion

Informations forums :
Inscription : juin 2006
Messages : 3 887
Points : 7 156
Points : 7 156
Bonjour,

As tu essayé de remettre le format en standard via macro
Code :
Selection.NumberFormat = "General"
__________________
Jérôme

Citation:
"Ils ne savaient pas que c'était impossible, alors ils l'ont fait" - Marc Twain
Si la réponse répond à votre besoin, votre vote nous encouragera.
Dans le cas ou la réponse mérite, à vos yeux, un , nous faire partager la raison de ce vote, pourrait nous permettre de nous améliorer.
jfontaine est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 19h35   #3
Membre du Club
 
Avatar de m@tix
 
Inscription : octobre 2006
Messages : 290
Détails du profil
Informations forums :
Inscription : octobre 2006
Messages : 290
Points : 42
Points : 42
A quel endroit du code faut-il le placer pour intervenir sur la cellule voulue (ou même sur la colonne) ?
m@tix est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 19h47   #4
Expert Confirmé Sénior
 
Avatar de jfontaine
 
Homme Jérôme FONTAINE
Contrôleur de Gestion
Inscription : juin 2006
Messages : 3 887
Détails du profil
Informations personnelles :
Nom : Homme Jérôme FONTAINE
Âge : 38
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Contrôleur de Gestion

Informations forums :
Inscription : juin 2006
Messages : 3 887
Points : 7 156
Points : 7 156
A mon avis, après l'importation des données.

Tu peux aussi utiliser le menu Convertir (dans menu Données / Convertir)

Avec enregistreur de macro j'ai ce code pour convertir toute une colonne au format Standard
Code :
1
2
3
4
5
Columns("A:A").Select
    Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
        :=Array(1, 1), TrailingMinusNumbers:=True
__________________
Jérôme

Citation:
"Ils ne savaient pas que c'était impossible, alors ils l'ont fait" - Marc Twain
Si la réponse répond à votre besoin, votre vote nous encouragera.
Dans le cas ou la réponse mérite, à vos yeux, un , nous faire partager la raison de ce vote, pourrait nous permettre de nous améliorer.
jfontaine est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 21h28   #5
Membre du Club
 
Avatar de m@tix
 
Inscription : octobre 2006
Messages : 290
Détails du profil
Informations forums :
Inscription : octobre 2006
Messages : 290
Points : 42
Points : 42
Je viens d'essayer tes propositions, en vain...
  1. J'ai placé le code de ton premier message après l'importation des données, à savoir:

    Code :
    1
    2
    3
    Sheets(CStr(xxx)).Cells(yyy, rech.Column).Value = Recherche("element1")
     
    Selection.NumberFormat = "General"
  2. A partir du menu Convertir, rien de concluant non plus..
  3. Pour la macro.. même remarque que le premier point.

Toute suggestion reste la bienvenue..
m@tix est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 21h39   #6
Expert Confirmé Sénior
 
Avatar de jfontaine
 
Homme Jérôme FONTAINE
Contrôleur de Gestion
Inscription : juin 2006
Messages : 3 887
Détails du profil
Informations personnelles :
Nom : Homme Jérôme FONTAINE
Âge : 38
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Contrôleur de Gestion

Informations forums :
Inscription : juin 2006
Messages : 3 887
Points : 7 156
Points : 7 156
et comme cela
Code :
1
2
Sheets(CStr(xxx)).Cells(yyy, rech.Column).Value = Recherche("element1")
Sheets(CStr(xxx)).Cells(yyy, rech.Column).NumberFormat = "General"
__________________
Jérôme

Citation:
"Ils ne savaient pas que c'était impossible, alors ils l'ont fait" - Marc Twain
Si la réponse répond à votre besoin, votre vote nous encouragera.
Dans le cas ou la réponse mérite, à vos yeux, un , nous faire partager la raison de ce vote, pourrait nous permettre de nous améliorer.
jfontaine est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 21h45   #7
Membre du Club
 
Avatar de m@tix
 
Inscription : octobre 2006
Messages : 290
Détails du profil
Informations forums :
Inscription : octobre 2006
Messages : 290
Points : 42
Points : 42
Super !!

Merci beaucoup pour ton aide !
Au passage, où peut-on voir les "correspondances" du genre General pour Standard, etc.. ?
m@tix est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 21h59   #8
Expert Confirmé Sénior
 
Avatar de jfontaine
 
Homme Jérôme FONTAINE
Contrôleur de Gestion
Inscription : juin 2006
Messages : 3 887
Détails du profil
Informations personnelles :
Nom : Homme Jérôme FONTAINE
Âge : 38
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Contrôleur de Gestion

Informations forums :
Inscription : juin 2006
Messages : 3 887
Points : 7 156
Points : 7 156
Citation:
où peut-on voir les "correspondances" du genre General pour Standard, etc.. ?
Utilises l'enregistreur de macro
__________________
Jérôme

Citation:
"Ils ne savaient pas que c'était impossible, alors ils l'ont fait" - Marc Twain
Si la réponse répond à votre besoin, votre vote nous encouragera.
Dans le cas ou la réponse mérite, à vos yeux, un , nous faire partager la raison de ce vote, pourrait nous permettre de nous améliorer.
jfontaine est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 22h33   #9
Membre du Club
 
Avatar de m@tix
 
Inscription : octobre 2006
Messages : 290
Détails du profil
Informations forums :
Inscription : octobre 2006
Messages : 290
Points : 42
Points : 42
Euh... Qu'est-ce donc ?
m@tix est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 17/07/2011, 22h48   #10
Expert Confirmé Sénior
 
Avatar de jfontaine
 
Homme Jérôme FONTAINE
Contrôleur de Gestion
Inscription : juin 2006
Messages : 3 887
Détails du profil
Informations personnelles :
Nom : Homme Jérôme FONTAINE
Âge : 38
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Contrôleur de Gestion

Informations forums :
Inscription : juin 2006
Messages : 3 887
Points : 7 156
Points : 7 156
Dans le menu Outils/Macro/Nouvelle macro.
Tu créais une nouvelle macro qui va enregistrer tes actions et en fera un code VBA que tu retrouveras dans un module.
__________________
Jérôme

Citation:
"Ils ne savaient pas que c'était impossible, alors ils l'ont fait" - Marc Twain
Si la réponse répond à votre besoin, votre vote nous encouragera.
Dans le cas ou la réponse mérite, à vos yeux, un , nous faire partager la raison de ce vote, pourrait nous permettre de nous améliorer.
jfontaine est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 13h01.


 
 
 
 
Partenaires

Hébergement Web