diff --git a/lib/roo/base.rb b/lib/roo/base.rb
index 6a41625..e4137ba 100644
--- a/lib/roo/base.rb
+++ b/lib/roo/base.rb
@@ -683,9 +683,9 @@ def cell_to_csv(row, col, sheet)
 
       case celltype(row, col, sheet)
       when :string
-        %("#{onecell.tr('"', '""')}") unless onecell.empty?
+        %("#{onecell.gsub('"', '""')}") unless onecell.empty?
       when :boolean
-        %("#{onecell.tr('"', '""').downcase}")
+        %("#{onecell.gsub('"', '""').downcase}")
       when :float, :percentage
         if onecell == onecell.to_i
           onecell.to_i.to_s
@@ -695,7 +695,7 @@ def cell_to_csv(row, col, sheet)
       when :formula
         case onecell
         when String
-          %("#{onecell.tr('"', '""')}") unless onecell.empty?
+          %("#{onecell.gsub('"', '""')}") unless onecell.empty?
         when Float
           if onecell == onecell.to_i
             onecell.to_i.to_s
@@ -712,7 +712,7 @@ def cell_to_csv(row, col, sheet)
       when :time
         integer_to_timestring(onecell)
       when :link
-        %("#{onecell.url.tr('"', '""')}")
+        %("#{onecell.url.gsub('"', '""')}")
       else
         fail "unhandled celltype #{celltype(row, col, sheet)}"
       end || ''