Como conseguir uma mesclagem personalizada no excel?

Question

Eu sei apenas básico para o excel. Eu tenho grande folha de excel do cliente. Eu estou tentando explicar com dados de amostra o que eu quero. Aqui estão os dados de entrada em uma folha

Oqueeuqueroé-Euinsiroosnúmerosdelinhananovaplanilha(ouemalgumarquivodetextoouexcel),comonúmerosdelinhaemqualquerformato,digamosRow2:Row3:Row4emescleessastrêslinhascomoabaixo

1. MantenhaoconteúdodaA2comoestá.
2. MesclaroconteúdodeB1,B2,B3emB2
3. MovaoconteúdodeA3eA4nacolunaC1.Estepassoébomter,sepossível,masnãoobrigatório

Capturadeteladesaída

Não sei como conseguir isso? É possível através de macro ou fórmula ou outra coisa?

    

Answer 1

Eu acho que esta é uma boa chance de dar-lhe a vara de pescar e ensinar-lhe dois métodos básicos em VBA.

Combinando duas células em uma

Se eu tiver duas células com dados:

Vocêpodesemprereferenciaroconteúdodeumacélulaporesteformato:

ThisWorkbook.Sheets(worksheet_name).Range(desirded_range).Value

ondevocêpodeinserironomeeointervalodaplanilha.Estemétodopodeserusadoparalerdeumacélula,bemcomoescreverparaumacélula.Então,nomeuexemploacima,euusaria:

PublicSubcombine()ThisWorkbook.Sheets("Sheet1").Range("A1").Value = ThisWorkbook.Sheets("Sheet1").Range("A1").Value & ThisWorkbook.Sheets("Sheet1").Range("A2").Value
End Sub

Observe como eu posso referenciar o intervalo A1 como leitura dele, assim como atribuir dados a ele.

Fusão

Usando o mesmo exemplo para meus dados:

Paramesclar,usamosesteformato:

ThisWorkbook.Sheets(worksheet_name).Range(desired_range).Merge

Issoémuitosemelhanteaoexemplodecombinação.Lembre-sedequedesired_rangepodeserumintervaloenãoprecisaserumaúnicacélula,então,paramesclarnomeuexemplo,bastausar:

PublicSubMerge()ThisWorkbook.Sheets("Sheet1").Range("A1:A2").Merge
End Sub