br44
XLDnaute Impliqué
Bonjour le forum ,
Ce petit message pour savoir si il existe une procèdure vba pour copier une feuille sous les coditions suivantes :
1) Copier la feuille "T4" que si la première cellule ("A1")est pleine ,
si non pas de copie .
2) Dans le cas où la rèponse serais "oui" alors copier toutes la plage allant de la colonne A à G est toutes les lignes jusqu'à la première cellule vide en partant du bas .
Sachant que la copie qui devras se faire sera au minimum de 50 lignes .
J'ai une petite base pour infos si cela peut aider :
'J'envois les information vers le classeur "A.xls
Wb2.Sheets("T4").Range("1:50").Copy Destination:=Wb1.Sheets(Mois) _
.Range("A65536").End(xlUp)
' Range ("1:50") ètant pour le cas que j'ai qu'une seul copie à faire .
Espèrant avoir ètait claire dans ma demande et vous remerciant par avance de l'aide que vous donnerez je vous dis à plus sur ce nouveau poste .
amicalement BR44
Ce petit message pour savoir si il existe une procèdure vba pour copier une feuille sous les coditions suivantes :
1) Copier la feuille "T4" que si la première cellule ("A1")est pleine ,
si non pas de copie .
2) Dans le cas où la rèponse serais "oui" alors copier toutes la plage allant de la colonne A à G est toutes les lignes jusqu'à la première cellule vide en partant du bas .
Sachant que la copie qui devras se faire sera au minimum de 50 lignes .
J'ai une petite base pour infos si cela peut aider :
'J'envois les information vers le classeur "A.xls
Wb2.Sheets("T4").Range("1:50").Copy Destination:=Wb1.Sheets(Mois) _
.Range("A65536").End(xlUp)
' Range ("1:50") ètant pour le cas que j'ai qu'une seul copie à faire .
Espèrant avoir ètait claire dans ma demande et vous remerciant par avance de l'aide que vous donnerez je vous dis à plus sur ce nouveau poste .
amicalement BR44