Saberexcel_site_das_macros
Esse procedimento do Aplicativo Microsoft Excel VBA, retorna a linha e coluna da célula selecionada, observe que aqui usamos o evento Selection Change, isso é, o evento ocorre ao selecionar determinada célula.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim vColuna As String, vLinha As Long, i As Integer
vColuna = Replace(Target.Address, "$", "") 'guarda o simbolo $
For i = 0 To 9
vColuna = Replace(vColuna, i, "") ' guarda os números
Next i
vLinha = Target.Row
MsgBox ("Você Selecionou :" & Chr(13) & "Coluna.....: " & vColuna & Chr(13) & "Linha.......: " & _
vLinha & Chr(13) & "Celula......: " & Target.Address & Chr(13) & "Valor......: " & Target.Value), _
vbInformation, "Saberexcel - site das macros"
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Publicidade:
Compre com segurança, qualidade e ótimos preços nas lojas SubMarino