VB :'Comment faire pour ne sélecctionner que les cellules ABCDFGF de la ligne activée

Pierrot93

XLDnaute Barbatruc

• 22 Décembre 2011

• #2

Re : VB :'Comment faire pour ne sélecctionner que les cellules ABCDFGF de la ligne ac

Bonjour,

perso pas de problème avec tes 2 lignes en rouge.. ou alors quelque chose doit m'échapper..

bon après midi
@+

 

Vote positif 0 Vote négatif

L

lmylvc

XLDnaute Occasionnel

• 22 Décembre 2011

• #3

Re : VB :'Comment faire pour ne sélecctionner que les cellules ABCDFGF de la ligne ac

Hello Pierrot93
Je n'ai pas de pb avec le code actuel, simplement je voudrais pouvoir
le faire évoluer afin de sélectionner les cellules A?B.C.D.F.G de la ligne activée.

Voilà !
Aussi je relance ma demande d'aide.

Merci

Vincent

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 22 Décembre 2011

• #4

Re : VB :'Comment faire pour ne sélecctionner que les cellules ABCDFGF de la ligne ac

bonjour

evoluer dans ce sens ?

Code:

Sub test()
Range("A140:D140,F140:G140").Copy Sheets("Feuil2").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
End Sub

😕

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 22 Décembre 2011

• #5

Re : VB :'Comment faire pour ne sélecctionner que les cellules ABCDFGF de la ligne ac

Re,

Aarf, désolé je n'avais point compris... essayce ceci :

Code:

Range("A" & ActiveCell.Row & ":D" & ActiveCell.Row & _
    ",F" & ActiveCell.Row & ":G" & ActiveCell.Row).Select
Selection.Copy

Edition : bonjour Gilbert

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 22 Décembre 2011

• #6

Re : VB :'Comment faire pour ne sélecctionner que les cellules ABCDFGF de la ligne ac

ou alors comme ceci

Code:

Sub test()
derl = Range("a65536").End(xlUp).Row
Range("A" & derl & ":D" & derl & ",F" & derl & ":G" & derl).Copy Sheets("Feuil2").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
End Sub

Edit bonjour Pierrot

😕 🙄

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 22 Décembre 2011

• #7

Re : VB :'Comment faire pour ne sélecctionner que les cellules ABCDFGF de la ligne ac

Re,

A noter que l'on pourrait le faire en une seule instruction :

Code:

Range("A" & ActiveCell.Row & ":D" & ActiveCell.Row & _
    ",F" & ActiveCell.Row & ":G" & ActiveCell.Row).Copy _
    Destination:=Sheets("Feuil2").Cells(Rows.Count, 1).End(xlUp)(2)

 

Vote positif 0 Vote négatif

L

lmylvc

XLDnaute Occasionnel

• 22 Décembre 2011

• #8

Re : VB :'Comment faire pour ne sélecctionner que les cellules ABCDFGF de la ligne ac

Hello Gilbert & Pierrot93

Le bout de code de Pierrot fonctionne à merveille.
Celui-ci va me permettre de gagner en ergonomie dans le cadre de mes saisies.
Aussi, merci à vous deux pour votre aide.
Je vous dis à bientôt

Vincent 🙂😛

 

Vote positif 0 Vote négatif