Este fórum está sendo desativado

[FernandoZ]

Estou mexendo uma planilha bem grande no excel, perdendo muito tempo por não encontrar uma fórmula pra resolver uma questão que "talvez" seja simples. Preciso relacionar 2 colunas, o problema é a sequência:
Coluna A / Coluna B
A1 = B1
A4 = B2
A7 = B3
A10 = B4
A13 = B5
ou seja, enquanto na coluna A vou alternando de 3 em 3 células, na coluna B vou de uma em uma. Espero ter sido claro.

Alguém sabe que fórmula ou função do excel usar para isso?

Caso já exista um tópico sobre isso no fórum, peço que me informem.

Grato FernandoZ

[Parkeless]

Olá Fernando!

Você quer passar os dados da coluna A para a B ou o contrário?

[FernandoZ]

Olá PARKELESS, grato pela atenção, na verdade os dados virão de uma planilha para outra, mas seguindo as mesmas colunas, dados da coluna A da Plan3T (nome da 1ª planilha) para a coluna A da Arv3T (nome da 2ª planilha).

[Deciog]

Fernando, Bom Dia.

Poste um modelo de planilha com o resultado esperado

Decio

[FernandoZ]

Anexei planilha mostrando o que preciso fazer.

[Parkeless]

Fernando,

Fiz através de macro, teste o código abaixo por favor:

Código: Selecionar todos

Sub DefinirArv3T()

'Apagar dados da Arv3T

Sheets("Arv3T").Range("A2:G1000000").ClearContents

Dim Arv3T()

ReDim Arv3T(1 To Application.WorksheetFunction.CountA(Sheets("Plan3T").Range("A:A")), 1 To 7)

'Definir matriz
Dim l As Long 'linha Plan3T
Dim c As Long 'coluna Plan3T e Arv3T (não muda)
Dim i As Long 'linha Arv3T


For l = 2 To UBound(Arv3T)
    If Cells(l, 1) = "" Then: Exit For 'Sair se não achar valor em UT
    i = i + 1
    For c = 1 To 7
        Arv3T(i, c) = Cells(l, c)
    Next c
    l = l + 2 'pular 3 linhas (2 agora + 1 no next a seguir)
Next l

Sheets("Arv3t").Range("A2:G" & UBound(Arv3T)) = Arv3T

MsgBox "Arv3T gerada com sucesso!", vbInformation

End Sub

[AndersonLeal]

Olá,

Veja a planilha em anexo. Utilizei a função DESLOC.

Abraço!

[Parkeless]

Olá Vieira, bom dia!

Por favor, crie um novo tópico com a sua dúvida

[vieira120414]

Olá, tudo bem?

como faço para criar um tópico ?

desde já agradeço pela atenção.

[FernandoZ]

Obrigado a todos que dispensaram um pouco de seu tempo para me auxiliar, ambas as soluções apresentadas deram resultado, o uso de macros ainda me é misterioso, portanto me enrolei um pouco com o código do Parkeless, consegui aplicá-lo mas não conseguiria alterá´lo em caso de uma mudança no range por exemplo, o Anderson Leal me passou uma fórmula usando a função DESLOC que também funcionou perfeitamente, fato é que a planilha está pronta.

Procurarei aprofundar meus conhecimentos em Excel, grato.