Help with automating Application.GoTo fuction.

[RagingR12]

Hello! I usually come here for help when I can't find what I'm looking for, so maybe someone can help me.

I have a column with cell address:
[TABLE="width: 80"]
<tbody>[TR]
[TD]$B$896[/TD]
[/TR]
[TR]
[TD]$F$994[/TD]
[/TR]
[TR]
[TD]$N$103[/TD]
[/TR]
[TR]
[TD]$V$961[/TD]
[/TR]
[TR]
[TD]$AH$509[/TD]
[/TR]
[TR]
[TD]$AX$222[/TD]
[/TR]
[TR]
[TD]$BB$1050[/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
</tbody>[/TABLE]

Now wat I want, is to go automatically trough the list, and place a * in the given cell address.
But I can’t make it work with Application.GoTo function in VBA

De addresse are in the same work sheet.

Thanks for any help.

 

[pgc01]

Same, without the loop

Sub Cell_Loop()

Range(Join(Application.Transpose(Range("GO2:GO4")), ",")).Value = "*"

End Sub

 

[RagingR12]

Thanks for all the help it works great.

 

[My Aswer Is This]

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.

Thanks for all the help it works great.