Affichage contenu cellule dans msgbox

Pierrot93

XLDnaute Barbatruc

• 28 Mai 2012

• #2

Re : Affichage contenu cellule dans msgbox

Bonjour,

pas ouvert ton fichier, mais regarde peut être ceci pour ta 1ère question, se déclenche sur double click, code à placer dans le module de la feuille concerné :

Code:

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Not IsEmpty(Target) Then MsgBox Target
End Sub

bonne journée
@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Mai 2012

• #3

Re : Affichage contenu cellule dans msgbox

Re,

pour les couleurs, peut être rajouter ceci, index des couleurs à adapter :

Code:

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Not IsEmpty(Target) Then MsgBox Target
With Target.Interior
    .ColorIndex = IIf(.ColorIndex = 3, 11, 3)
End With
End Sub

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 28 Mai 2012

• #4

Re : Affichage contenu cellule dans msgbox

Salut ifi77, Pierrot🙂, le Forum

J'aurais mis le code dans le ThisWoorkbook vu qu'il y a plusieurs Feuilles

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If ActiveCell <> "" Then Cancel = True: ActiveCell.Interior.ColorIndex = IIf(ActiveCell.Interior.ColorIndex = 4, 3, 4): MsgBox ActiveCell
End Sub

Cliquez pour agrandir...

EDITION: Salut Papou 🙂 j'y joint le mien également

Bonne Journée

 

Pièces jointes

• ifi77.xls

  502.5 KB · Affichages: 59

Dernière édition: 28 Mai 2012

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 28 Mai 2012

• #5

Re : Affichage contenu cellule dans msgbox

Bonjour Pierrot😱 ifi77 le forum
ton fichier en retour, mais ta demande ne peut pas donner de bon résultat, car si tu veux à la selection d'une cellule le message box, fatalement quand tu voudras changer la couleur avec ton double click tu auras d'abord ton message box !!!
pas bien mais j'ai répondu à ta demande
a+
Papou😱

PS: une autre solution et de changer la couleur sur un click droit par exemple

EDIT : Bonjour Dull😱 pas rafraîchi!!!

 

Pièces jointes

• Reservation chambre d'hote 2012 V1.xls

  507 KB · Affichages: 55

Vote positif 0 Vote négatif

I

ifi77

XLDnaute Occasionnel

• 28 Mai 2012

• #6

Re : Affichage contenu cellule dans msgbox

Bonjour, Pierrot, Dull et Paritec, tout d'abord merci, encore une fois vous m'avez été d'un grand secours.
Pour revenir sur le commentaire de PARITEC, il est vrai que cela peut engendrer un problème de faire clic ou double clic.
Ta proposition de valider par un clic droit me plait, comment faire alors pour avoir le choix entre valider ou afficher détails.
Sinon, lorsque la cellule est verte, je peux la passer en rouge en double cliquant, comment l'empecher?

Merci encore

@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Mai 2012

• #7

Re : Affichage contenu cellule dans msgbox

Re, bonjour Dull🙂, Papou🙂

Sinon, lorsque la cellule est verte, je peux la passer en rouge en double cliquant, comment l'empecher?

Cliquez pour agrandir...

bah en supprimant la ligne d'instruction en question.....

 

Vote positif 0 Vote négatif

I

ifi77

XLDnaute Occasionnel

• 28 Mai 2012

• #8

Re : Affichage contenu cellule dans msgbox

Bonne soirée,
je me permets de vous demander dernier coupe de pouce pour cette aplli, (je l'espère), voila, après avoir tout adapté, il me restait la suppressionen double cliquant sur la cellule, cependant j'ai un probleme pour remettre la couleur pour l'ensemble des cellules défussionnées.
Le code est dans le thisworkbook, si vous avez le temps de regarder, merci encore.

@+

 

Pièces jointes

• Reservation chambre d'hote 2012.xls

  547 KB · Affichages: 49
• Reservation chambre d'hote 2012.xls

  547 KB · Affichages: 58
• Reservation chambre d'hote 2012.xls

  547 KB · Affichages: 55

Vote positif 0 Vote négatif