NOME COMANDOS COMENTÁRIOS

NOME COMANDOS COMENTÁRIOS

Primeira_macro =SELEC("L4C2") VAI PARA A CELULA B4

=FÓRMULA("QUE") ESCREVE: CELULA B4

=SELEC("L[-2]C") VAI PARA A CÉLULA B2 (MENOS DUAS LINHAS

=FÓRMULA("NOSSA") ESCREVE:CELULA B2

=SELEC("L[10]C") VAI PARA A CELULA B12 (MAIS 10 LINHAS)

=FÓRMULA("ISSO") ESCREVE:CELULA B12

=SELEC("LC[2]") VAI PARA CELULA D12 (MAIS DUAS COLUNAS

=FÓRMULA("CARA") ESCREVE: CELULA D12

=SELEC("LC[-3]") VAI PARA A CELULA A12 (MENOS 3 COLUNAS)

=FÓRMULA("MASSA") ESCREVE: CELULA A12

=SELEC("L1C1") VAI PARA A CELULA A1

=RETORNO() FIM MACRO

Segunda_macro =SELEC("L1C2") VAI PARA A CELULA B1

NUMERO=""

=ENQUANTO(NUMERO<>"SADIA")

NUMERO=ENTRADA("DIGITE UM NUMERO";2)

= FÓRMULA(NUMERO) ESCREVE O NUMERO DIGITADO

=SELEC("L[1]C") VAI PARA A PROXIMA LINHA

=PRÓX()

=RETORNO() FIM MACRO

Terceira_macro idade=ENTRADA("digite sua idade";1) abre caixa dialogo p/ digitar a idade

=SE(idade>18) se idade maior que 18

=ALERTA("voce é maior de idade";1) 1=ok e cancel 2=ok

=SELEC("L2C2")

=FÓRMULA("MAIOR DE IDADE") se idade menor que 18

=SENÃO()

=ALERTA("voce é menor de idade";1) 1=ok e cancel 2=ok

=SELEC("L3C3")

=FÓRMULA("MENOR DE IDADE")

=FIM.SE()

=RETORNO()

quarta_macro respostaALERTA("DESEJA CONTINUAR";1) VAI PEDIR SE DESEJA CONTINUAR

=SE(resposta=VERDADEIRO) SE OK=VERDADEIRO,SENAO

=SELEC("L1C1") VAI P/ A CELULA A1

=FÓRMULA("VOCE ESCOLHEU QUE DESEJA CONTINUAR") ESCREVE NA CELULA A1

=SENÃO()

=SELEC("L[1]C")

=FÓRMULA("VOCE ESCOLHEU QUE DESEJA PARAR")

=FIM.SE() FIM DA CONDICÃO

=RETORNO() FIM DA MACRO

quinta_macro atualiza plan2

coloca_formula =SELEC("l4c6")

=ENQUANTO(CÉL.ATIVA()<>"") enquanto celula for diferente de branco

=SELEC("lc[1]")

=FÓRMULA("=SOMA(LC3:LC[-1])") passa a formula para a celula

=SELEC("lc[-1]")

=SELEC("L[1]C")

=PRÓX() SE FOR DIFERENTE DE BRANCO VOLTA SENAO

=SELEC("L1C1") PASSA PARA FRENTE

=RETORNO()

sexta_macro =SELEC.PASTA.TRABALHO("VENDAS";"VENDAS") RETORNA A PASTA QUE FOI IMPRESSA

=SELEC("l1c1:l15c7") seleciona area

=DEF.ÁREA.IMPRESSÃO() define area p/ imprimir

QUANTIDADE=ENTRADA("DIGITE NUMERO DE COPIAS:";1;"IMPRESSAO PLANILHA";1) ESPERA ENTRA Nº PLANILHAS

=SE(QUANTIDADE=FALSO) SE CANCELAR

=RETORNO() RETORNAR A PASTA DE TRABALHO

=SENÃO() SENAO VAI IMPRIMIR

=IMPRIMIR(1;;;QUANTIDADE;FALSO;FALSO;1;;;50) IMPRIME AS COPIAS DESEJADAS

=SELEC("L1C8") VAI PARA COLUNA PARA APAGAR DEFINICAO DE IMPRESSAO

=SELEC.PASTA.TRABALHO("MENU GERAL";"MENU GERAL") RETORNA A PASTA DESJADA

=FIM.SE() RETORNA(ABANDONA MACRO)

=RETORNO()

ATIVA_CALCULADORA =ECO(FALSO)

MACRO 7 =EXEC("CALC.EXE";1)

=ECO(VERDADEIRO)

=RETORNO()

DESEJA_CONTINUAR =ALERTA("DESEJA CONTINUAR";1)

MACRO 8 =SE(DESEJA_CONTINUAR=VERDADEIRO)

=EXECUTAR(sexta_macro)

=FIM.SE()

=RETORNO()

SEGUNDA_MACRO =DEF.TÍTULOS.IMPRESSÃO("L1";"") DEFINE TITULO

=DEF.ÁREA.IMPRESSÃO("$A$2:$C$15") DEFINE AREA PARA IMPRIMIR

QUANTIDADE=ENTRADA("DIGITE NUMERO DE COPIAS.";1;"IMPRESSAO PLANILHA";1) ESPERA DIGITAR Nº DE VIAS QUE DESEJA IMPRIMIR

=IMPRIMIR(1;;;QUANTIDADE;FALSO;FALSO;1;;;50) IMPRIME AS COPIAS DESEJADAS

=RETORNO() RETORNA ABANDONA MACRO

=SELEC.PASTA.TRABALHO("MACRO TESTE 9";"MACRO TESTE 9")

IMPRIMIR =SELEC("L1C1")