Galera fiz um programa que verifica o texto que tem na celula e apos o evento click mostra um shape....
o bug do progrma é qd clico em uma celula mostra normal um shape e image só que qd clico em outro botao para deixar o shape ou imagem invisivel, ao clicar na mesma celula  nao mostra o shp ou imagem. Para mostrar tenho que primeiro clicar em outra celula e retornar o click na celula desejada

segue o o que eu fiz...
Dim shp As Variant

Private Sub MSHFlexGrid1_EnterCell()
shp = MSHFlexGrid1.Text
Select Case shp
Case ("f3")
imag
Case ("mmm")
mmms

End Select

End Sub


Sub imag()
frm.f3.Visible = True
frm.mmm.Visible = False
End Sub



Sub mmms()
frm.mmm.Visible = True
frm.f3.Visible = False
End Sub

se alguem tiver uma sugetao agradeco!!!

Bom dia !

 

Analisei sua rotina e segue algumas sugestões :

 

O <f3> e o <mmm> são uma picture, image ??? Se sim o que pode estar acontecendo e que voce precise dar um reflesh para mostrar na tela !!!

 

TESTE E AVISE....

 

ALEXANDRE COSTA

ARTSOFTSYSTEMS

 

 

 

 

 

O bug esta que vc não colocou o codigo no evento Click, + sim no entersel, quando vc da um click a primeira vez ele dispara o entercel (entrando na celula) e depois o click.

 

Como a segunda vez vc ja esta na celula em questao, ele executa apenas o click (aqui esta o bug, vc colocou o codigo no entercel), dai vc cilcando em outra celula e voltando, ai sim ele executa novamente o entercel e o click....

 

Bem, espero que tenha entendido... qualquer coisa da um grito.

 

Um abraço..... Donkey.