Red over White
Board Regular
- Joined
- Jul 16, 2011
- Messages
- 123
- Office Version
- 365
- Platform
- MacOS
I am struggling to work out why the following macro isn't working
Sub Macro1()
' F2986 formula is =Cash!XX76
Dim CC1 As String
CC1 = Val(InputBox("Enter two letter code", "Column code", 2)) ' Entering BD
Range("F2986").Select
Selection.Replace What:="XX", Replacement:=CC1, LookAt:=xlPart
Range("F2987").Select
End Sub
Any suggestions?
Sub Macro1()
' F2986 formula is =Cash!XX76
Dim CC1 As String
CC1 = Val(InputBox("Enter two letter code", "Column code", 2)) ' Entering BD
Range("F2986").Select
Selection.Replace What:="XX", Replacement:=CC1, LookAt:=xlPart
Range("F2987").Select
End Sub
Any suggestions?