A voir également:
- Remplacer le contenu de plusieurs cellules
- Remplacer le contenu de plusieurs cellules ✓ - Forum - Excel
- Remplacer le contenu d'une cellule ✓ - Forum - VB / VBA
- Remplacer le contenu de céllules automatiquement ✓ - Forum - VB / VBA
- Remplacer texte par contenu d'une cellule ✓ - Forum - Excel
- Remplace le contenu de cellule ✓ - Forum - VB / VBA
3 réponses
Vaucluse
- Messages postés
- 25568
- Date d'inscription
- lundi 23 juillet 2007
- Statut
- Contributeur
- Dernière intervention
- 18 novembre 2020
Bonjour
Comme ci dessous, ça ira toujours plus vite que de tout filtrer:
sélectionner toutes les feuilles à traiter
ensuite:
dans la fenêtre affichée
Attention, effectuer ça du plus grand (43) au plus petit (2) car sinon, l'opération va modifier les nombres et pourrait poser de problèmes)
cette fenêtre de remplacement restant affichée, vous pouvez traiter de 43 à 2 sans modifier les sélections. Ca prendra un peu de temps, mais ça se fait!
crdlmnt
Comme ci dessous, ça ira toujours plus vite que de tout filtrer:
sélectionner toutes les feuilles à traiter
- si ce sont toutes les feuilles du classeur, clic droit sur un onglet et "sélectionner tout
- si il y a d'autre feuille à ne pas traiter, placer tous les noms d'onglet cote à cote en bas de page, sélectionner le 1°, enfoncer la touche shift, sélectionner le dernier, tous les onglets entre les deux sont sélectionnés
ensuite:
- touche ctrl + touche h
dans la fenêtre affichée
- remplacer > entrer le nombre à éliminer
- en Bas placer 1
- et remplacer tout
Attention, effectuer ça du plus grand (43) au plus petit (2) car sinon, l'opération va modifier les nombres et pourrait poser de problèmes)
cette fenêtre de remplacement restant affichée, vous pouvez traiter de 43 à 2 sans modifier les sélections. Ca prendra un peu de temps, mais ça se fait!
crdlmnt
eriiic
- Messages postés
- 23652
- Date d'inscription
- mardi 11 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 18 novembre 2020
Bonjour,
en supposant que ce sont des saisies et non des formules.
Remplace tous les nombres de toutes les feuilles, même si >43. Préciser s'il faut en exclure.
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
en supposant que ce sont des saisies et non des formules.
Remplace tous les nombres de toutes les feuilles, même si >43. Préciser s'il faut en exclure.
Sub un()
Dim sh As Worksheet, pl As Range
For Each sh In Worksheets
Set pl = sh.Range("A:BJ").SpecialCells(xlCellTypeConstants, xlNumbers)
If Not pl Is Nothing Then pl.Value = 1
Next sh
End Sub
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
Kodime
Bonjour Monsieur Eriic,
Je viens vers vous pour un VBA cette fois pour remplacer les cellules par 0. j'ai travaillé sur mon fichier et je n'ai que des cellules et vierges et d'autres avec 1. Je voudrais maintenant remplacer toutes les cellules vides par 0 de la colonne O2:BI2 sur plusieurs lignes. Merci de votre disponibilité et de votre aide
Je viens vers vous pour un VBA cette fois pour remplacer les cellules par 0. j'ai travaillé sur mon fichier et je n'ai que des cellules et vierges et d'autres avec 1. Je voudrais maintenant remplacer toutes les cellules vides par 0 de la colonne O2:BI2 sur plusieurs lignes. Merci de votre disponibilité et de votre aide
Raymond PENTIER
- Messages postés
- 52670
- Date d'inscription
- lundi 13 août 2007
- Statut
- Contributeur
- Dernière intervention
- 18 novembre 2020
Bonjour.
Il n'y a pas de solution avec les fonctions classiques d'Excel.
Il te faudra te mettre à VBA et écrire une macro ...
Il n'y a pas de solution avec les fonctions classiques d'Excel.
Il te faudra te mettre à VBA et écrire une macro ...
- Messages postés
-
52670
- Date d'inscription
- lundi 13 août 2007
- Statut
- Contributeur
- Dernière intervention
- 18 novembre 2020
14 604- Messages postés
-
371
- Date d'inscription
- samedi 28 juillet 2012
- Statut
- Membre
- Dernière intervention
- 4 mars 2019
34- Messages postés
-
25568
- Date d'inscription
- lundi 23 juillet 2007
- Statut
- Contributeur
- Dernière intervention
- 18 novembre 2020
5 603... d'où, dans mes explications, la recommandation de bien commencer par le plus grand, 43 pour aller jusqu'au plus petit 2.
Ainsi, par exemple, on ne remplace 8 que lorsque tous les nombres supérieurs qui contenaient un 8 ont disparu
.crdlmnt