Este fórum está sendo desativado

[JCabral]

Tenho uma duvida relativamente à validação de dados com Lista

Na planilha explico qual é a duvida.

Obrigado pela ajuda
Jorge Cabral

[Deciog]

JCabral , Bom Dia.

É possível sim confere

Decio

[JCabral]

Obrigado Decio

Não era isso que eu pretendia, o que queria era que em B3 aparecesse o valor correspondente, ou seja a lista aparecia os valores de Q4:Q6, mas depois de escolher o valor que aparecia na célula eram os valores de R4:R6.

[Deciog]

Em Formula isso não pode talvez em VBA

Décio

[JCabral]

Obrigado Decio

Alguém me pode explicar como é possível fazer em VBA? Não entendo nada de VBA

[gfranco]

Bom dia.
Segue minha contribuição.
At
gfranco

[JCabral]

Boa noite GFranco

Era mesmo isso que eu pretendia, mas como é para aplicar a uma tabela estou a ver que é muito complicado de fazer isso., para toda a tabela e em várias linhas

Obrigado
JCabral

[gfranco]

Boa noite.
Nesse caso de tabela ou várias linhas, minha sugestão é utilizar validação convencional e uma coluna auxiliar com um PROCV simples.

[JCabral]

Muito obrigado

[DJunqueira]

Veja na planilha anexa um exemplo de solução semelhante ao seu caso.

[JCabral]

Obrigado DJunqueira

Vou ver se dá para adaptar ao meu caso, julgo que é dificil porque não percebo nada de VBA

[DJunqueira]

O código não está em um módulo.

Código: Selecionar todos

Private Sub Worksheet_Change(ByVal Target As Range)
' Macro p/ retornar valor da primeira coluna de duas colunas combinadas em uma validação de dados
' DJunqueira 25 de agosto de 2016
'
    If Intersect(Target, Range("B3:B23")) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    ' Estabelece os 4 primeiros caracteres como valor da célula após seleção.
    Range("H2").Value = Mid(Target.Value, 8, 15)
    Target.Value = Left(Target.Value, 4)
    Application.EnableEvents = True
    
End Sub

Tb é utilizado validação de dados e definição de nomes.