aide en vba excel

[nat0911]

Bonjour a tous,

Je viens vers vous car je debute sous excel/ vba.
j'explique ce que je veux faire :
j'ai une page qui contient un tableau avec deux colonnes.
premiere colonne valeur non numerique et deuxieme colonne une valeur numerique
moi je souhaite faire un tri, si la ligne est vide supprimer la ligne ensuite si une cellule de la colonne deux ne comporte pas une valeur numerique couper la ligne dans une autre feuille nommé rejet1.
ensuite si une cellule de la colonne 2 ne comporte pas 7 chiffres couper la ligne dans une autre feuille nommé rejet2.

j'avais commencé ça :
Private Sub mat_Click()
Sheets("SOURCES").Select

LigneFeuille2 = 1

NbLignes = 10
For i = 1 To NbLignes

If IsNumeric(Cells(i, 2)) = True Then
If Len(Cells(i, 2)) <> "6" Then
Cells(i, 2).EntireRow.Cut
Sheets("REJET2").Select
Cells(LigneFeuille2, 1).EntireRow.Select
ActiveSheet.Paste
Sheets("Feuil1").Select
LigneFeuille2 = LigneFeuille2 + 1
NbLignes = NbLignes - 1
End If
Else
Cells(i, 2).EntireRow.Cut
Sheets("REJET1").Select
Cells(LigneFeuille2, 1).EntireRow.Select
ActiveSheet.Paste
Sheets("Feuil1").Select
LigneFeuille2 = LigneFeuille2 + 1
NbLignes = NbLignes - 1
End If

Next i

End Sub


Pouvez vous m'aider. Merci d'avance

 

[Excel-lent]

Re : aide en vba excel

Bonjour et bienvenu sur le forum Nat0911,

si la ligne est vide supprimer la ligne

If Application.WorksheetFunction.CountBlank(Range(Cells(NuméroDeLaLigne, 1), Cells(NuméroDeLaLigne, 256))) = 256 Then
  Rows(8).Delete
End If

J'ai mis 256, car sur ma version d'Excel (2003), une ligne comporte 256 colonnes, si tu as une version comportant plus ou moins de colonne, il te suffit de remplacer 256 par le nombre adéquat 😉

NuméroDeLaLigne -> variable dans laquelle tu mettras le numéro de ta ligne à analyser!

Bon Dimanche à toi

PS. : si la prochaine fois tu pouvais mettre un extrait de ton fichier, ce serait mieux 😉
Car dans le même temps, au lieu de te donner une réponse partiel, j'aurais pu répondre à toutes tes questions, inclure ma réponse dans ton fichier, tout en te donnant une réponse plus personnalisé

 

[nat0911]

Re : aide en vba excel

Merci pour ta réponse, je te montre ma structure de mon fichier excel.
Je débute en vba, donc je n'ai pas encore comencé le code.

Tu me dis si c'est realisable.

Merci