diff --git a/ChangeLog b/ChangeLog
index e66a1e0a4c..150ac168e8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Tue Sep  9 21:55:39 2014  Masaki Suketa <masaki.suketa@nifty.ne.jp>
+
+	* ext/win32ole/sample/excel2.rb: remove some commented-out code.
+	  rotate graph more slowly to see graph clearly.
+
 Tue Sep  9 19:52:33 2014  Koichi Sasada  <ko1@atdot.net>
 
 	* gc.c: rename rb_objspace_t::marked_objects to marked_slots.
diff --git a/ext/win32ole/sample/excel2.rb b/ext/win32ole/sample/excel2.rb
index dbe4178051..95af61ceb6 100644
--- a/ext/win32ole/sample/excel2.rb
+++ b/ext/win32ole/sample/excel2.rb
@@ -4,11 +4,9 @@ require 'win32ole'
 ChartTypeVal = -4100;
 
 #   Creates OLE object to Excel
-#excel = WIN32OLE.new("excel.application.5")
 excel = WIN32OLE.new("excel.application")
 
 # Create and rotate the chart
-
 excel.visible = TRUE;
 excel.Workbooks.Add();
 excel.Range("a1").value = 3;
@@ -18,13 +16,12 @@ excel.Range("a1:a3").Select();
 excelchart = excel.Charts.Add();
 excelchart.type = ChartTypeVal;
 
-i = 30
+i = 0
 i.step(180, 10) do |rot|
-#    excelchart['Rotation'] = rot;
     excelchart.rotation=rot;
+    sleep 0.1
 end
 # Done, bye
 
 excel.ActiveWorkbook.Close(0);
 excel.Quit();
-