Preenchimento condicionado dia da semana

2024 - VBA & Macros

Post Recente por rone_ant 9 anos atrás

3 Posts

2 Usuários

0 Reactions

1,053 Visualizações

RSS

rone_ant

(@rone_ant)

Posts: 8

Active Member

Topic starter

Bom dia pessoal, ja tive uma dúvida resolvida aqui e gostei muito, estou precisando de ajuda novamente é o seguinte: tenho uma planilha que preencho diariamente fiz uma macro pra imprimir e outra pra limpar a planilha, na verdade é uma pasta com 6 planilhas coloquei um campo que retorna data de hoje e copiei esse campo nas outras planilha de forma que eu altere um e todos sejam alterados copiei coloquei mais um campo com data mas no formato de dias da semana e gostaria que em determinados dias da semana, apos limpar a planilha ela verificasse o dia da semana e preenchesse a primeira linha, que contem 4 colunas, com um texto definido como no exemplo que se segue. Desde já agradeço.

Postado : 26/02/2016 6:59 am

setti

(@setti)

Posts: 150

Estimable Member

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$O$1" Then
        
        Call TESTE
        
        Exit Sub
    
    End If
    
End Sub

Sub TESTE()
Dim PALAVRA
PALAVRA = Cells(1, 15).Value
If PALAVRA = "SEGUNDA-FEIRA" Then
Cells(10, 1).Value = "a"
Cells(10, 2).Value = "b"
Cells(10, 4).Value = "c"
Cells(10, 7).Value = "d"
End If

End Sub

Postado : 27/02/2016 10:33 am