Fala Caio, beleza...

Essa função de planilha pode ser facilmente traduzida em função VBA com o seguinte codigo.

Function Indicador(realizado)
    Indicador = IIf(realizado < 95, "critico", IIf(realizado < 175, "ruim", IIf(realizado < 235, "satisfatório", IIf(realizado < 270, "bom", "exelente"))))
End Function

Ahh legal adelson..
valeu bem simples mesmo !!!

Apenas acrescentando: é possível também utilizar o Select Case.

Function Indicador(realizado)
    Select Case realizado
    Case Is < 95
    Indicador = "critico"
    Case Is < 175
    Indicador = "ruim"
    Case Is < 235
    Indicador = "satisfatório"
    Case Is < 270
    Indicador = "bom"
    Case Else
    Indicador = "excelente"
    End Select
End Function

[ ]s

Senhores boa tarde,
sou novo aqui e estou com um problema.
Tenho uma planilha onde alguns campos são dados do contribuinte e outros são dados do endereço.
Criei um insert(sql) para inserir os dados do contribuinte, incluindo uma chave primária. Agora preciso fazer outra sql para inserir o endereço do contribuinte que acabei de inserir. O lance é fazer primeiro, um insert dentro do outro e segundo, quando crio um número no primeiro sql, esse mesmo número será a chave estrangeira no segundo sql. As sql estão abaixo:

Primeira SQL
=CONCATENAR("INSERT INTO cea.contribuinte(id_contribuinte, cnpj_contribuinte, nm_denominacao_social, cs_dispensado_uso_ecf, cs_situacao, id_tipo_contribuinte) VALUES(";"cea.contribuinte_seq.NEXTVAL";",'";C2;"','";A2;"','";D2;"','";E2;"','";F2;"'";");")

Segunda SQL
=CONCATENAR("INSERT INTO cea.endereco_contribuinte(id_endereco_contribuinte, tx_logradouro, nr_logradouro, tx_complemento, tx_bairro, tx_municipio, cep, id_uf, id_contribuinte) VALUES(";"cea.endereco_contribuinte_seq.NEXTVAL";",'";H2;"','";I2;"','";J2;"','";K2;"','";L2;"','";M2;"','";N2;"',";"',";contribuinte.id_contribuinte(sql acima);"'";");")

Espero que possam me ajudar
Grato
Robert Wallace