Problème de sélection conditionnelle
rigolobobo
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
rigolobobo Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
rigolobobo Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je débute avec VBA et ça fait un bon bout de temps que je cherche une réponse à ma question, sans succès donc je me tourne vers vous pour une question de sélection.
J'aurais besoin de sélectionner :
- Dans les colonnes A-V
- A partir de la ligne 15
- Toutes les lignes contenant au moins une cellule non vide qui n'est pas une formule.
Le but étant de pouvoir sélectionner automatiquement toutes les lignes dans lesquelles des données ont été rentrées manuellement. J'ai ensuite une autre macro (qui elle fonctionne) me permettant d'effacer le contenu des cellules sélectionnées remplies manuellement tout en laissant intact les cellules contenant des formules.
Merci d'avance!
Je débute avec VBA et ça fait un bon bout de temps que je cherche une réponse à ma question, sans succès donc je me tourne vers vous pour une question de sélection.
J'aurais besoin de sélectionner :
- Dans les colonnes A-V
- A partir de la ligne 15
- Toutes les lignes contenant au moins une cellule non vide qui n'est pas une formule.
Le but étant de pouvoir sélectionner automatiquement toutes les lignes dans lesquelles des données ont été rentrées manuellement. J'ai ensuite une autre macro (qui elle fonctionne) me permettant d'effacer le contenu des cellules sélectionnées remplies manuellement tout en laissant intact les cellules contenant des formules.
Merci d'avance!
A voir également:
- Problème de sélection conditionnelle
- Mise en forme conditionnelle excel - Guide
- Excel liste déroulante conditionnelle - Guide
- Mise en forme conditionnelle word - Forum Word
- Outil sélection illustrator ne fonctionne pas ✓ - Forum Illustrator
- [WORD] affecté couleur cellule fonction valeu ✓ - Forum Word
1 réponse
Bonjour,
un principe de recherche:
que voulez-vous faire de ces lignes ????
un principe de recherche:
Sub test()
'zone A-V ligne 15 a xxxx
Fin = 100 'a remplacer par derniere ligne
With Worksheets("feuil1")
'boucle lignes
For x = 15 To Fin
'boucle colonnes
For y = 1 To 22
'test pas formule et pas vide
If Left$(Cells(x, y).Formula, 1) <> "=" And Cells(x, y) <> "" Then
'Dans ce cas ?????????????
Z = Z + 1
Exit For
End If
Next y
Next x
End With
End Sub
que voulez-vous faire de ces lignes ????
Je vais voire si j'arrive à faire ce que je veux avec ça.
En fait j'ai un fichier excel qui va être utilisé par différentes personnes. Elles doivent renseigner des informations manuellement, et les formules dans le fichier font le reste.
J'ai fait une macro pour effacer toutes les données saisies dans la plage A:V (c'est à dire que les formules restent intactes) mais cela prend beaucoup trop longtemps car ma macro va chercher jusqu'a la ligne 1000 (c'est le nombre de lignes de la plage avec les formules) dans certains cas ou le fichier est mal rempli par l'utilisateur.
Je ne peux pas changer la structure du fichier (nombre de lignes avec les formules) et je ne peux pas savoir à l'avance pour combien de lignes il sera nécessaire d'effacer les données.
Lorsque le fichier est mal rempli, la macro tombe rapidement sur une cellule vide alors qu'il reste encore des lignes à effacer.
C'est pour ça que je cherche un moyen pour continuer à effacer les données des lignes en descendant, jusqu'à tomber sur une ligne ou toute les cellules sont soit vides soit sont une formule.
J'espère que je suis un peu plus clair