Je travaille sur un fichier issu d'une application, généré au format xls.
Dans certaines colonnes, des cellules sont vides à l'oeil mais on ne peut
faire aucun calcul avec (on obtient #VALEUR).
Il n'y a ni espace, ni apostrophe dans la cellule.
Si on efface "le vide", cela fonctionne.
Comment sélectionner et effacer ces cellules dans une colonne donnée (le
tableau peut être trié) ?
Qui est effectivement Rechercher Remplacer ce que je dis simplement depuis le début, après la plu-value savoir que c'est le chr 160 ou 164... très bien et on peut effectivement toujours envisager de le faire par macro.
C'est pourquoi j' ajoutais "d'en rire" petit clin d'oeil à MD sur un autre fil où il était également question de dire la même chose (..dans le m ême ordre).
;-)
C'est sans doute signe que je progresse!
@+
On 12 août, 09:06, "JPMonnier" wrote:
Bonjour à tous, Comme d'hab, Michel Denisà souvent la solution ! Il y a aussi cette sub qui fonctionne
Sub MEF() For Each N In Sheets("feuil1").[k1:k50] N.FormulaR1C1 = N.FormulaR1C1 Next si il y a du texte, elle renvoie forcément #Valeur -- Cordialement
End Sub "Bruno RCSC" a écrit dans le message denews:48a08a c4$0$844$
> Super Michdenis, tes 3 lignes de codes fonctionnent à merveille, je v ais > les adapter à mes tables.
> Comme quoi, (malheureusement), on ne peut pas rire de tout !!!
> Encore merci.
> "michdenis" a écrit dans le message de news: > uX9vBx9% >> Par exemple fait un truc du genre avec la colonne K
>> Si tu as plus d'une colonne affublée de cette maladie >> tu peux répéter.
>> '----------------------------- >> Sub test() >> t = Range("K1:K56636").Formula >> Range("K1:K56636") = 1 >> Range("K1:K56636") = t >> End Sub >> '-----------------------------
>> Explication : Toutes les cellules bien qu'au format "standard" >> sont en fait probablement au format Texte..... Il n'y a rien dans >> tes cellules ....Et pour bien comprendre, tu prends une cellule, >> tu la mets au format texte, tu entres le chiffre 2 et ce dernier >> s'affiche à gauche de la cellule... maintenant met >> le format de cette cellule au format standard >> et le 2 va continuera à s'afficher à gauche.... Dès qu'elle >> aura passé au mode édition (double -clique ou en utilisant F2) >> là, elle s'affichera à droite comme une entrée numérique.
>> Ce n'est pas évident, mais c'est une autre chinoiserie d'excel. >> C'est le truc qui peut arriver lorsque le contenu provient d'une >> autre application... compte tenu que dans cette colonne tu avais >> déjà des entrées texte.
>> "Bruno RCSC" a écrit dans le message de news: >> 48a06e7a$0$876$ >> Merci à tous les 2 pour vos réponses.
>> Je pense avoir bien compris ce qui est demandé mais j'obtiens : >> "Excel ne trouve pas de données correspondantes à remplacer."
>> Je vous joins un exemple de mon fichier.
>>http://cjoint.com/?ilsVgPLPc7
>> Merci.
>> BH
Bonjour,
Qui est effectivement Rechercher Remplacer
ce que je dis simplement depuis le début,
après la plu-value savoir que c'est le chr 160 ou 164... très bien
et on peut effectivement toujours envisager de le faire par macro.
C'est pourquoi j' ajoutais "d'en rire" petit clin d'oeil à MD sur un
autre fil
où il était également question de dire la même chose (..dans le m ême
ordre).
;-)
C'est sans doute signe que je progresse!
@+
On 12 août, 09:06, "JPMonnier" <jpmonnier-nos...@neuf.fr> wrote:
Bonjour à tous,
Comme d'hab, Michel Denisà souvent la solution !
Il y a aussi cette sub qui fonctionne
Sub MEF()
For Each N In Sheets("feuil1").[k1:k50]
N.FormulaR1C1 = N.FormulaR1C1
Next
si il y a du texte, elle renvoie forcément #Valeur
--
Cordialement
jpmonnier-no-s...@neuf.fr
End Sub
"Bruno RCSC" <ats....@wanadoo.fr> a écrit dans le message denews:48a08a c4$0$844$ba4acef3@news.orange.fr...
> Super Michdenis, tes 3 lignes de codes fonctionnent à merveille, je v ais
> les adapter à mes tables.
> Comme quoi, (malheureusement), on ne peut pas rire de tout !!!
> Encore merci.
> "michdenis" <michde...@hotmail.com> a écrit dans le message de news:
> uX9vBx9%23IHA.6...@TK2MSFTNGP04.phx.gbl...
>> Par exemple fait un truc du genre avec la colonne K
>> Si tu as plus d'une colonne affublée de cette maladie
>> tu peux répéter.
>> '-----------------------------
>> Sub test()
>> t = Range("K1:K56636").Formula
>> Range("K1:K56636") = 1
>> Range("K1:K56636") = t
>> End Sub
>> '-----------------------------
>> Explication : Toutes les cellules bien qu'au format "standard"
>> sont en fait probablement au format Texte..... Il n'y a rien dans
>> tes cellules ....Et pour bien comprendre, tu prends une cellule,
>> tu la mets au format texte, tu entres le chiffre 2 et ce dernier
>> s'affiche à gauche de la cellule... maintenant met
>> le format de cette cellule au format standard
>> et le 2 va continuera à s'afficher à gauche.... Dès qu'elle
>> aura passé au mode édition (double -clique ou en utilisant F2)
>> là, elle s'affichera à droite comme une entrée numérique.
>> Ce n'est pas évident, mais c'est une autre chinoiserie d'excel.
>> C'est le truc qui peut arriver lorsque le contenu provient d'une
>> autre application... compte tenu que dans cette colonne tu avais
>> déjà des entrées texte.
>> "Bruno RCSC" <ats....@wanadoo.fr> a écrit dans le message de news:
>> 48a06e7a$0$876$ba4ac...@news.orange.fr...
>> Merci à tous les 2 pour vos réponses.
>> Je pense avoir bien compris ce qui est demandé mais j'obtiens :
>> "Excel ne trouve pas de données correspondantes à remplacer."
Qui est effectivement Rechercher Remplacer ce que je dis simplement depuis le début, après la plu-value savoir que c'est le chr 160 ou 164... très bien et on peut effectivement toujours envisager de le faire par macro.
C'est pourquoi j' ajoutais "d'en rire" petit clin d'oeil à MD sur un autre fil où il était également question de dire la même chose (..dans le m ême ordre).
;-)
C'est sans doute signe que je progresse!
@+
On 12 août, 09:06, "JPMonnier" wrote:
Bonjour à tous, Comme d'hab, Michel Denisà souvent la solution ! Il y a aussi cette sub qui fonctionne
Sub MEF() For Each N In Sheets("feuil1").[k1:k50] N.FormulaR1C1 = N.FormulaR1C1 Next si il y a du texte, elle renvoie forcément #Valeur -- Cordialement
End Sub "Bruno RCSC" a écrit dans le message denews:48a08a c4$0$844$
> Super Michdenis, tes 3 lignes de codes fonctionnent à merveille, je v ais > les adapter à mes tables.
> Comme quoi, (malheureusement), on ne peut pas rire de tout !!!
> Encore merci.
> "michdenis" a écrit dans le message de news: > uX9vBx9% >> Par exemple fait un truc du genre avec la colonne K
>> Si tu as plus d'une colonne affublée de cette maladie >> tu peux répéter.
>> '----------------------------- >> Sub test() >> t = Range("K1:K56636").Formula >> Range("K1:K56636") = 1 >> Range("K1:K56636") = t >> End Sub >> '-----------------------------
>> Explication : Toutes les cellules bien qu'au format "standard" >> sont en fait probablement au format Texte..... Il n'y a rien dans >> tes cellules ....Et pour bien comprendre, tu prends une cellule, >> tu la mets au format texte, tu entres le chiffre 2 et ce dernier >> s'affiche à gauche de la cellule... maintenant met >> le format de cette cellule au format standard >> et le 2 va continuera à s'afficher à gauche.... Dès qu'elle >> aura passé au mode édition (double -clique ou en utilisant F2) >> là, elle s'affichera à droite comme une entrée numérique.
>> Ce n'est pas évident, mais c'est une autre chinoiserie d'excel. >> C'est le truc qui peut arriver lorsque le contenu provient d'une >> autre application... compte tenu que dans cette colonne tu avais >> déjà des entrées texte.
>> "Bruno RCSC" a écrit dans le message de news: >> 48a06e7a$0$876$ >> Merci à tous les 2 pour vos réponses.
>> Je pense avoir bien compris ce qui est demandé mais j'obtiens : >> "Excel ne trouve pas de données correspondantes à remplacer."
>> Je vous joins un exemple de mon fichier.
>>http://cjoint.com/?ilsVgPLPc7
>> Merci.
>> BH
lSteph
..il fallait avoir suivi un autre fil pour comprendre.
@+
Comme quoi, (malheureusement), on ne peut pas rire de tout !!!
Encore merci.
"michdenis" a écrit dans le message de news: uX9vBx9%
> Par exemple fait un truc du genre avec la colonne K
> Si tu as plus d'une colonne affublée de cette maladie > tu peux répéter.
> '----------------------------- > Sub test() > t = Range("K1:K56636").Formula > Range("K1:K56636") = 1 > Range("K1:K56636") = t > End Sub > '-----------------------------
> Explication : Toutes les cellules bien qu'au format "standard" > sont en fait probablement au format Texte..... Il n'y a rien dans > tes cellules ....Et pour bien comprendre, tu prends une cellule, > tu la mets au format texte, tu entres le chiffre 2 et ce dernier > s'affiche à gauche de la cellule... maintenant met > le format de cette cellule au format standard > et le 2 va continuera à s'afficher à gauche.... Dès qu'elle > aura passé au mode édition (double -clique ou en utilisant F2) > là, elle s'affichera à droite comme une entrée numérique.
> Ce n'est pas évident, mais c'est une autre chinoiserie d'excel. > C'est le truc qui peut arriver lorsque le contenu provient d'une > autre application... compte tenu que dans cette colonne tu avais > déjà des entrées texte.
> "Bruno RCSC" a écrit dans le message de news: > 48a06e7a$0$876$ > Merci à tous les 2 pour vos réponses.
> Je pense avoir bien compris ce qui est demandé mais j'obtiens : > "Excel ne trouve pas de données correspondantes à remplacer."
> Je vous joins un exemple de mon fichier.
>http://cjoint.com/?ilsVgPLPc7
> Merci.
> BH
..il fallait avoir suivi un autre fil pour comprendre.
@+
Comme quoi, (malheureusement), on ne peut pas rire de tout !!!
Encore merci.
"michdenis" <michde...@hotmail.com> a écrit dans le message de news:
uX9vBx9%23IHA.6...@TK2MSFTNGP04.phx.gbl...
> Par exemple fait un truc du genre avec la colonne K
> Si tu as plus d'une colonne affublée de cette maladie
> tu peux répéter.
> '-----------------------------
> Sub test()
> t = Range("K1:K56636").Formula
> Range("K1:K56636") = 1
> Range("K1:K56636") = t
> End Sub
> '-----------------------------
> Explication : Toutes les cellules bien qu'au format "standard"
> sont en fait probablement au format Texte..... Il n'y a rien dans
> tes cellules ....Et pour bien comprendre, tu prends une cellule,
> tu la mets au format texte, tu entres le chiffre 2 et ce dernier
> s'affiche à gauche de la cellule... maintenant met
> le format de cette cellule au format standard
> et le 2 va continuera à s'afficher à gauche.... Dès qu'elle
> aura passé au mode édition (double -clique ou en utilisant F2)
> là, elle s'affichera à droite comme une entrée numérique.
> Ce n'est pas évident, mais c'est une autre chinoiserie d'excel.
> C'est le truc qui peut arriver lorsque le contenu provient d'une
> autre application... compte tenu que dans cette colonne tu avais
> déjà des entrées texte.
> "Bruno RCSC" <ats....@wanadoo.fr> a écrit dans le message de news:
> 48a06e7a$0$876$ba4ac...@news.orange.fr...
> Merci à tous les 2 pour vos réponses.
> Je pense avoir bien compris ce qui est demandé mais j'obtiens :
> "Excel ne trouve pas de données correspondantes à remplacer."
..il fallait avoir suivi un autre fil pour comprendre.
@+
Comme quoi, (malheureusement), on ne peut pas rire de tout !!!
Encore merci.
"michdenis" a écrit dans le message de news: uX9vBx9%
> Par exemple fait un truc du genre avec la colonne K
> Si tu as plus d'une colonne affublée de cette maladie > tu peux répéter.
> '----------------------------- > Sub test() > t = Range("K1:K56636").Formula > Range("K1:K56636") = 1 > Range("K1:K56636") = t > End Sub > '-----------------------------
> Explication : Toutes les cellules bien qu'au format "standard" > sont en fait probablement au format Texte..... Il n'y a rien dans > tes cellules ....Et pour bien comprendre, tu prends une cellule, > tu la mets au format texte, tu entres le chiffre 2 et ce dernier > s'affiche à gauche de la cellule... maintenant met > le format de cette cellule au format standard > et le 2 va continuera à s'afficher à gauche.... Dès qu'elle > aura passé au mode édition (double -clique ou en utilisant F2) > là, elle s'affichera à droite comme une entrée numérique.
> Ce n'est pas évident, mais c'est une autre chinoiserie d'excel. > C'est le truc qui peut arriver lorsque le contenu provient d'une > autre application... compte tenu que dans cette colonne tu avais > déjà des entrées texte.
> "Bruno RCSC" a écrit dans le message de news: > 48a06e7a$0$876$ > Merci à tous les 2 pour vos réponses.
> Je pense avoir bien compris ce qui est demandé mais j'obtiens : > "Excel ne trouve pas de données correspondantes à remplacer."
