Bom Dia a Todos do Fórum.
Não sei é possível fazer porem gostaria de carregar as informações de uma planilha em um form usando referencia relativa.
Tenho um planilha onde gostaria que quando ao realizar o click na célula ela exibi-se o código da célula que cliquei e descrição da célula do lado em um form.
Consigo realizar esse procedimento quando tenho um endereço de célula fixo.
Exemplo Codigo Planilha
Private Sub Worksheet_SelectionChange(ByVal target As Excel.Range)
If Intersect(target, Range("C4")) Is Nothing Then Exit Sub
exemplo.Show
End Sub
exemplo do codigo do Form
Private Sub UserForm_Initialize()
Me.LB_Codigo = ThisWorkbook.Worksheets("EXEMPLO").Range("C4").Value
Me.LB_DESCRICAO = ThisWorkbook.Worksheets("EXEMPLO").Range("F4").Value
End Sub
Se alguem tiver alguma dica de como carregar as label do form de forma relativa
Agradeço.
Segue em Anexo
Exemplo Compactado.
Postado : 20/09/2013 6:50 am