Try
ActiveCell.Offset(1, 0).Value = "'" & ActiveCell.FormulaLocal
From: ExcelVBA@yahoogroups.com [mailto:ExcelVBA@yahoogroups.com] On Behalf Of Torstein Johnsen
Sent: 21 March 2014 14:42
To: ExcelVBA@yahoogroups.com
Subject: [ExcelVBA] activecell.formula translates to english
Little activity in the last months, may be someone can help me with this one:
I like to write the cell formula in the cell next to the active cell by this sub
Sub Makro3()
'
ActiveCell.Offset(1, 0).Value = "'" & ActiveCell.Formula
End Sub
It works very well, but it translates the formula from norwegian (my excel version) to english
My formula in the active cell is =hvis(B3=3;3;5) and in the cell next to it I get =if(B3=3;3;5)
Thank you for helping me!
Torstein
| Reply via web post | Reply to sender | Reply to group | Start a New Topic | Messages in this topic (2) |
Be sure to check out TechTrax Ezine for many, free Excel VBA articles! Go here: http://www.mousetrax.com/techtrax to enter the ezine, then search the ARCHIVES for EXCEL VBA.
----------------------------------
Visit our ExcelVBA group home page for more info and support files:
http://groups.yahoo.com/group/ExcelVBA
----------------------------------
More free tutorials and resources available at:
http://www.mousetrax.com
----------------------------------
Tidak ada komentar:
Posting Komentar