| Descricao: |
 Saberexcel - site das macros
Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), substitui a letra 'a' das colunas (C1.D25) pela palavra 'Saberexcel'
aproveitando para melhorar o sistema de teste fiz uma macro simplificada para copiar e colar
Sub Substituir_texto()
Saber1.Range("C1.D25").Replace "a", "SaberExcel"
End Sub
Respondendo a uma pergunta em um fórum de uma pessoa que solicitou uma forma simples de fazer um macro para copiar e colar.
então aproveitando esse exemplo, inserí esse macro para copiar determinada área para determinado local,
observe que renomeei o intervalo de células(C1.D25), como área a ser copiada, e célula[b] = C1, para colar o conteúdo copiado.
veja como ficou bem simples. Espero que o exemplo possa ajudá-los, há uma matéria na Categoria Excel VBA - Copiar Excel VBA - Copiar
Fiquem com Deus E_Marcondes
(*) - Vejam nossos Módulos Como Fazer - Programação Microsoft Excel VBA(Visual Basic Application),
'copiando e colando com simplicidade.
Sub copiar()
[a].Copy [b]
End Sub
Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application),sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Publicidade
Compre com segurança, garantia e ótimos preços
|