Affichage d'une cellule suivant le contenu

Spitnolan08

XLDnaute Barbatruc

• 23 Mai 2008

• #2

Re : Affichage d'une cellule suivant le contenu

Bonjour,

Une solution bestiale, sans chercher de simplification :

Code:

 Sheets("livre de mission").Select 'FOURNI PAR
For j =1 to 2
     If Cells((1,j)<>"" then cells(1,j).Select
Next
Selection.Copy

cORDIALEMENT

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 23 Mai 2008

• #3

Re : Affichage d'une cellule suivant le contenu

Bonjour gilou31, spit 🙂

personellement je n'ai rien compris (un fichier exemple s'avere necessaire)
tout ce que je peux dire c'est que :

Code:

Sheets("livre de mission").Select 'FOURNI PAR
Range(A1).Select
Selection.Copy
Sheets("data").Select
colonne = Range("A65536").End(xlUp).Row + 1
Cells(derlig, 33).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

peut etre remplacé par :

Code:

sheets("data").range("AG" & range("A65536").end(xlup).row+1)=sheets("livre de mission").range("A1")

m'enfin un fichier serait le bienvenu

 

Dernière édition: 23 Mai 2008

Vote positif 0 Vote négatif

Spitnolan08

XLDnaute Barbatruc

• 23 Mai 2008

• #4

Re : Affichage d'une cellule suivant le contenu

Re,
Salut Wilfried🙂,

Je pense que Gilou31 est débutant en VBA et qu'il a essayé d'adapter un code obtenu via l'enregistreur de macro. Ce qui est très bien sur le principe. C'est pourquoi je n'ai pas essayé de simplifier le code...

Cordialement

 

Vote positif 0 Vote négatif

G

gilou31

Guest

• 23 Mai 2008

• #5

Re : Affichage d'une cellule suivant le contenu

Voila :
alors j'ai trois cases. Une sera cocher par l'utilisateur. Ne me dites pas de faire avec les cases rondes ou quoi que se soit je n'y arrive pas et ca me ferait tou trecommencer 😛


donc voila. J'ai trois cases. Dans les cadres noir en gras, il s'affiche quelque chose suivant si la case est coché ou non.
Je voudrais que graçe à ma macro, les trois cases soient scannées. Un seul résultat va en ressortir car une seule case sera cochée. Ce résultat s'affichera dans le cadre rouge. 🙂

voila et tout ca si possible en se basant sur ce que j'ai fait pour ne pas désorianté le novice que je suis lol.

 

Pièces jointes

• Classeur2.xls

  21 KB · Affichages: 72
• Classeur2.xls

  21 KB · Affichages: 64
• Classeur2.xls

  21 KB · Affichages: 68

Vote positif 0 Vote négatif

G

gilou31

Guest

• 23 Mai 2008

• #6

Re : Affichage d'une cellule suivant le contenu

petite question annexe :
quel est le code pour décocher toutes les checkbox ? 🙂

 

Vote positif 0 Vote négatif

Spitnolan08

XLDnaute Barbatruc

• 23 Mai 2008

• #7

Re : Affichage d'une cellule suivant le contenu

Re,

Et ben dis donc, tu ne t'es pas foulé...😎
Et ton fichier ne ressemble pas à ce que tu décrivais dans ton premier post.
Perso je comprends encore moins qu'avant...

Il n'y a même pas de macro...!!!!

Cordialement

 

Vote positif 0 Vote négatif

G

gilou31

Guest

• 23 Mai 2008

• #8

Re : Affichage d'une cellule suivant le contenu

Spitnolan08 à dit:

Re,

Et ben dis donc, tu ne t'es pas foulé...😎
Et ton fichier ne ressemble pas à ce que tu décrivais dans ton premier post.
Perso je comprends encore moins qu'avant...

Il n'y a même pas de macro...!!!!

Cordialement

Cliquez pour agrandir...

j'ai simplifié au maximun le classeur. Mon classeur fait presque 500Ko alors je ne peux l'envoyer... J'ai refait un modele de ce que je voulais obtenir

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 23 Mai 2008

• #9

Re : Affichage d'une cellule suivant le contenu

re:

spit: rassure toi je ne comprends pas plus que toi 😡

dans ton fichier exemple : tu as 3 checkbox de type formulaire qui sont lies à des cellules : ces cellules prennent la valeur des chexkbox, mais l'inverse aussi.
si tu tapes vrai en f3, ta checkbox se coche, si tu tapes faux, elle se decoche

donc met à jour tes cellules et tes checkbox seront à jour

 

Vote positif 0 Vote négatif