Delete les lignes.

3 réponses
Avatar
Jacquouille
Bonjour

L'aide VBA me suggère ceci pour supprimer la ligne 20:
Rows("20:20").Delete

Commentpuis-je remplacer le 20 par une variable?
J'ai essayé ceci:
Rows("bb:bb").Delete
Rows(bb:bb).Delete

Mais ça va pô. j'aimerais supprimer deux lignes consécutives, à savoir la 20
et 21.....

En vous remerciant déjà, je vous souhaite une bonne fin de journée.

Jacques.

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."


---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce que la protection avast! Antivirus est active.
http://www.avast.com

3 réponses

Avatar
Jacky
Hello,
Commentpuis-je remplacer le 20 par une variable?



Par exemple
'----------------
Sub jj()
Dim LaLigne As Long
LaLigne = 20
Rows(LaLigne & ":" & LaLigne + 1).Delete
End Sub
'------------------
--
Salutations
JJ


"Jacquouille" a écrit dans le message de news: lt78lj$ib0$
Bonjour

L'aide VBA me suggère ceci pour supprimer la ligne 20:
Rows("20:20").Delete

Commentpuis-je remplacer le 20 par une variable?
J'ai essayé ceci:
Rows("bb:bb").Delete
Rows(bb:bb).Delete

Mais ça va pô. j'aimerais supprimer deux lignes consécutives, à savoir la 20 et 21.....

En vous remerciant déjà, je vous souhaite une bonne fin de journée.

Jacques.

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."

---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce que la protection avast!
Antivirus est active.
http://www.avast.com

Avatar
MichD
Bonjour,

'-----------------------------------
Sub test()
Dim A As Long

A = 5

With Worksheets("Feuil1")
.Rows(A).Delete
End With
End Sub
'-----------------------------------
Avatar
Jacquouille
Grand merci à vous deux.
Le résultat est dans le fil " Formule"
Bonne fin de journée
Jacques.


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"Jacquouille" a écrit dans le message de groupe de discussion :
lt78lj$ib0$

Bonjour

L'aide VBA me suggère ceci pour supprimer la ligne 20:
Rows("20:20").Delete

Commentpuis-je remplacer le 20 par une variable?
J'ai essayé ceci:
Rows("bb:bb").Delete
Rows(bb:bb).Delete

Mais ça va pô. j'aimerais supprimer deux lignes consécutives, à savoir la 20
et 21.....

En vous remerciant déjà, je vous souhaite une bonne fin de journée.

Jacques.

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."


---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant
parce que la protection avast! Antivirus est active.
http://www.avast.com


---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce que la protection avast! Antivirus est active.
http://www.avast.com