none
Erro de compilação RRS feed

  • Pergunta

  • Estou criando uma planilha de estoque no Excel 2003, são muitos produtos a serem lançados, existe um código que substitua este:

    intLinha = ThisWorkbook.Worksheets("Cálculo1.1").Range("A65536").End(xlUp).Offset(1, 0).Row
    If ComboBoxMM = "Produto A" Then
    ThisWorkbook.Worksheets("Cálculo1.1").Cells(intLinha, 1) = TextBoxQuantidade.Value
    End If

    Esse código está me retornando:

    Erro de compilação. Procedimento muito grande!

    Agradeço a atenção!

    sábado, 3 de agosto de 2013 05:18