none
Organizar e Classificar via vbs

    Question

  • Gurus da Info

    Ajudai este pobre aprendiz

    Estou desenvolvendo em vbscript uma customização de relarório para software chamado E3SERIS. A situação é a seguinte:

    Preciso recuperar algumas informações do software que eu vou chamar de "DADOSTEC1" e "DADOSTEC2" - ETAPA CONCLUIDA

    Criar uma tabela em excel com essa informações - ETAPA CONCLUIDA

    Ordenar essas informações de acordo com os criterios do cliente, ou seja, determinar qual valores devem ser mostrados primeiro

    EXEMPLO:  I0.0, I0.1, I0.2, I1.0, .........,In.n, Q0.0, Q0.1, Qn.n, PIW526, PIW528, ETC

    Observe que o padrao da informção pode mudar e a ordem não é alfabetica. Preciso de algo do tipo "valor começa com"

    Abaixo coloquei o trecho para melhor compreensão:

    For iDev = 1 To nDevices
     dev.SetId DevIds(iDev)
     If dev.IsTerminal = 1 Or dev.IsConnector = 1 Or dev.IsDevice = 1 Then  
      nPins = dev.GetPinCount
      If nPins > 0 Then
       dev.GetPinIds PinIds
       For iPin = 1 To 1
        Pin.SetId PinIds(iPin)
        If dev.HasAttribute(AttCopem) then
         If dev.GetAttributeValue(Comment1Attr) =        then 'PRECISO DE ALGO DO TIPO COMEÇA COM TAL LETRA
          nline = nline + 1
          objExcel.Cells(nline, "A").Value = dev.GetAttributeValue(Comment1Attr)
          objExcel.Cells(nline, "B").Value = dev.GetAttributeValue(Comment2Attr)
         END IF
        End if
       Next
      End if
     End if
    Next

    Espero que tenha conseguido ser claro......eu sei que parece facil, mas aprendo programar nas cabeçadas 

    Valew ....Até +

    Wednesday, August 24, 2011 5:43 PM

Answers

  • Kra

    VALEW pelo Toque! Mas eu preciso ordenar em uma classificação personalizada apenas uma coluna. Conforme postei anteriormente

    Se vc tiver alguma sugestão ou dúvida, estamos aí. Estou necessitado de uma solução.

    Att

    Joel Vieira

    • Marked as answer by jovir Tuesday, September 20, 2011 1:17 PM
    Thursday, August 25, 2011 2:09 PM

All replies

  • Jovir Boa noite,

    Não consegui entender muito sua solicitação se puder detalhar ou ilustrar poderei tentar lhe ajudar melhor.
    Pode por favor fechar a outraS thereadS refernte ao mesmo assunto.

     

    Abraços


    Edson Matias Fagundes Junior - (Nioks)
    MCP, MCTS: 2008, MCTS:MBS
    Se a resposta for valida por favor vote como útil.

    Thursday, August 25, 2011 1:16 AM
  • Veja se esse Script lhe ajuda.

    ' Ordenar uma planilha Excel em três colunas diferentes
    
    
    
    Const xlAscending = 1
    Const xlDescending = 2
    Const xlYes = 1
    
    Set objExcel = CreateObject("Excel.Application")
    objExcel.Visible = True
    Set objExcel = CreateObject("Excel.Application")
    objExcel.Visible = True
    Set objWorkbook = _ 
      objExcel.Workbooks.Open("C:\Scripts\Sort_test.xls")
    
    Set objWorksheet = objWorkbook.Worksheets(1)
    Set objRange = objWorksheet.UsedRange
    
    Set objRange2 = objExcel.Range("A1")
    Set objRange3 = objExcel.Range("B1")
    Set objRange4 = objExcel.Range("C1")
    
    objRange.Sort objRange2,xlAscending,objRange3,,xlDescending, _
      objRange4,xlDescending,xlYes
    

    Abraços


    Edson Matias Fagundes Junior - (Nioks)
    MCP, MCTS: 2008, MCTS:MBS
    Se a resposta for valida por favor vote como útil.
    Thursday, August 25, 2011 1:33 AM
  • Edson Bom Dia

    Pra descomplicar....

    Estou Importanto um determinado atributo para excel.

    O valor deste atributo varia em uma sequencia alfanumerica. Exemplo: I0.0; I0.1; I0.2;

    Existe uma ordem de classificação a seguir. Exemplo: I; Q; PIW (Repare que não necessariamente será em ordem alfabetica)

    QUESTÃO: Se eu quiser filtrar essas informações, por exemplo: Exibir apenas informações que comecem com "Q"

    PERGUNTA: 1-Exite como especificar um filtro com caracteristica  "COMEÇA COM"?. 2-É possível determinar o modo de classificação personalizada?(função semelhante a "PERSONALIZAR CLASSIFICAÇÃO" do Excel)

    Desde já agradeço pela atenção

    Joel Vieira

     

     

     

    Thursday, August 25, 2011 2:03 PM
  • Kra

    VALEW pelo Toque! Mas eu preciso ordenar em uma classificação personalizada apenas uma coluna. Conforme postei anteriormente

    Se vc tiver alguma sugestão ou dúvida, estamos aí. Estou necessitado de uma solução.

    Att

    Joel Vieira

    • Marked as answer by jovir Tuesday, September 20, 2011 1:17 PM
    Thursday, August 25, 2011 2:09 PM