Notifications
Clear all

Preenchimento condicionado dia da semana

3 Posts
2 Usuários
0 Reactions
1,060 Visualizações
(@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)
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
(@rone_ant)
Posts: 8
Active Member
Topic starter
 

esqueci de agradecer, valeu gente..

 
Postado : 02/03/2016 10:55 am