Plage de cellule

Fermé
kamila16288 Messages postés 46 Date d'inscription lundi 4 mai 2009 Statut Membre Dernière intervention 2 septembre 2012 - 12 mai 2009 à 13:45
hich24 Messages postés 1633 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 3 novembre 2024 - 12 mai 2009 à 16:41
Bonjour,
je veux savoir s'il y a un astuce qui peut remplacer une plage de cellules par exemple"A1:Z200" par une variable qui peut détecter automatiquement la zone pleine dans le tableau .


cordialement

4 réponses

hich24 Messages postés 1633 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 3 novembre 2024 753
12 mai 2009 à 16:04
1- tu selectione la plage
2- menu insertion > nom > définire > tu donne un nom ( sans espace ni symbole )
3- maintenant ta plage porte ce nom
0
kamila16288 Messages postés 46 Date d'inscription lundi 4 mai 2009 Statut Membre Dernière intervention 2 septembre 2012
12 mai 2009 à 16:28
merci pour votre aide, mais ce que je veux c'est un code vba qui va détecter automatiquement la plage pleine et aprés on utilisera cette plage dans le reste du code.

merci de votre aide.

cordialement
0
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 191
12 mai 2009 à 16:38
Bonjour,
Pour tester une plage
Function TestPlage(Plage As Range) As Boolean
Dim cel As Range
    For Each cel In Plage
        If cel = "" Then Exit Function
    Next cel
    TestPlage = True
End Function

Pour l'appel
    B = TestPlage(TaPlage)

Si remplie renvoi True
A+
0
hich24 Messages postés 1633 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 3 novembre 2024 753
12 mai 2009 à 16:41
Dim derlig As Long
dim dercol as long
dercol =range("iv1").end(xltoleft).offset(1,0)
derlig = Range("A65536").End(xlUp).Row
Range(Cells(1, 1), Cells(derlig, dercol)).Select

ca va selectioner les cellule non vide
0