Good afternoon Tommy_gtr

Welcome to the world of event procedures!

You haven't given much background information about your project, s
I've assumed that your strikethrough macro is named macro1, and tha
you want to type OK in cell A1.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target A
Range)
If Range("A1").Value = "OK" Then Call macro1
End Sub

The code above will need copying into the ThisWorkbook pane within you
VBE and will call macro1 whenever "OK" is inserted into A1. For mor
info on event procedures have a look he

http://www.cpearson.com/excel/events.htm

HTH

Dominic

--
dominic
-----------------------------------------------------------------------
dominicb's Profile: http://www.excelforum.com/member.php...fo&userid=1893
View this thread: http://www.excelforum.com/showthread.php?threadid=39418

thank you for your answer,

but I'm a really beginner and I tried your code....it works, but firs
I must run your macro and then it call my "change font" macro.

but I'm looking for solution, which automatically change my font alway
when I typed "ok" in cell (for example in A1).

maybe I pasted your code on incorrect place.

If you have patience with me, please help....

Than

--
tommy_gt
-----------------------------------------------------------------------
tommy_gtr's Profile: http://www.excelforum.com/member.php...fo&userid=2608
View this thread: http://www.excelforum.com/showthread.php?threadid=39418