Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Traduction en visual basic pour excel

Traduction en visual basic pour excel

4 réponses
Avatar
marsupile
Bonjour,

Je souhaite construire une macro qui ferait ceci :

une boucle qui regarderai dans les celules de la colonne N s'il y a YES et
si c'est le cas elle detruirai la ligne où il y a YES.

Je debute en visual basic et je ne sais pas comment procéder.

Pourriez vous l'aider?

Merci

--


marsuboy@numericable.fr
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
C'est une grande classique:

sub selective_delete

dim i as long

for i = [N65534].end(3).row to 1 step -1




-----Message d'origine-----
Bonjour,

Je souhaite construire une macro qui ferait ceci :

une boucle qui regarderai dans les celules de la colonne
N s'il y a YES et

si c'est le cas elle detruirai la ligne où il y a YES.

Je debute en visual basic et je ne sais pas comment
procéder.


Pourriez vous l'aider?

Merci

--





.



Avatar
Chris MICHEL
Désolé pour le bug!

Je disais donc:

sub selective_delete()

dim i as long

for i = [N65534].end(3).row to 1 step -1
if range ("N" & i).value= "YES" then rows(i).delete
next

end sub

Chris.


-----Message d'origine-----
Bonjour,

Je souhaite construire une macro qui ferait ceci :

une boucle qui regarderai dans les celules de la colonne
N s'il y a YES et

si c'est le cas elle detruirai la ligne où il y a YES.

Je debute en visual basic et je ne sais pas comment
procéder.


Pourriez vous l'aider?

Merci

--





.



Avatar
ChrisV
Bonjour marsupile,

Sub suppr_YES()
Dim i As Double
Application.ScreenUpdating = False
For i = [N65536].End(xlUp).Row To 1 Step -1
If Cells(i, "N") Like "YES" Then Rows(i).Delete
Next i
End Sub


ChrisV


"marsupile" a écrit dans le message de news:
402773ce$0$28757$
Bonjour,

Je souhaite construire une macro qui ferait ceci :

une boucle qui regarderai dans les celules de la colonne N s'il y a YES et
si c'est le cas elle detruirai la ligne où il y a YES.

Je debute en visual basic et je ne sais pas comment procéder.

Pourriez vous l'aider?

Merci

--







Avatar
ChrisV
Oups... petite coquille
Dim i as Long oeuf corse


ChrisV


"ChrisV" a écrit dans le message de news:

Bonjour marsupile,

Sub suppr_YES()
Dim i As Double
Application.ScreenUpdating = False
For i = [N65536].End(xlUp).Row To 1 Step -1
If Cells(i, "N") Like "YES" Then Rows(i).Delete
Next i
End Sub


ChrisV


"marsupile" a écrit dans le message de news:
402773ce$0$28757$
Bonjour,

Je souhaite construire une macro qui ferait ceci :

une boucle qui regarderai dans les celules de la colonne N s'il y a YES
et


si c'est le cas elle detruirai la ligne où il y a YES.

Je debute en visual basic et je ne sais pas comment procéder.

Pourriez vous l'aider?

Merci

--