Macro: Set Plage = une seule cellule

2passage

XLDnaute Impliqué

• 12 Août 2005

• #2

Bonjour,

Pour ce que je comprends :

1-
En bouclant et en controlant que ca ne fait qu'une cellule, mais pour moi Inputbox demande un texte donc ca donnerait un truc du genre
do while range(plage).cells.count <> 1
Set Plage = Application.InputBox('Choose the right item in the unit item column', Type:=8)
loop

2- tu dois vouloir Activesheet.Index

A+

 

Vote positif 0 Vote négatif

F

francois

Guest

• 12 Août 2005

• #3

je regarde
merci

 

Vote positif 0 Vote négatif

F

Francois

Guest

• 12 Août 2005

• #4

Ca ne marche pas...
Est ce que vous pourriez svp me confirmer les fonctions visual basic qui permettent de compter le nombre de ligne colonne et cellule d'une plage de cellule.

Merci d'avance

 

Vote positif 0 Vote négatif

M

MichelXld

XLDnaute Barbatruc

• 12 Août 2005

• #5

bonjuor François , bonjour 2Passage

si tu veux verifier le nombre de cellules selectionnées

Dim plage As Range
Set plage = Application.InputBox('Choose the right item in the unit item column', Type:=8)
MsgBox plage.Cells.Count



bon apres midi
MichelXld

 

Vote positif 0 Vote négatif

2passage

XLDnaute Impliqué

• 12 Août 2005

• #6

Re,

a priori c'est rows.count, columns.counts et cells.count pour un range donné

Et le code que je t'ai donné ne marche pas parce qu'il faut definir plage avant le controle, sinon le cells.count se plante :

Code:

Set plage = Range('a:a')
Do While plage.Cells.Count <> 1
Set plage = Application.InputBox('Choose the right item in the unit item column', Type:=8)
Loop
MsgBox plage.Cells.Count

Comme ça ca marche tres bien (le Set est obligatoire pour la définition des ranges)
A+

 

Vote positif 0 Vote négatif

F

francois

Guest

• 12 Août 2005

• #7

j'essaye et je vs tiens o courant
merci

 

Vote positif 0 Vote négatif

F

Francois

Guest

• 12 Août 2005

• #8

bon ji arrive pas je recommence la semaine prochain j'ia besoin de repos
merci

 

Vote positif 0 Vote négatif

F

Francois

Guest

• 16 Août 2005

• #9

Un grand merci 2paasage, la macro marche

 

Vote positif 0 Vote négatif

2passage

XLDnaute Impliqué

• 16 Août 2005

• #10

No problem

 

Vote positif 0 Vote négatif