Ir ao conteúdo
  • Cadastre-se

antoniofmoura

Membro Pleno
  • Posts

    20
  • Cadastrado em

  • Última visita

posts postados por antoniofmoura

  1. Boa noite 
    Estou querendo facilitar minha vida no acompanhamento de prazos, para isso estou tendo criar uma planilha que organiza os processos. 
    Em anexo fiz como queria que fosse feito, onde inseria todos os prazos na planilha "IMFORMACAO BRUTA" e ela seria migrada para a planilha "INFORMACAO DETALHADA" conforme fiz um breve esboço
    Se conseguisse coloca nas colunas (DATA DA INTIMAÇAO;DATA DA CIENCIA ;FIM DO PRAZO) somente as datas seria muito interessante.

    TEST.xlsx

  2. Estou tentando fazer uma petição automática , mas o word e o excel nao estão se comportanto corretamente , o problema e que o word nao pega o texto todo que esta no excel , deixando a petição incompleta .

    erro.png.130470dc68176e892d5389011cd6c7e1.png 

     

    no excel esta o texto todo , mas so passa isso (obs isso acontece em todos os textos grandes ). se alguem consegui esquematizar a minha planilha eu agradeço , qualquer duvida sobre a planilha e so falar 

    MODELO.docx

    MODELO.xls

    erro.png

  3. quero unir esse dois comandos macro 

    1° comando 

    Private Sub Worksheet_Change(ByVal Target As Range)

        On Error Resume Next

        If Not Intersect(Target, Range("E:E")) Is Nothing Then

            Range("E1").Sort Key1:=Range("E2"), _

              Order1:=xlAscending, Header:=xlYes, _

              OrderCustom:=1, MatchCase:=False, _

              Orientation:=xlTopToBottom

        End If

    End Sub

     

    2° comando 

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Value = "cumpriu" Then Rows(Target.Row).Delete
    End Sub

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades 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

×
×
  • Criar novo...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!