Ir ao conteúdo
  • Cadastre-se
Marcos Paulo Bernardo

Como copiar dados de outra planilha com formatação

Recommended Posts

Pessoal boa tarde!

Sou novo em vba,e estou com um problema em uma de minhas planilhas.

Preciso copiar dados de outra tabela para montar um gráfico com lista suspensa.

Porém toda vez que copio,a hora vem configurada como cientifico e não muda,Já tentei formatar mais mesmo assim não estou conseguindo.

Alguém consegue me dar uma ajuda!

 

Apenas preciso que ele copie os dados da tabela bdados1 e cole na consulta uma das colunas como hora.

Segue o código para que vocês olhem:

Dim coluna(4) As String
Dim y, i, k As Integer

y = 2
Sheets("consulta").Select 'planilha onde é feita a consulta'
Range("F1").Select 'coluna de consulta'
pesquisa = ActiveCell.FormulaR1C1
    If pesquisa = "" Then Exit Sub
    Set plan = Sheets("Bdados1") 'planilha onde base de dados da pesquisa'
    Set x = plan.Columns("A:A").Find(what:=pesquisa) 'coluna onde é feita a pesquisa'
    If Not x Is Nothing Then
      celula = x.Address
      Do
        plan.Select
        x.Select
        Selection.Copy
        Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
        xlNone, SkipBlanks:=False, Transpose:=False
        Application.CutCopyMode = False
        For i = 1 To 4
            coluna(i) = x.Columns(i)
        Next i
        Sheets("consulta").Select
        Range("A" & y).Value = coluna(1)
        Range("B" & y).Value = coluna(2)
        Range("C" & y).Value = coluna(3)
        
              
        y = y + 1
        
        
        Set x = plan.Columns("A:A").FindNext(x) 'aba de pesquisa da formula'
      Loop While Not x Is Nothing And x.Address <> celula
    Else
      MsgBox "Produto " & pesquisa & " não encontrado na planilha " & plan.Name
    End If
  
Worksheets("consulta").Columns("C").NumberFormat = "hh:mm:ss"


End sub

 

Muito obrigado desde já.

Editado por DiF
Botão CODE <>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×