Effacer des lignes (Win7 Excel 2010)
Aulane
Messages postés
84
Date d'inscription
Statut
Membre
Dernière intervention
-
Aulane Messages postés 84 Date d'inscription Statut Membre Dernière intervention -
Aulane Messages postés 84 Date d'inscription Statut Membre Dernière intervention -
bonjour, je souhaite effacer un certain nombre de lignes sous Excel 2010 à l'aide par exemple d'une formule du genre "SI(la cellule(X=un nombre donné);effacer les lignes du tableau présent, de la cellule (Mn à la cellule(Zn);sinon ne rien faire".
Quelqu'un peut-il m'aider à trouver sans passer par VBA mais peut-être au moyen d'une macros?.
Merci d'avance
cordialement
aulane
--
aulane
Quelqu'un peut-il m'aider à trouver sans passer par VBA mais peut-être au moyen d'une macros?.
Merci d'avance
cordialement
aulane
--
aulane
2 réponses
-
Bonjour,
Quelqu'un peut-il m'aider à trouver sans passer par VBA mais peut-être au moyen d'une macros?.
Macro = VBASub deleteLigne() n = 10 If Range("A1") = "toto" Then Range(Cells(n, "m"), Cells(n, "z")).delete End If End Sub
-
-
Bonjour,
une bonne explication de ta formule me serait bien utile,
Ce n'est pas une formule mais une MACRO ( du code VBA donc. )
Voici le code commenté :'Numéro de ligne n = 10 'Si la cellule A1 = "la valeur cherchée" ..(pour l'exemple.. j'ai mis "toto" ) Alors If Range("A1") = "toto" Then ' Plage de Cellules ligne n (qui vaut donc 10) de la colonne M à la colonne Z => Suppression Range(Cells(n, "m"), Cells(n, "z")).delete End If
A toi de l'adapter pour correspondre ensuite à tes besoins.
Cordialement,
Jordane.
-
-
Bonjour jordane,
Peut-être as-tu reçu déjà un message que j'ai perdu en cours de route avant de l'avoir terminé, je vais essayer de le reconstituer.
Je t'envoie 2 fichiers 1 sur lequel je travaille (objet de ce mail) sous Excel 2010 et Win7 et l'autre sous PDF pour montrer mon fichier personnel pour une période de 5 semaines entre 2 cures de 4 jours et qui bien sûr ne comporte pas de lignes d'identification entre autres.
Ce fichier a séduit mon toubib au cours consultation de routine et il m'a demandé si je voulais bien lui permettre d'en bidouiller un exemplaire pour suivre ses patients. Accord bien entendu avec un bémol la moindre fausse manoeuvre pouvant le rendre inutilisable je lui ai proposé de lui en fournir une (gratuitement bien sûr) adéquate programmable par patient et modulable dans la durée du traitement. Voilà pourquoi je m'empoisonne la vie aves ce temps d'utilisation. De plus avec toutes ces péripéties (une bactérie fin août a bien failli arrêter définitivement mes ambitions) je crois bien que mes neurones en ont pris un coup cette fois ! Bref tant qu'il y a de la vie il y a de l'espoir !
Donc pour en revenir à mon fichier :- La première cellule de la première ligne du tableau est A14 et dernière H43
- Dans la cellule H9 le nombre rentré correspond à la durée du traitement
- Pour adapter le tableau à cette durée il faut donc supprimer les lignes en partant de la cellule A14 + H9 c'est-à-dire dans cet exemple de 10 jour A24 à H43
- Remonter partiellement les lignes restantes sous la nouvelle position de la dernière ligne du tableau
- Cette macro sera attribuée au bouton OK qui replacera le curseur sur la cellule du premier critère à savoir : R13
- Le graphique suivre automatiquement la modification apportée à la BDD mais si il y a erreur dans la cellule H9 après avoir cliqué sur OK il faudra cliquer sur le bouton REFAIRE qui retournera chercher le fichier dans le dossier MODÈLE et recommencer l'opération précédente (d'où l'intérêt de formater en premier la durée du traitement
aulane
http://www.cjoint.com/c/EIxjvjZ2Ptu
http://www.cjoint.com/c/EIxjxlHUAwu
