Notifications
Clear all

Atualizar dados

9 Posts
2 Usuários
0 Reactions
994 Visualizações
(@igadino)
Posts: 5
Active Member
Topic starter
 

ola tenho uma planilha no excell e quando clicar para atualizar a planilha tos que tem sim aparecerá 0 na coluna Estado confornme abaixo

usuário e Férias Eestado
Pedro sim 0
Joao não
Maria não
Lima sim 0
Jaquelina não

Public contaLinha As String
Sub Lista()
On Error Resume Next
contaLinha = 3
Do Until TabBusca.Range("C" & contaLinha).Value = "sim"
If Sheets("TabBusca").Range("C" & contaLinha) = "sim" Then
' Range("G13") = "30" '.Select
Range("C" & contaLinha + 1).Select
With Selection.Interior
.ColorIndex = 14
End With
Exit Do
Else
' Range("D26") = "26" '.Select
' Range("D26").Select
' With Selection.Interior
' .ColorIndex = 15
' End With
contaLinha = contaLinha1
End If
Loop
End Sub

 
Postado : 13/01/2015 11:50 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Sinceramente eu não entendi.

Por favor poste seu arquivo modelo, represente nele o que deseja como (Antes e Depois).

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/01/2015 12:10 pm
(@igadino)
Posts: 5
Active Member
Topic starter
 

Arquivos em anexo.

 
Postado : 13/01/2015 12:39 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Ainda naõ vi seu arquivo.

Seria algo assim...?

Sub AleVBA_Loop()
    Dim rCell As range
    
    For Each rCell In activesheet.range("B2:B200")
        With rCell
            If rCell = "sim" Then rCell.Offset(0, 1).Value = "0"
        End With
    Next rCell
    
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/01/2015 1:22 pm
(@igadino)
Posts: 5
Active Member
Topic starter
 

eu errei os usuário e férias fica na TabBusca, e estado fica na tabela Campanhas

 
Postado : 13/01/2015 2:26 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!!

Não há guia com esse nome... :? :?

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/01/2015 3:04 pm
(@igadino)
Posts: 5
Active Member
Topic starter
 

Não entende

Nome das planilha

plan1=TabBusca
plan2=Campanhas

será se não tem como consultar numa planilha e inserir os dados na outra?

 
Postado : 13/01/2015 3:38 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Como consultar em uma planilha e inserir os dados em outra e plenamente possível, porem sem conhecer a estrutura de sua planilha/localização e distribuição de dados/valores fica extremamente difícil lhe dar uma resposta direta, dependendo também de seu conhecimento da ferramenta, se for uma resposta genérica, provavelmente não conseguira efetuar as alterações/adequações necessárias.
No seu exemplo além da TabBusca (Plan1), há Cadastro (Plan5) Oculta 1 e 2 (Plan 6 e 7) todas ocultas mas sem dados referente a Campanhas mencionadas.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/01/2015 5:55 pm
(@igadino)
Posts: 5
Active Member
Topic starter
 

Segue a planilha completa,

todos os que estão de feria nos campos real e meta da planilha campanha aparece o zero.

 
Postado : 14/01/2015 6:08 am