Ligne Macro pour supprimer cellule contenant #DIV/0!

[heislsim]

Bonjour tout le monde,

Je suis presque au bout de mes macros. J'ai des cellules préprogrammé avec des formules mais mon nombre de ligne varie à chaque fois et pour cause de graphique (je vous passe les détails) il faudrait simplement que je supprime toutes les cellules où est affichées "#DIV/0!" dedans. Dans le fichier par exemple, supprimer tous ceux de la colonne F par exemple.

j'ai tenté de bricole en créant une nouvelle colonne en faisant un coller spécial uniquement des valeurs (et non pas formule) mais marche pas ... :-(

 

[Gurgeh]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Salut heislsim,

Justement, ce serait pas mal que tu nous donnes un peu de détail, notamment pourquoi tu veux les supprimer.

S'il s'agit d'adapter la plage qui sert de support à ton graphique, il y a plus simple que de supprimer les cellules en erreur, on peut simplement construire le graphique sur une plage nommée, et définir cette plage nommée en fonction de la présence ou non d'erreurs...

Mais pour aller plus loin, il faudrait que tu nous expliques pourquoi tu veux supprimer ces #DIV0.

Gurgeh

 

[heislsim]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Ok, je vais faire une explication clair. Serait-il juste possible de savoir comment on fait pour faire une présentation des codes comme je le vois dans certain poste à savoir :

Code :
et la un cadre avec le code

C'est pour faire propre

 

[Modeste geedee]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Bonsour®
en F27 :

=SIERREUR(MOYENNE(B24:B30);"")

en G27 :

=SIERREUR(MOYENNE(C24:C30);"")

en H27 :

=SIERREUR(F27-$F$27;"")

en I27 :

=SIERREUR(G27-$G$27;"")

recopier vers le bas autant que nécessaire...

Code :
et la un cadre avec le code
C'est pour faire propre

voir là :


exemple :
[NOPARSE]

le code
Bla bla bla
...
Bla bla bla

[/NOPARSE]

 

[heislsim]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Merci beaucoup

Après vos remarques, j'ai changé le la façon de faire la macro.

L'objectif est de sélectionner une plage de cellule pour un graphique. Sauf qu'il ne faut pas que je fige les cellules à sélectionner (comme dans le code ci dessous ou ça va d'office jusqu'à 150) car visuellement ça me relie le dernier et premier point de mon graphique (le problème venait pas des #DIV/0!).
Est-il donc possible de dire de sélectionner AA4 jusqu'à la dernière cellule de la colonne active (ou remplie, je ne sais pas le bon terme). Et je suppose que pour AB ça sera le même code avec juste les lettres à changer.

Attention : ce code ne correspond plus avec le ficher exemple. Si vous en voulez un autre je peux uper ça

Sub TEST()
    Sheets("Sujet RE").Select
    ActiveSheet.ChartObjects("Graphique 4").Activate
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(3).Name = "=""Retour"""
    ActiveChart.SeriesCollection(3).XValues = "='Hysteresis RE'!$AA$4:$AA$150"
    ActiveChart.SeriesCollection(3).Values = "='Hysteresis RE'!$AB$4:$AB$150"
End Sub

 

[Gurgeh]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Salut à tous,

Tu peux trouver la dernière colonne utilisée d'une ligne avec ce code (exemple pour la Feuil1 et la ligne 8)

DernièreColonneEnregistrements = Sheets("Feuil1").Rows(8).Find("*", , , , , xlPrevious).Column

Gurgeh

 

[heislsim]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Merci mais je ne cherche pas à trouver la dernière ligne de ma colonne (et pas la dernière colonne de ma ligne) mais à programmer dans un macro de chercher par exemple les "Xvalues" de la cellule AA4 jusqu'à la dernière cellule (remplie) de la colonne AA

ActiveChart.SeriesCollection(3).XValues = "='Exemple'!$AA$4:$AA$150"

Je vous joins le fichier avec les données (j'ai masqué les données brutes qui servent pour les formules, inutile).
Le nombre de ligne est variable (ça ne s'arrêtera pas toujours à la ligne 82 pour l'Aller et 41 pour le Retour).

Merci d'avance pour votre patience

 

[Gurgeh]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Euh oui, tiens, j'avais pas bien lu.

Du coup voici le code pour trouver la dernière ligne remplie d'une colonne

DernièreLigne = Sheets("Feuil1").Columns(8).Find("*", , , , , xlPrevious).row

Mais sinon y'a plus simple que la macro pour faire ton graphique. Si j'ai bien compris, ton problème est que les #DIV0 perturbent l'affichage par des points parasites. Du coup tu peux utiliser une détection d'erreur, et renvoyer la valeur #NA au lieu de #DIV0, car #NA a le bon goût de ne pas être pris en compte dans les graphiques.

Voir exemple dans le fichier joint.

Gurgeh

 

[heislsim]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Je pensais que c'était simplement les #DIV0 ( ou les #NA ) qui posaient erreur. En effet, quand j'enregistrais (avec l'enregistreur) le macro je cliquais sur ma cellule du haut puis Ctrl + MAJ + flèche de bas et théoriquement ça fait " sélectionner jusqu'à la fin de ma colonne" MAIS ça ne le fait pas dans la sélection de plage de donnée pour un graphique DONC c'est cette partie que je cherche le macro :'(

 

[Gurgeh]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Euh, je dois avouer que j'ai pas bien compris ta réponse.
La solution avec les #NA qui ne perturbent plus le graphique ne te convient pas ?

Gurgeh

 

[heislsim]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Elle ne change pas mon problème en faite. Même si je supprime manuellement toutes les données #DIV0 ou #NA pour avoir des cellules vident après mes valeurs mon problème est comment dire à ma sélection de s'arrêter une fois à la ligne 50 (par exemple) et une autre fois 58 car une fois j'avais des données jusqu'à 50 et l'autre fois jusqu'à 58.

 

[Gurgeh]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Si j'ai bien compris, tu voulais effacer les lignes pour que les lignes vides ne viennent pas perturber ton graphique si tu mettais une plage fixe (par exemple jusqu'à 150). Mais peut être ce n'était pas ça ?

gurgeh

 

[heislsim]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Re Gurgeh,

J'ai quand même voulu tester avec les #NA et ça règle effectivement le problème
Big sorry d'avoir compliqué les choses alors que la solution était là dès le début ...

 

[Gurgeh]

Re : Ligne Macro pour supprimer cellule contenant #DIV/0!

Hey, le principal c'est que ça marche !

Gurgeh