suppression d'une ligne dans 2 feuilles [Forums - Espace Débutants] : myDearFriend! Excel Pages

suppression d'une ligne dans 2 feuilles		#1
kelly Régulier XLPages Inscription: 05/11/2008 Messages: 53 Système d'exploitation: PC Version Excel utilisée: 2003	Posté le : 27-03-2010 18h59 Bonjour, J'ai actuellement un fichier avec 2 feuilles. Dans les deux feuilles, la première colonne (à partir de la ligne 3) correspond à des numéros (EX : 4250). A l'aide d'un bouton, en sélectionnant "4250", je souhaiterais que la ligne correspondante soit supprimée à la fois dans la feuille 1 et la feuille 2. Comment faire ? Merci d'avance.

Re: suppression d'une ligne dans 2 feuilles		#2
myDearFriend! Webmestre Inscription: 18/05/2006 De Saône-et-Loire (71) Messages: 1539 Système d'exploitation: PC Version Excel utilisée: 97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365	Posté le : 27-03-2010 21h36 Bonsoir Kelly, le Forum, Citation : kelly a écrit : J'ai actuellement un fichier avec 2 feuilles. Dans les deux feuilles, la première colonne (à partir de la ligne 3) correspond à des numéros (EX : 4250). A l'aide d'un bouton, en sélectionnant "4250", je souhaiterais que la ligne correspondante soit supprimée à la fois dans la feuille 1 et la feuille 2. Quand tu dis "la ligne correspondante" sur l'autre feuille, cela signifie quoi exactement ? Une ligne avec la même valeur 4250 en colonne 1 ? Une ligne se situant au même index (numéro de ligne) ? Y a t'il possibilité que cette valeur 4250 apparaisse plusieurs fois dans les feuilles ? Un petit exemple en pièce jointe serait le bienvenu... Cordialement, Didier_mDF Le Webmaster La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien

Re: suppression d'une ligne dans 2 feuilles		#3
kelly Régulier XLPages Inscription: 05/11/2008 Messages: 53 Système d'exploitation: PC Version Excel utilisée: 2003	Posté le : 28-03-2010 14h03 Bonjour, Oui effectivement il s'agit d'une ligne avec la meme valeur en colonne 1 se situant au même index. Par contre, cette valeur apparait qu'une fois dans les feuilles. Je joins un exemple simplifié de mon tableau. Je vous remercie par avance. Cordialement. Pièce jointe: Exemple tableau.xls [ Taille: 16.50 Ko - Téléchargements: 612 ]

Re: suppression d'une ligne dans 2 feuilles		#4
myDearFriend! Webmestre Inscription: 18/05/2006 De Saône-et-Loire (71) Messages: 1539 Système d'exploitation: PC Version Excel utilisée: 97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365	Posté le : 28-03-2010 15h07 Bonjour Kelly, le Forum, Du coup, je pense que je cherchais la complication inutilement Tu peux essayer en copiant la procédure suivante dans un module de code Standard (ex: Module1) et en la liant à ton bouton : `Sub SupprLigne() ' myDearFriend! - www.mdf-xlpages.com Dim L& L = Selection.Row If L > 2 Then Sheets("Feuil1").Cells(L, 1).EntireRow.Delete Sheets("Feuil2").Cells(L, 1).EntireRow.Delete End If End Sub` Voir pièce jointe en retour. Cordialement, Pièce jointe: Kelly Exemple tableau.zip [ Taille: 6.71 Ko - Téléchargements: 668 ] Didier_mDF Le Webmaster La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien

Re: suppression d'une ligne dans 2 feuilles		#5
kelly Régulier XLPages Inscription: 05/11/2008 Messages: 53 Système d'exploitation: PC Version Excel utilisée: 2003	Posté le : 28-03-2010 16h27 Re bonjour, C'est à peu près ce que je souhaite. Cependant, je voudrais pouvoir sélectionner le numéro. C'est à dire pouvoir entrer le n° que je veux supprimer (4250 par exemple) dans un userform et après validation qu'il me le supprime à la fois dans la feuille 1 et dans la feuille2. Merci d'avance.

Re: suppression d'une ligne dans 2 feuilles		#6
myDearFriend! Webmestre Inscription: 18/05/2006 De Saône-et-Loire (71) Messages: 1539 Système d'exploitation: PC Version Excel utilisée: 97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365	Posté le : 28-03-2010 17h26 Re, Arf, je me doutais bien qu'il y avait une subtilité cachée... Cela dit, je tente quand même de ne pas alourdir inutilement ton projet et te propose une InputBox bien suffisante pour les détails que tu veux bien nous donner, en lieu et place d'un Userform... Option Explicit Sub SupprLigne() ' myDearFriend! - www.mdf-xlpages.com Dim R As Range Dim L& L = Application.InputBox("Suppression de la ligne :", "Suppression", , , , , , 1) If L > 0 Then With Sheets("Feuil1") Set R = .Columns(1).Find(L, LookIn:=xlValues) If Not R Is Nothing Then Sheets("Feuil2").Rows(R.Row).Delete R.EntireRow.Delete End If End With End If End Sub Voir pièce jointe. Cordialement, Pièce jointe: Kelly Exemple tableau.zip [ Taille: 7.17 Ko - Téléchargements: 776 ] Didier_mDF Le Webmaster La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien

Re: suppression d'une ligne dans 2 feuilles		#7
kelly Régulier XLPages Inscription: 05/11/2008 Messages: 53 Système d'exploitation: PC Version Excel utilisée: 2003	Posté le : 28-03-2010 18h11 Re, Merci infiniment ! C'est exactement ce que je voulais ! Vous êtes formidable ! Cordialement.

Vous pouvez voir les sujets.

Vous ne pouvez pas débuter de nouveaux sujets.

Vous ne pouvez pas répondre aux contributions.

Vous ne pouvez pas éditer vos contributions.

Vous ne pouvez pas effacez vos contributions.

Vous ne pouvez pas ajouter de nouveaux sondages.

Vous ne pouvez pas voter en sondage.

Vous ne pouvez pas attacher des fichiers à vos contributions.

Vous ne pouvez pas poster sans approbation.

Qui consulte actuellement ce sujet ? 1 Utilisateur(s) anonymes