Guru do Excel e Power BI

Enviado: **09 Jun 2018 às 20:35**

Muito obrigado a todos que, ao menos pela intenção, se propõe a nos ajudar. Obrigado, mesmo, de coração.

Gostaria de saber se tem como vocês fazerem nessa proposta de agenda o seguinte:

Quando eu clicar duas vezes em cima de determinada tarefa ela desaparecesse e voltasse a ficar um quadrado apenas. Isso inclui para as células mescladas. No caso de 4 células mescladas, com o clique duplo, voltasse a se tornar 4 células sem nada e separadas. Isso serviria para apagar uma tarefa

A segunda coisa seria com o passar do tempo, cada tarefa atrasada ficasse com uma borda vermelha ou então um fundo vermelho ou rosa mais claro. Por favor. Você são demais. Uns gênios. Meus super heróis. Adoro vocês. <3

Vai me ajudar muito. Obrigado.

Enviado: **10 Jun 2018 às 19:58**

Alguém?

Enviado: **11 Jun 2018 às 12:39**

Experimente:

Código: Selecionar todos

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 Dim s As String
  If Selection.MergeCells = True Then
   s = Selection.Address
   Selection.MergeCells = False: Selection.Value = ""
    With Range(s).Borders
     .LineStyle = xlContinuous
     .ThemeColor = 1
     .Weight = xlMedium
    End With
   Cancel = True
  End If
End Sub

Sobre a sua segunda demanda ("segunda coisa") aplique Formatação Condicional.

Enviado: **17 Jun 2018 às 17:57**

Muitíssimo obrigado Oswaldo.

mas apesar da dica, percebi que quando clico sobre uma célula não acontece nada.

E como usar formatação condicional? :/ Pelo que sei eu teria que escrever a data em cada uma das células para dar certo.

gostaria de saber se tem como vincular à data do relógio ou então aos horários, mesmo, da agenda. tks

Enviado: **17 Jun 2018 às 20:02**

Henrique92 escreveu:...mas apesar da dica, percebi que quando clico sobre uma célula não acontece nada.

O código que passei funciona com duplo clique na célula e deve ser instalado no módulo da planilha "Agenda", assim:
1. copie o código daqui
2. clique com o direito na guia daquela planilha e escolha 'Exibir código'
3. cole o código na janela em branco que vai se abrir
4. feito! 'Alt+Q' para retornar para a planilha e testar

Henrique92 escreveu: E como usar formatação condicional? :/ Pelo que sei eu teria que escrever a data em cada uma das células para dar certo.

Selecione o intervalo de interesse (suponho que no seu caso seja C3:I19) / Formatação Condicional / Nova Regra / Usar uma fórmula ... / na caixa de fórmula cole a fórmula abaixo / formate como desejar /OK / OK

Código: Selecionar todos

=HORA(AGORA())>=HORA(DIREITA($B3;5)+HOJE())

Guru do Excel e Power BI

Agenda Excel vinculada ao horário do computador

Agenda Excel vinculada ao horário do computador

Re: Agenda Excel vinculada ao horário do computador

Re: Agenda Excel vinculada ao horário do computador

Re: Agenda Excel vinculada ao horário do computador

Re: Agenda Excel vinculada ao horário do computador