Go To specific cell by the result showing in another cell with CELL("address"...) formula.

[CUSO19]

Hi guys.
I need go to a cell from the address showing in another cell which have CELL("address"...) formula.
For example,
In cell A1 I have CELL("address"...) formula giving a result $CD$450, I need to jump to cell CD450. The value of A1 change several times.
Thanks

 

[DanteAmor]

Welcome to the forum!

Do the following:

On the Formulas tab, in the Define Names group, click the Define Name button.
In the New Name dialog box, specify three things:
- In the Name box, type the range name: cell
- In the Scope dropdown, set the name scope (Workbook by default).
- In the Refers to box, put this formula: =INDIRECT($A$1)
Click OK to save the changes and close the dialog box.

Now, Press F5 which will bring up the Go To dialogue box
- In the Reference box, type: cell
- Press Ok

 

[DanteAmor]

Another option is to run the following macro:

Sub test()
  Range(Range("A1").Value).Select
End Sub

 

[CUSO19]

Another option is to run the following macro:

Sub test()
  Range(Range("A1").Value).Select
End Sub

Thanks Dante, it works perfect.
Now, it is there any way to do it automatically. Ones the cell A1 shows a new address, jump to the specific cell without been back and forward between VBA and sheet 1?
Thanks again Sr.

 

[DanteAmor]

What formula do you have in cell A1?


If you don't tell me the formula, then it would be very general, and with any calculation on the sheet, the macro would run and move to the cell.


Put the following code in the events on the sheet.

Private Sub Worksheet_Calculate()
  Range(Range("A1").Value).Select
End Sub

SHEET EVENT
Right click the tab of the sheet you want this to work, select view code and paste the code into the window that opens up.

 

[CUSO19]

I have a different values in a column, some of the values match with specific desired number. For example numbers from 1 to 16, my desired number is 2. If any number of the series, matches my specific number 2, in the next cell beside the matching # will have value 1.
This are the formulas I using on each column.

Cell A1: CELL("address",INDEX(A4:A16,MATCH(1,D4:D16,0))). This formula tells me where I have my first #1 in column D.
Column B: =IF(A4=$A$3,1,""), (where A3 is the desired number to find)
Column C: This column doesn't have any formula I will fill it up with desired # (in this case 2) if I have in column B #1 .
Column D: =if(AND(A4=$A$3),C4=$A$3),"",IF(A4=$A$3,1,"")). When I fill column C (C5 cell with #2 ) D5 will erase #1 and A1 will have a new value $A$10. Here is where I want to automatically jump to A10.


Here is a sample

A B C D
1 $A$5
2
3 2 Desired number
4 1
5 2 1 1
6 3
7 4
8 5
9 6
10 2 1 1
11 8
12 15
13 2 1 1
14 50
15 25
16 60

 

[CUSO19]

Dante I saw in the sample that column A is over row numbers. Please consider columns 1 space to the right.

 

[Fluff]

Maybe

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim KyCl As Range
   Set KyCl = Range("A1")
   On Error Resume Next
   Set KyCl = Union(KyCl, KyCl.Precedents)
   On Error GoTo 0
   With Range("A1")
      If Not IsError(.Value) Then Range(.Value).Activate
   End With
End Sub

 

[DanteAmor]

Try with this code:

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Count > 1 Then Exit Sub
  If Target.Column = 3 Then
    Range(Range("A1").Value).Select
  End If
End Sub

 

[CUSO19]

Thanks Dante, the code worked the way I wanted.