Supprimer des lignes en fonction des valeurs d'une colonne
Résolu
maxime 25
Messages postés
20
Statut
Membre
-
CCD -
CCD -
Bonjour,
Je récupère les données de pointage des salariés de mon entreprise sur un fichier texte.
J'ai un module commandé depuis Access qui me permet de l'ouvrir sur excel, de supprimer les colonnes inutiles, de renommer les colonnes que je conserve et de l'importer pour accrémenter un table de ma base.
J'aimerai réaliser un tri des enregistrements dans ce module avant de supprimer les colonnes.
J'ai une colonne "Comment." qui peut contenir une multitude de critères. Lorsqu'un critère apparait dans cette colonne, c'est que les données ont été modifiées via le logiciel de gestion et qu'elles ne correspondent pas à de véritable pointage des salariés. Je voudrai donc créer un code qui me permet de supprimer toutes les lignes pour lesquelles cette colonnes comprend une valeur. (la colonne se trouve en "S".
Merci d'avance.
Maxime
Je récupère les données de pointage des salariés de mon entreprise sur un fichier texte.
J'ai un module commandé depuis Access qui me permet de l'ouvrir sur excel, de supprimer les colonnes inutiles, de renommer les colonnes que je conserve et de l'importer pour accrémenter un table de ma base.
J'aimerai réaliser un tri des enregistrements dans ce module avant de supprimer les colonnes.
J'ai une colonne "Comment." qui peut contenir une multitude de critères. Lorsqu'un critère apparait dans cette colonne, c'est que les données ont été modifiées via le logiciel de gestion et qu'elles ne correspondent pas à de véritable pointage des salariés. Je voudrai donc créer un code qui me permet de supprimer toutes les lignes pour lesquelles cette colonnes comprend une valeur. (la colonne se trouve en "S".
Merci d'avance.
Maxime
A voir également:
- Vba supprimer des lignes en fonction d'une valeur
- Supprimer rond bleu whatsapp - Guide
- Supprimer une page word - Guide
- Fonction si et - Guide
- Partager des photos en ligne - Guide
- Comment supprimer une application préinstallée sur android - Guide
3 réponses
Bonjour,
voici la macro :
sub suppressionlignes ()
i=2 'commence à la ligne 2 de ton tableau
do while cells(i,1) <> "" 'la boucle agira tant que la cellule de la ligne i et colonne 1 contient une valeur, il faut que tu es une colonne ou y a toujours une valeur, si c'est pas la 1 mets le chiffre correspondant à la colonne ou y a toujours une valeur
if cells(i,19)<> "" 'si la cellule de la ligne i colonne 19 (S) contient une valeur
Rows(i).Delete Shift:=xlUp 'on supprime la ligne
else 'sinon
i=i+1 'on passe à la ligne suivante
end if
loop
end sub
voici la macro :
sub suppressionlignes ()
i=2 'commence à la ligne 2 de ton tableau
do while cells(i,1) <> "" 'la boucle agira tant que la cellule de la ligne i et colonne 1 contient une valeur, il faut que tu es une colonne ou y a toujours une valeur, si c'est pas la 1 mets le chiffre correspondant à la colonne ou y a toujours une valeur
if cells(i,19)<> "" 'si la cellule de la ligne i colonne 19 (S) contient une valeur
Rows(i).Delete Shift:=xlUp 'on supprime la ligne
else 'sinon
i=i+1 'on passe à la ligne suivante
end if
loop
end sub
CCD
trés utile merci