fomulation range dans VBA

Excel-lent

XLDnaute Barbatruc

• 8 Juillet 2010

• #2

Re : fomulation range dans VBA

Bonjour BBdoc,

Code:

Range("B5:M" & NBVAL(B:B) + NB.VIDE(B1:B10)).Select

Voici ton code corrigé, tu as mis un guillemet en trop et l'autre au mauvaise endroit, tout simplement.

Bref, comme tu vois tu n'es pas obligé de stocker ton information dans une variable.

Bonne après midi

 

Dernière édition: 8 Juillet 2010

Vote positif 0 Vote négatif

G

Guest

Guest

• 8 Juillet 2010

• #3

Re : fomulation range dans VBA

Bonjour,

Code:

nbLignes= Application.COUNTA(Range("B:B"))+Application.COUNTBLANK(Range("B1:B10"))
 
If nbLignes>0 Then Range("B5:[COLOR=black]M" & nbLignes).Select[/COLOR]

A+
[Edit] Hello Excel-lent, il me semble que NBVAL et NB.VIDE sont des fonctions de feuille de calcul et non des fonction VB

 

Dernière modification par un modérateur: 8 Juillet 2010

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 8 Juillet 2010

• #4

Re : fomulation range dans VBA

Bonjour BBdoc

peut-être comme ça :

Code:

Dim li As Long
li = Application.WorksheetFunction.CountA(Columns(2)) + Application.WorksheetFunction.CountBlank(Range("B1:B10"))
Range("B5:B" & li).Select

Édition :

Bonjour Excellent, Hasco on s'est croisé

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 8 Juillet 2010

• #5

Re : fomulation range dans VBA

Bonjour,

essaye peut être ceci, correspond peut être à ta demande, pas sur :

Code:

Range("B5:M" & Range("B65536").End(xlUp).Row).Select

sinon vba reconnaitra plutôt un code de ce type :

Code:

Dim x As Long
x = Application.CountA(Range("B:B"))

bon après midi
@+

Edition : Aarf, beaucoup de monde, un peu en retard moi, bonjour à tous....

 

Vote positif 0 Vote négatif

B

BBdoc

XLDnaute Nouveau

• 12 Juillet 2010

• #6

Re : fomulation range dans VBA

merci, j'ai pris la formule de robert car j'ai compris comment elle marchait, je vais tester les autres aussi pour voir si elles marchent aussi.

Encore merci à vous tous!

 

Vote positif 0 Vote négatif