Remplacer le contenu d'une colonne par autre chose
Résolu
Marie Chant
Messages postés
147
Statut
Membre
-
Marie Chant Messages postés 147 Statut Membre -
Marie Chant Messages postés 147 Statut Membre -
Bonjour,
Comme je ne suis pas très habile avec les macros, j'aurais besoin d'un peu d'aide.
J'ai une colonne en Excel soit la colonne A ou il y a quelques choses d'inscrit sur chaque ligne. Sur la colonne A se sont des choses différentes d'inscrit sur chaque ligne.
ex A1 000.fedrse.123.dfd.111 etc... en A2 000.213.59.21 et je voudrais remplacer ce qu'il y a d'inscrit par autre chose soit 204240. ALors remplace toute la colonne A par 204240
J'aimerais avoir une macro qui me ferais ça.
merci beaucoup de votre aide.
--
Aucune question n'est ridicule. C'est comme cela qu'on apprend!
Comme je ne suis pas très habile avec les macros, j'aurais besoin d'un peu d'aide.
J'ai une colonne en Excel soit la colonne A ou il y a quelques choses d'inscrit sur chaque ligne. Sur la colonne A se sont des choses différentes d'inscrit sur chaque ligne.
ex A1 000.fedrse.123.dfd.111 etc... en A2 000.213.59.21 et je voudrais remplacer ce qu'il y a d'inscrit par autre chose soit 204240. ALors remplace toute la colonne A par 204240
J'aimerais avoir une macro qui me ferais ça.
merci beaucoup de votre aide.
--
Aucune question n'est ridicule. C'est comme cela qu'on apprend!
1 réponse
-
Bonjour,
Pourquoi une macro quand il suffit de le faire en manuel ?
1) Tu sélectionnes A1
2) Appuies sur Maj+Ctrl+Flêche vers le bas (ça sélectionne la colonne du tableau)
3) Saisis 204240
4) Valides par Maj+Ctrl+Entrée
-
Bonjour Patrice33740,
Je voulais en vba car j'ai déjà une macro pour ce fichier mais les paramètres ont changés a cause d'une nouvelle version apportée pour sortir mon rapport.. Maintenant je dois changer la colonne A avant même de partir ma macro. Je voulais simplement inclure la commande dans la macro existante.
merci beaucoup de votre aide -
Bon j'ai mis cela a ma macro existante et cela fonctionne
range("A2").Select
range(Selection, Selection.End(xlDown)).Select
Selection.FormulaArray = "204240"
ActiveWindow.SmallScroll Down:=-9
MAIS maintenant je dois convertir la colonne Q en monétaire pour quelle additionne les montants dans la colonne au complet. J'ai ceci dans mon code de vba mais cela ne fonctionne pas Est-ce que c'est parce qu'il y a un titre??
Columns("Q:Q").Select
Selection.TextToColumns Destination:=range("Q1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(1, 1), DecimalSeparator:=".", ThousandsSeparator:=",", _
TrailingMinusNumbers:=True
cela ne garde pas en nombre et je ne sais pas pourquoi. merci beaucoup de m'aider.
-