Essa macro do Aplicativo Microsoft Excel VBA, insere dados em determinadas linhas e colunas, baseada em um número
da célula(C16). Exemplo se a célula(C16) contiver o número 11, a macro vai inserir
a palavra 'Saberexcel' na planilha(Plan2) na linha 11 e nas colunas(15,16,17)

Sub insere_dados()
Plan2.Select
Plan2.Range(Cells(Plan2.Range("C16").Value, 15), _
Cells(Plan2.Range("C16").Value, 17)).Value = "Saberexcel"
Plan1.Select
End Sub

Aprenda Microsoft Excel VBA com Saberexcel