cellule vide à l'écran mais non vide pour excel????

[tracor]

bonjour le phorum

quelqu'un pourrait il m'expliquer pourquoi des cellules sont vides à l'écran mais lorsque je crée un formule celle ci considére que la cellule contient une information
je suis alors obligé de supprimer manuellement la cellule "vide" pour que la formule me donne un résultat correct
???????????????????????



merci d'avance


tracor

 

[tracor]

dernière question c promis

comment faites vous pour créer une macro et ensuite lui affecter un bouton de commande

bouuuuuuuuuuuuuuuuuh

je suis desespéré

au secours


tracor

 

[Pierre]

C'est plutôt l'inverse que tu vas faire...

Click droit sur la barre d'icones... pour afficher la boîte à outils contôles
Lorsque tu la vois, tu choisis "bouton de commande"
ensuite tu le poses sur ta feuille...
Tu double-clique dessus et tu arrive dans l'editeur VBA
Tu y copie le code après commandButton1_Click en faisant attention de ne laisser qu'une seule fois la première et la dernière ligne.

Et voilà ca marche (enfin en théorie). Il ne te reste plus qu'à personnaliser ton bouton en cliquant sur propriétés.

Bon travail

Et si il y a encore une question...pose toujours ... le forum est là pour ça...

@+

Pierre

 

[tracor]

merci
merci
merci
merci
merci
merci
merci
merci
merci
merci
merci
merci
merci
et encore merci


tracor

 

[tracor]

slt à tous

y a t il un moyen pour que la macro ne vide que les espaces dans les cellules du tableau plutot que colonne par colonne
car effectivement c très long environ 30 mn
chose importante des lignes s'ajoutent chaque jour dans le tableau (mise à jour quotidienne)

Sub SUPPRESSION()

Dim zone As Range
Sheets("données").Select
Set zone = Range("a:bz")
For Each cell In zone
If cell.Value = " " Then
cell.Value = ""
End If
Next

End Sub
merci d'avance

 

[Minick]

Salut,

tu peux essayer ceci


Sub SUPPRESSION()

Dim zone As Range
Dim LastCell as integer

Sheets("données").Select
LastCell = Range("A65536").End(XlUp).Row
Set zone = Range("a" & LastCell & ":bz" & LastCell)
For Each cell In zone
If cell.Value = " " Then
cell.Value = ""
End If
Next

End Sub


Tu devrais gagner pas mal de temps

@+
Minick

 

[tracor]

slt minick

petite question

cette macro prendra t elle en compte les lignes qui s'ajoutent quodiennement

désolé si cette question est idiote
mais de toute facon je suis le maitre du quizz avec brigitte

tracor

 

[tracor]

re Minick

la macro ne supprime plus rien
c sur ca va plus vite mais je suis de nouveau avec mon souci de cellule apparement vide mais en fait non
snif snif snif

tracor

 

[Minick]

re,

ooops



Sub SUPPRESSION()

Dim zone As Range
Dim LastCell as integer

Sheets("données").Select
LastCell = Range("A65536").End(XlUp).Row
Set zone = Range("a1:bz" & LastCell)
For Each cell In zone
If cell.Value = " " Then
cell.Value = ""
End If
Next

End Sub



Je suis allé un peu vite, désolé.

En faite la variable LastCell détermine la dernier ligne de ton tableau (sur la colonne A) donc si des lignes s'ajoutes pas de pb.


@+
Minick

 

[tracor]

merci sensaï

je pardonne ta négligence car aujourdhui je suis d'humeur joviale
il fait beau et ce soir je vais au restaurant
tracor

 

[Minick]

Salut,

Merci pour cette faveur )

@+
Minick

 

[tracor]

et une de plus

comment faire pour ne prendre en compte que les cellules apparemment vide (cad sans aucun texte ou nombre)

signé

un inconnu vous offre des fleurs dans la rue

 

[Minick]

re,

Désolé je seche sur ce cou la, j'ai essayé quelques trucs mais ca semble pas possible.

@+
Minick

PS: Pour les fleurs, personnellement je prefererai des chocolats ;o)

 

[tracor]

c pas grave

tu m'as déjà bien secouru

pour les chocolats (léonidas je présume)

je crée un macro pour les digitaliser et je te les envoie par mail

tracor