Bom dia!
Estava tentando criar um trecho de código para minha macro envolvendo uma condição (if) mas o VBA ta dando erro de sintaxe quando a macro é executada.
O código excel é:
=IF(HLOOKUP("Politica Credito PF CTI(Sistema)";$A:$XAA;ROW(A3);0)<>0;HLOOKUP("Politica Credito PF CTI(Sistema)";$A:$XAA;ROW(A3);0);
IF(HLOOKUP("Politica Credito PF F&A(Sistema)";$A:$XAA;ROW(A3);0)<>0;HLOOKUP("Politica Credito PF F&A(Sistema)";$A:$XAA;ROW(A3);0);
IF(HLOOKUP("Politica Credito PF HC(Sistema)";$A:$XAA;ROW(A3);0)<>0;HLOOKUP("Politica Credito PF HC(Sistema)";$A:$XAA;ROW(A3);0);
IF(HLOOKUP("Politica Credito PF OT and Others(Sistema)";$A:$XAA;ROW(A3);0)<>0;HLOOKUP("Politica Credito PF OT and Others(Sistema)";$A:$XAA;ROW(A3);0);
IF(HLOOKUP("Politica Credito PJ CTI(Sistema)";$A:$XAA;ROW(A3);0)<>0;HLOOKUP("Politica Credito PJ CTI(Sistema)";$A:$XAA;ROW(A3);0);
IF(HLOOKUP("Politica Credito PJ F&A(Sistema)";$A:$XAA;ROW(A3);0)<>0;HLOOKUP("Politica Credito PJ F&A(Sistema)";$A:$XAA;ROW(A3);0);
IF(HLOOKUP("Politica Credito PJ HC(Sistema)";$A:$XAA;ROW(A3);0)<>0;HLOOKUP("Politica Credito PJ HC(Sistema)";$A:$XAA;ROW(A3);0);
IF(HLOOKUP("Politica Credito PJ OT and Others(Sistema)";$A:$XAA;ROW(A3);0)<>0;HLOOKUP("Politica Credito PJ OT and Others(Sistema)";$A:$XAA;ROW(A3);0);"NOT FOUND"))))))))
E em VBA ele grava como:
"=IF(HLOOKUP(""Politica Credito PF CTI(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0)<>0,HLOOKUP(""Politica Credito PF CTI(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0),"&chr(10)&"IF(HLOOKUP(""Politica Credito PF F&A(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0)<>0,HLOOKUP(""Politica Credito PF F&A(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0),"&chr(10)&"IF(HLOOKUP(""Politica Credito PF HC(Sistema)""& _
"251,ROW(R[1]C[-16277]),0)<>0,HLOOKUP(""Politica Credito PF HC(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0),"&chr(10)&"IF(HLOOKUP(""Politica Credito PF OT and Others(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0)<>0,HLOOKUP(""Politica Credito PF OT and Others(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0),"&chr(10)&"IF(HLOOKUP(""Politica Credito PJ CTI(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0)<>"& _
"(""Politica Credito PJ CTI(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0),"&chr(10)&"IF(HLOOKUP(""Politica Credito PJ F&A(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0)<>0,HLOOKUP(""Politica Credito PJ F&A(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0),"&chr(10)&"IF(HLOOKUP(""Politica Credito PJ HC(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0)<>0,HLOOKUP(""Politica Credito PJ HC(Sistema)"",C1:C16251,"& _
"[-16277]),0),"&chr(10)&"IF(HLOOKUP(""Politica Credito PJ OT and Others(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0)<>0,HLOOKUP(""Politica Credito PJ OT and Others(Sistema)"",C1:C16251,ROW(R[1]C[-16277]),0),""NOT FOUND""))))))))"
Se alguém souber o que pode ser, ou mesmo testar e funcionar sem erro, eu agradeço!
Postado : 16/10/2017 8:34 am