Sub Declaracao () Sheeta ("Banco de Dados").Select Range ("b6"). Copy Sheets("Plana").Select Range("10") .PasteSpecial xlPasteValues Sheet("Banco de Dadas").Select Range("16") Copy Sheets ("Plan3") .Select Range("010") .Paste special x1 Pastevalues Sheets ("Banco de Dados Select Range("C6").Select If Value - "Pte de 04 Or "PEŠ de Sheets (*Plan3") -Select Cells("g10") - Educação InfantiL" Else Cells ("a1o") - "Ensino Fundamental" End It Declaracao Digite uma pergunt 3 OS" Then End Sub Alguém pode me ajudar achar o erro
Envie sua primeira dúvida gratuitamente aqui no Tira-dúvidas Profes. Nossos professores particulares estão aqui para te ajudar.
Envie sua primeira dúvida gratuitamente aqui no Tira-dúvidas Profes. Nossos professores particulares estão aqui para te ajudar.
Envie sua primeira dúvida gratuitamente aqui no Tira-dúvidas Profes. Nossos professores particulares estão aqui para te ajudar.