Limiter l'export .csv aux lignes remplies

Bonjour Scraper. Détrompe-toi, je ne "tiens" pas ce fil. Le problème c'est que ça n'intéresse pas grand monde de travailler le doigt mouillé en l'air et de proposer des modifs en fonction du vent et toujours sans voir cette p... de "Feuil3" qui doit être pleine d'adresses de nanas pour qu'on nous la cache jusqu'au bout.

Dernier essai avant jet de l'éponge :

Autant pour moi Optimix, je pensais que tu avais vu mon fichier.
Je le repost en version simplifié, avec seulement la partie utile a l'heure actuelle.

J'aurai bien aimé qu'il soit rempli d'adresses de nanas, j'aurai pu partager mais malheureusement on est plus sur de la commande

Je comprend le jet d'éponge, merci beaucoup d'avoir passé du temps sur mon problème

J'ai re-tester ton code mais malheureusement il ne fonctionne pas, j'ai mis une photo de ce que ça donne sur la gauche, le but sur la droite.

Pas très académique je pense, mais j'ai bricolé ça :

Sub test()

Dim MaPlage As Range
Dim i As Integer
i = ActiveSheet.Range("H10").Value
Set MaPlage = Feuil3.Range("G13:G" & 12 + i)

MaPlage.Copy

Sheets("commande-csv").Select
Range("G2").Select
ActiveSheet.Paste

End Sub

Avec H10 = mon nombre de ligne écrite
MaPlage = la plage a copier
G2 = la destination

Je vais essayer de "purifier" ça, en enlevant la partie Select sur la fin..

Ca sera peut être la méthode la plus "simple"

Merci pour votre support en tout cas