Cellules pleines??? cellules vide

Bonjour

dans une feuille quelconque, peu t on savoir s'il y a une cellule rempli???? et la quel???

merci

Bonjour

Une macro

Option Explicit

Sub Recherche()
Dim Cel As Range

  Set Cel = Cells.Find(what:="*", LookIn:=xlValues, lookat:=xlWhole)
  If Not Cel Is Nothing Then
    Cel.Select
    MsgBox "Une cellule de remplie " & Cel.Address
  End If
End Sub

Bonjour,

si c'est juste pour savoir si ta feuille est vide tu peux faire Ctrl+Fin.

La dernière cellule remplie sera sélectionnée, sinon reste en A1.

eric

bonjour

merci banzai, et merci eriic

ça fonctionne la macro de banzai

mais je crois que eriic ton astuce .... ne fonctionne que sur la colonne A

merciiiiii


pardon, BANZAI

la macro ne fonctionne pas correctement, elle ne déclare que la première cellule remplie

s'il y 2 , ça ne mentionne qu'une seule

merci

Bonsoir

iliyes a écrit :

s'il y a unecellule rempli???? et la quel???

Ta demande était claire et la réponse est en adéquation

Alors que faut il faire si plusieurs cellules ne sont pas vides ?

Il faut toutes les énumérer ou seulement quelques unes ?

re

l’idéal c'est de toutes les enumerer!!! se serais le top

merci BANZAI

ps : pourrais je te solliciter encore dans un autre sujet que je vais poster des son écritures!! merci

Bonsoir

iliyes a écrit :

l’idéal c'est de toutes les enumerer!!! se serais le top

Pas sur de ça

A tester

Option Explicit

Sub Recherche()
Dim Cel As Range, Depart As String

  Set Cel = Cells.Find(what:="*", LookIn:=xlValues, lookat:=xlWhole)
  If Not Cel Is Nothing Then
    Depart = Cel.Address
    Do
      MsgBox "Une cellule de remplie " & Cel.Address
      Set Cel = Cells.FindNext(Cel)
    Loop While Depart <> Cel.Address
  End If
End Sub
iliyes a écrit :

ps : pourrais je te solliciter encore dans un autre sujet que je vais poster des son écritures!! merci

En ouvrant un nouveau post tu sollicites l'ensemble des membres de ce forum

Je n'ai pas la science infuse

merci

cool ça fonctionner

Re,

mais je crois que eriic ton astuce .... ne fonctionne que sur la colonne A

Non, Pas du tout. Ctrl+Fin te sélectionne la dernière cellule, où qu'elle soit.

Mais vu que maintenant tu veux la liste ça n'a plus rien à voir.

eric

bonjour ERIIC

je crois que j'ai raison,, si je remplis une cellule, exemple la F5, avec le curseur sur A1 quand je met CTRL+FIN, ca ne sélectionne pas la cellule F5

j'attend ton retour

merci

Il faut resté appuyé sur Ctrl lorsque tu appuies sur Fin.

Et si tu appuies en même temps sur Shift, tu sélectionnes la plage jusqu'à la dernière cellule.

eric

re

désolé,

j'ai du changer de clavier, ( le mien déconnais)

c'est vrais que si il y a une seule cellule de remplie ça fonctionne correctement, or 'il y a 2, je vois que ça ne sélectionne que la dernier en allant vers le bas.

peu y a t il un autre moyen de sélectionner toutes les cellules remplis

( sincèrement je trouve l'astuce pas mal)

merci ERIIC

Je répondais à la question peu t on savoir s'il y a une cellule rempli?

peu y a t il un autre moyen de sélectionner toutes les cellules remplis

En 2 temps : 'Accueil / Edition / rechercher et sélectionner / Sélectionner les cellules...'

Choisir 'Constantes' (pour les saisies) ou 'Formules'.

Pour la totalité en une fois ça serait par macro. Mais quel est l'intérêt ? Quel est ton but exactement ?

eric

re

je reçois journellement beaucoup de fichier excel, qui des fois, sont volumineux.

j'ai remarqué que plusieurs fois ( dans mes fichiers reçus) qu'ils sont remplies que par des information inutiles( et plusieur fois par des formules qui prennes beaucoup de ressources pour rien et de la places aussi)

ce dernier moyen qui est idéal en 2 clics me permettra de nettoyer

merci beaucoup ERIIC

Ben si c'est pour vider la feuille clique à l'intersection des n° de lignes et des lettre des colonnes en haut à gauche, ça te sélectionne toute la feuille.

Ou supprime l'onglet, ça va encore plus vite.

eric

non

ca je connais,

il suffis juste de ne pas sauvegarder, c'est encore plus rapide

des fois les personnes ecrivent des texte de couleur blanche ( pour que ca soit invisible) et ils oublies d'effacer, et ca fait du volumes

je ne veut pas effacer toutes la feuilles

Rechercher des sujets similaires à "pleines vide"