F2 enter

[igordep]

Hi,
Probably already handled in the past (although I can't find something in the archive), but I am in need of an excel macro that will be able to let me F2 (edit cell) on a certain range

Thanks for the help
Igor

 

[jim may]

Are you dealing with a cell formatting issue in any way?

 

[Datsmart]

Below code is same as Opening Cell in Edit mode and Hitting Enter for listed Range:

Sub TestF2Enter()
    Set Rng = Sheets("Sheet1").Range("A1:D5")
    For Each c In Rng
        MyStuff = c.Formula
        c.Formula = MyStuff
    Next c
End Sub

 

[igordep]

Hello John,

Thanks for your answer, but your code does not have the same result as F2 + enter... I have a formula in my VBA code which results in #NAME?
when I go into the cell (via F2) and enter, the #NAME? changes in the correct result of the formula, so I should need code to do this in each cell in my range (+- 1000 lines);
fyi, the formula I have in my code is a very simple one: if(B1>1;D1-C1;"")
maybe it's just a general cell formatting problem... I'm far from an expert

in case you should know how to solve this, thanks in advance for your answer !

Best regards,
igor

 

[SydneyGeek]

Change the semicolons to commas.

Denis

 

[DonkeyOte]

else apply the function with FormulaLocal rather than Formula

 

[jasonb75]

Change the semicolons to commas.

Denis

I would guess that the semicolons are correct Denis, used in place of commas to delimit formula with some european language settings.

If FormulaLocal doesn't work, maybe Sendkeys would be the easiest way.

 

[igordep]

Hello Jason,

what would be the code via the SendKey method ?

txs,
igor

 

[DonkeyOte]

I believe Denis was simply informing OP to use US centric delimiters when writing formulas to worksheet via VBA
(FormulaLocal is however sometimes easier for the developer pending their familiarity with US delimiters)

 

[DonkeyOte]

igor,

I would suggest posting the code you are using to insert the formula in the first instance... you should not need to use SendKeys.

To elaborate on the advice given previously by means of example:

US-Centric Delimiters using Formula property

Range("E1:E1000").Formula = "=IF(B1>1,D1-C1,"""")"

the above will convert to Local delimiters automatically when posted to the worksheet object

Local Delimiters using FormulaLocal property:

Range("E1:E1000").FormulaLocal = "=IF(B1>1;D1-C1;"""")"