Ser capaz de copiar cordas de uma célula para outra no aplicativo Microsoft Office Excel usando o Visual Basic for Applications você pode economizar tempo em grandes livros. No VBA , você pode usar a área de transferência do sistema para copiar e colar cordas entre as células usando a Selection.Copy e os métodos ActiveSheet.Paste . Este processo é extremamente útil quando você precisa copiar dados de uma célula para várias células em várias planilhas . Instruções 
 1 
 Abra o Microsoft Office Excel , clique na guia "Desenvolvedor" e clique em " Visual Basic " para abrir a janela do editor de VB . . Clique no menu "Inserir" e clique em " Módulo " para adicionar um novo módulo de código 
 2 
 Crie um novo procedimento sub: 
 
 Sub CopyString Privado ( ) 
 < br > 
 3 
 Adicione o seguinte código para copiar a string em A1: 
 
 Range (" A1") Selecione 
 
 Selection.Copy 
 4 < . p> cole a string copiada para B1: . 
 
 Range (" B1 " ) Selecione 
 
 ActiveSheet.Paste 
 5 
 Type " End Sub " para acabar com a sub procedimento. Pressione " F5" para executar o procedimento .