comment selectionner des lignes aléatoirem

A

Abel

XLDnaute Accro

• 5 Octobre 2005

• #2

Bonjour jodocast,

As-tu essayé avec :

selection.rows.count
et
selection.columns.count


Abel.

 

Vote positif 0 Vote négatif

A

Abel

XLDnaute Accro

• 5 Octobre 2005

• #3

Re,

Heu ... on va dire que c'est un début de piste que je vais compléter (revoir) avant d'aller au ZOP.

Abel.

 

Vote positif 0 Vote négatif

G

GIBI

Guest

• 5 Octobre 2005

• #4

bonjour,,


pour dénombrer les lignes ou les colonnes dans une selection voici le code

NbrLig = Selection.Rows.Count
NbrCol = Selection.Columns.Count

pour selectionner une plage de cellules ou des lignes (avec EntireRow)

Range(Cells(1, 1), Cells(5, 1)).EntireRow.Select


restons simple

 

Vote positif 0 Vote négatif

A

Abel

XLDnaute Accro

• 5 Octobre 2005

• #5

Re,

Ah ben là c'est mieux. Hi hi !

Code:

Dim MaPlage As Range
Set MaPlage = Application.InputBox(prompt:='Sélectionnez une plage', Title:='', Type:=8)
If MaPlage Is Nothing Then Exit Sub
MaPlage.EntireRow.Select

En espérant que cela te dépanne.

Abel.

 

Vote positif 0 Vote négatif

A

Abel

XLDnaute Accro

• 5 Octobre 2005

• #6

Re,

Oups ! Pardon GIBI. Pas rafraichi.

Abel.

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 5 Octobre 2005

• #7

bonjour jodocast, abel;, gibi

Une syntaxe possible :

    Rows(Selection(1).Row & ':' & Selection(Selection.Count).Row).Select

Cliquez pour agrandir...

salut

 

Vote positif 0 Vote négatif

A

Abel

XLDnaute Accro

• 5 Octobre 2005

• #8

Re,

Ah ben, vé !

Je découvre un truc, là : selection()

Merci Hervé.

Abel.

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

Modérateur

• 5 Octobre 2005

• #9

Bonjour

Pour reprendre plusieurs idées peut-être comme ceci au cas où la selection ne soit pas contigue

Option Explicit

Sub selectligne()
Selection.EntireRow.Select
End Sub

Bon courage

 

Vote positif 0 Vote négatif