Remplacer le contenu d'une colonne par autre chose
Résolu/Fermé
Marie Chant
Messages postés
86
Date d'inscription
lundi 24 mars 2014
Statut
Membre
Dernière intervention
19 avril 2024
-
8 mai 2017 à 22:15
Marie Chant Messages postés 86 Date d'inscription lundi 24 mars 2014 Statut Membre Dernière intervention 19 avril 2024 - 9 mai 2017 à 16:28
Marie Chant Messages postés 86 Date d'inscription lundi 24 mars 2014 Statut Membre Dernière intervention 19 avril 2024 - 9 mai 2017 à 16:28
A voir également:
- Remplacer le contenu d'une colonne par autre chose
- Déplacer une colonne excel - Guide
- Remplacer disque dur par ssd - Guide
- Remplacer un mot par un autre word - Guide
- Colonne word - Guide
- Word a trouvé du contenu illisible - Guide
1 réponse
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 775
8 mai 2017 à 22:32
8 mai 2017 à 22:32
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
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
9 mai 2017 à 15:00
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
Modifié le 9 mai 2017 à 16:39
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.