Supprimer les lignes d'un tableau en fonction d'une valeur [Résolu]

Question

Posez votre question Signaler

Supprimer les lignes d'un tableau en fonction d'une valeur [Résolu]

cs_sbkl 2 Messages postés vendredi 26 décembre 2008Date d'inscription 7 janvier 2009 Dernière intervention - 6 janv. 2009 à 15:44 - Dernière réponse : cs_sbkl 2 Messages postés vendredi 26 décembre 2008Date d'inscription 7 janvier 2009 Dernière intervention

- 7 janv. 2009 à 10:45

VB.NET Posez votre question Signaler

Bonjour à tous,

Je cherche à insérer dans un bouton d'une userform une fonctionnalité permettant de supprimer les lignes d'un tableau en fonction d'une valeur donnée présente dans la colonne A par exemple

J'ai trouvé sur un site le code suivant qui permet de supprimer toutes les lignes ayant la valeur 399 dans la cellule A.

Je souhaite remplacer la valeur 399 (ligne ddr=Array(399)) par le nom d'un textbox ou d'un combobox qui permettrait de choisir la valeur . ex : ddr = Userform1.Textbox1.value

Mais il y a incompatibilité de type avec la fonction UBound...

Avez-vous une idée pour résoudre cette problèmatique ?

Merci d'avance pour votre aide.

Sub clear()

Dim ddr As Variant

ddr = Array(399)

i = UBound(ddr)

For j = 0 To i

With Worksheets(1).Range("a:a" )

Set c = .Find(ddr(j), LookIn:=xlValues)

If Not c Is Nothing Then

Do

rr = c.Row

Range("A" & rr & ":A" & rr).Select

Selection.EntireRow.Select

Selection.Delete

Set c = .Find(ddr(j), LookIn:=xlValues)

Loop While Not c Is Nothing

End If

End With

Next j

End Sub

Afficher la suite

Votre réponse

Répondre au sujet

2 réponses

Signaler Commenter la réponse de cs_sbkl

cs_sbkl 2 Messages postés vendredi 26 décembre 2008Date d'inscription 7 janvier 2009 Dernière intervention - 7 janv. 2009 à 10:45

0

Merci

Bonjour Supra3000,

Merci pour ta réponse.

Pour préciser ma problématique.

J'ai un tableau avec différentes colonnes qui contiennent des informations sur des projets dans le nom se trouve en colonne G.

Je voudrais créer un userform avec un textbox ou un combobox dans lequel on précise le nom du projet à supprimer.

Et créer un bouton dont le code permettrait d'aller supprimer toutes les lignes qui ont en colonne G le nom du projet présent dans le textbox.

Le code ci-dessus est similaire à ce que je souhaite réaliser à la différence que la valeur à supprimer est dans le code.

Je souhaite avoir la possibilité de saisir la valeur à supprimer dans un textbox via un userform.

Merci d'avance pour ta réponse.

sbkl

Votre réponse

Répondre au sujet

Posez votre question

Accepted Answer

3

Merci

Pour utiliser la fonction Ubound (met le texte en majuscule), ton champs doit être de type String.

Si ton champs contient un Integer, Date, etc.. Tu vas avoir une incompatibilité de type.

Merci Supra3000 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 124 internautes ce mois-ci

Supprimer les lignes d'un tableau en fonction d'une valeur [Résolu]

Votre réponse

Votre réponse

Votre réponse

Vous n'êtes pas encore membre ? inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !