macro : "l'une ou l'autre"

PascalXLD

XLDnaute Barbatruc

Modérateur

• 10 Avril 2006

• #2

Bonjour

Oui c'est possible

sub nbreligne()

dim MonNbre as integer

MonNbre=sheets('Feuil2').range('A65536').end(xlup).row

end sub

Par contre je ne comprends pas ton 'Si telle autre?'

Bonne journée

 

Vote positif 0 Vote négatif

J

Jean Michel CROQUETTES

XLDnaute Nouveau

• 10 Avril 2006

• #3

OUPS pardon, il y a eu un probleme juste avant de soumettre mon message désolé je voulais dire :

Est-il possible de créer un bouton en feuil1 qui va voir en feuil2 combien il existe de lignes.
Si Le nombre est à 11 lignes telle autre?

Désolé cher Pascal tu ne risquais pas de comprendre

Merci!!!

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

Modérateur

• 10 Avril 2006

• #4

Re

Je ne sais pas si c'est du au lundi matin mais je ne comprends pas : 'Si Le nombre est à 11 lignes telle autre? '

Je dois être fatigué pourtant j'ai bien dormi :unsure:

 

Vote positif 0 Vote négatif

J

Jean Michel CROQUETTES

XLDnaute Nouveau

• 10 Avril 2006

• #5

Excuses moi encore, c'est en utilisant les signes supérieurs et inferieurs que cela plante. Je reprends donc!!:

Est-il possible de créer un bouton en feuil1 qui va voir en feuil2 combien il existe de lignes.
Si Le nombre de lignes est inf à 11 alors execution de telle macro. entre 11 et 22 telle autre, plus de 22 encore une autre...

Merci d'avance!!!

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

Modérateur

• 10 Avril 2006

• #6

Re:macro : \"l'une ou l'autre\"

RE

ok essaies

Sub nbreligne()

Dim MonNbre As Integer

MonNbre = Sheets('Feuil2').Range('A65536').End(xlUp).Row

Select Case MonNbre
Case Is < 11
macro1
Case Is < 23
macro2
Case Else
macro3
End Select

End Sub

Cliquez pour agrandir...

Bonne journée

Message édité par: Pascal76, à: 10/04/2006 10:51

 

Vote positif 0 Vote négatif

J

Jean Michel CROQUETTES

XLDnaute Nouveau

• 10 Avril 2006

• #7

:woohoo:
J'essaye même pas avant de te répondre, c'est logique ça marche forcément!!!

Merci!!!

 

Vote positif 0 Vote négatif