Skip to main content
Announcements
Have questions about Qlik Connect? Join us live on April 10th, at 11 AM ET: SIGN UP NOW
cancel
Showing results for 
Search instead for 
Did you mean: 
luizclaudio
Creator
Creator

Passagem de parâmetro em macro

Bom dia pessoal

Estou utilizando uma macro para gerar colunas em uma tabela dinâmica, porém preciso fixar um limite para os valores.

Esta macro gera valores de parcelamento de débitos e preciso que o processo seja encerrado quando o valor da parcela chegar, por exemplo, a R$60,00.

Como faço para passar um valor como parâmetro na macro?

Luiz Cláudio

Labels (1)
  • Macro

4 Replies
Anonymous
Not applicable

Lembro do seu outro post, fazendo essa macro para gerar as colunas, vc utilizava um for certo? Você não consegue colocar dentro de um for também utilizando como condicional a variável com o valor da parcela ?

luizclaudio
Creator
Creator
Author

Rodrigo

A minha dificuldade está em identificar qual o valor do cálculo na macro abaixo.

Sub Gera_expressao

Dim Parcelas

Parcelas = 2

set Graph = ActiveDocument.GetSheetObject("CH76")

set v = ActiveDocument.Variables("Qt_Parcelas")

While Parcelas <=12

ExpNo = Graph.AddExpression("Column(4)/"&Parcelas)

set cp = Graph.GetProperties

set ExpVis = cp.Expressions.Item(ExpNo).Item(0).Data.ExpressionVisual

ExpVis.Label.v = Parcelas

ExpVis.NumAdjust = 2      'center

ExpVis.LabelAdjust = 1    'center

set np = cp.Expressions.Item(ExpNo).Item(0).Data.ExpressionVisual.NumberPresentation

np.Dec = ","

np.Fmt = "#.##0,00"

np.nDec = 2

np.Thou = "."

np.Type = 11 'fixed decimal

np.UseThou = 1

Graph.SetProperties cp

Parcelas = Parcelas + 1

v.SetContent Cstr(Parcelas),true

wend

End Sub

Luiz Cláudio

Anonymous
Not applicable

Pelo que eu entendi, você precisa trazer o valor da "Column(4)" para dentro da macro para dividir pelo numero de parcelas e chegar ate o 60, certo ?

Voce pode buscar esse valor assim:

v_valortotal = Graph.GetCell(0,0) 

passando os parâmetros da matriz dai no (0,0)

Clever_Anjos
Employee
Employee

Já conseguiu a resposta? Se sim, escolha uma e marque como "Correta" para fechar o tópico e nos ajudar a manter a comunidade organizada

Have fun, be Qlik