Plage de cellule

kamila16288 Messages postés 51 Statut Membre -  
hich24 Messages postés 1686 Statut Membre -
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 1686 Statut Membre 753
 
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 51 Statut Membre
 
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 9042 Statut Contributeur 1 191
 
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 1686 Statut Membre 753
 
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