Thread: Is there a more elegant way to macro this?
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Brad Brad is offline
external usenet poster
  
Posts: 846
Default Is there a more elegant way to macro this?
Sub changekey()
If Range("b1").Value = "Joint" Then
Range("key1").Value = "J" & Mid(Range("key1").Value, 2, 255)
End If
End Sub
Reply With QuoteReply With Quote