excel vba getting the row cell value from selection address

Question

For i   1 To 20       select the cell in question   Cells Find      Select       get the cell address    CellAddr   Selection Address False  False  xlR1C1      Next   The above is my code for searching a spread sheet to find a specific string and then select it  I d like to get the address of the cell using Selection Address which  in this case  returns something along the lines of R 100 C  Is there a way I can split that result in to row and column values so I can manipulate them in code  I d like  for example to add 14 rows to the selected cells row value  I believe CellAddr will be a Range object so it may work I m just fuzzy on the implementation    Thanks

User · Accepted Answer

Dim f as Range  Set f ActiveSheet Cells Find       If Not f Is Nothing then     msgbox  Row    amp  f Row  amp  vbcrlf  amp   Column    amp  f Column Else     msgbox  value not found   End If

User · Answer

Is this what you are looking for    Sub getRowCol        Range  A1   Select   example      Dim col  row     col   Split Selection Address       1      row   Split Selection Address       2       MsgBox  Column is      amp  col     MsgBox  Row is      amp  row  End Sub

[vba] excel vba getting the row,cell value from selection.address

Examples related to vba

Examples related to excel