Pour compter le nombre de cellules pleines dans une colonne, j'utilise
cette formule
___
Dim Plage as Range
Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count
___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille
"Données".
Si j'enleve "sheets("donnee").activate" ca se plante.
Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Vincent.
Bonjour With Workbooks("nom du fichier.xls").Worksheets("Donnees") NbLignes = .Range("A3",.Range("A3").End(xldown)).Count End With devrait le faire pas mal (je crois) A+
-----Message d'origine----- Bonjour.
Pour compter le nombre de cellules pleines dans une colonne, j'utilise
cette formule ___ Dim Plage as Range Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count ___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille
"Données". Si j'enleve "sheets("donnee").activate" ca se plante. Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?
Merci.
.
Bonjour
With Workbooks("nom du fichier.xls").Worksheets("Donnees")
NbLignes = .Range("A3",.Range("A3").End(xldown)).Count
End With
devrait le faire pas mal (je crois)
A+
-----Message d'origine-----
Bonjour.
Pour compter le nombre de cellules pleines dans une
colonne, j'utilise
cette formule
___
Dim Plage as Range
Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count
___
Ca marche mais je voudrais ne pas être obligé d'activer
la feuille
"Données".
Si j'enleve "sheets("donnee").activate" ca se plante.
Il n'y a pas besoin d'activer une feuille pour travailler
dedans Non ?
Bonjour With Workbooks("nom du fichier.xls").Worksheets("Donnees") NbLignes = .Range("A3",.Range("A3").End(xldown)).Count End With devrait le faire pas mal (je crois) A+
-----Message d'origine----- Bonjour.
Pour compter le nombre de cellules pleines dans une colonne, j'utilise
cette formule ___ Dim Plage as Range Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count ___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille
"Données". Si j'enleve "sheets("donnee").activate" ca se plante. Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?
Pour compter le nombre de cellules pleines dans une colonne, j'utilise cette formule ___ Dim Plage as Range Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count ___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille "Données". Si j'enleve "sheets("donnee").activate" ca se plante. Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?
Merci.
Ceci n'est pas une formule mais une macro ;)
une formule est de type =alea()
;)
EMiLe
Bonjour.
Pour compter le nombre de cellules pleines dans une colonne, j'utilise
cette formule
___
Dim Plage as Range
Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count
___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille
"Données".
Si j'enleve "sheets("donnee").activate" ca se plante.
Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?
Pour compter le nombre de cellules pleines dans une colonne, j'utilise cette formule ___ Dim Plage as Range Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count ___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille "Données". Si j'enleve "sheets("donnee").activate" ca se plante. Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?
Merci.
JOJO
EMiLe wrote in news:OATolsynEHA.2340 @TK2MSFTNGP11.phx.gbl: merci ca marche tres bien ..
Ceci n'est pas une formule mais une macro ;)
une formule est de type =alea()
;)
EMiLe
Bonjour.
Pour compter le nombre de cellules pleines dans une colonne, j'utilise cette formule ___ Dim Plage as Range Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count ___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille "Données". Si j'enleve "sheets("donnee").activate" ca se plante. Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?
Merci.
EMiLe <emilefyon@altern.org> wrote in news:OATolsynEHA.2340
@TK2MSFTNGP11.phx.gbl:
merci ca marche tres bien ..
Ceci n'est pas une formule mais une macro ;)
une formule est de type =alea()
;)
EMiLe
Bonjour.
Pour compter le nombre de cellules pleines dans une colonne, j'utilise
cette formule
___
Dim Plage as Range
Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count
___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille
"Données".
Si j'enleve "sheets("donnee").activate" ca se plante.
Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?
EMiLe wrote in news:OATolsynEHA.2340 @TK2MSFTNGP11.phx.gbl: merci ca marche tres bien ..
Ceci n'est pas une formule mais une macro ;)
une formule est de type =alea()
;)
EMiLe
Bonjour.
Pour compter le nombre de cellules pleines dans une colonne, j'utilise cette formule ___ Dim Plage as Range Dim Nombredelignes
Sheets("Donnees").activate
Set Plage =Sheets("Donnees").range("A3",A3.End(xldown))
Nombredelignes = Plage.count ___
Ca marche mais je voudrais ne pas être obligé d'activer la feuille "Données". Si j'enleve "sheets("donnee").activate" ca se plante. Il n'y a pas besoin d'activer une feuille pour travailler dedans Non ?