Thread: Make this into a toggle command? [XL2003]
View Single Post
  #7   Report Post  
Posted to microsoft.public.excel.programming
Jim Cone[_2_] Jim Cone[_2_] is offline
external usenet poster
  
Posts: 1,549
Default Make this into a toggle command? [XL2003]
Sub DoneAlready()
Dim Rw As Long
Rw = ActiveCell.Row
Range(Cells(Rw, 1), Cells(Rw, 2)).Font.Strikethrough = True
End Sub

Reply With QuoteReply With Quote