Como inserir comando copiado pela macro no progress

Discussão em 'Progress 4GL' iniciado por rogerioDesenv, Maio 6, 2013.

  1. rogerioDesenv

    rogerioDesenv Sem Pontuação

    Estou gerando um relatório em excel porem preciso que saia essa regra que copia pela macro no excel quando gerar o relatório.

    Range("G4:G12").Select
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlLess, _
    Formula1:="=0"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Font
    .Color = -16383844
    .TintAndShade = 0
    End With
    With Selection.FormatConditions(1).Interior
    .PatternColorIndex = xlAutomatic
    .Color = 13551615
    .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False
    Range("J9").Select
    End Sub
    rogerioDesenv, Maio 6, 2013
    #1

Compartilhe esta Página