Ajouts d'éléments à une plage de donnée

adebrux

XLDnaute Occasionnel
Rebonjour à toutes et à tous.

Je crois tenir la solution à mon probleme (pour ceux qui suivent mes évolutions depuis 2 semaines !!!! ;) ), en créant des cellules de validation.

Mais voilà, il faut pour que ce soitvalide que je définisse mes plages de données (le tout sous VBA, of course ! :whistle: ) qui pour arranger le tout peuvent ne pas être continue...

Petites exemple, dans la liste suivante [ soleil, soleil, velo, soleil], seules les itérations de 'soleil' sont 'indicées' pour montrer qu'elles doivent faire partie de la plage de donnée. (elles sont indicé par la valeur de Tabtemp(L, 5) qui est égal à NIV dans le code)

J'ai donc rentrès dans mon cher VBA le code suivant:
Code:
For L = 1 To UBound(TabTemp, 1)
        If TabTemp(L, 5) = Niv Then
          ActiveWorkbook.Names.Add([Name:='essai'], [sheets(2).cells(L, Niv + 1)])
          End If
    Next L

espérant désepérément que cela permettrait d'ajouter les cellules concernée à ma plage de donnée.

Mais que nenni :woohoo:

ce beau message d'erreur apparait: 'erreur de compilation attendu :='

Ca veut dire quoi ca les gens ????

Merci de votre aide précieuse

et à bientôt
 

Hervé

XLDnaute Barbatruc
Bonsoir adebrux, le forum

Une tentative de réponse, mais je suis vraiment pas sur d'avoir compris :

Dim premier As Boolean


    premier =
True
   
For L = 1 To UBound(tabtemp, 1)
       
If tabtemp(L, 5) = niv Then
           
If premier Then
                Cells(i, niv + 1).Name = 'essai': premier =
False
           
Else
                Union(Range('essai'), Cells(i, niv + 1)).Name = 'essai'
           
End If
       
End If
   
Next L


salut
 

Discussions similaires

Statistiques des forums

Discussions
312 928
Messages
2 093 697
Membres
105 787
dernier inscrit
BABOU79