Formel indsat med VBA give Fejl: Ugyldigt navn

Prøv med
ActiveCell.FormulaLocal = "=HVIS(ER.TOM(" & Onsketslutdato_cell & "),0,1)"

Eller
ActiveCell.Formula = "=IF(IsBlank(" & Onsketslutdato_cell & "),0,1)"

Dette giver en tom celle uden indhold?:(

også en tom celle når jeg bruger IsBlank :(

Hvordan ser formlen ud?

Som ovenfor angivet. Selve variablen peger på hen på en anden celle. HVIS sætningen skal bare efterprøve om den er tom. Det er ingen problem at få den til at skrive den formel der er angivet i mit første indlæg, den vil bare ikke beregne det, før end jeg har dobbelt klikket på cellen.

Sub test()
  Dim Onsketslutdato_cell
  Onsketslutdato_cell = "B2"
  ActiveCell.Formula = "=IF(IsBlank(" & Onsketslutdato_cell & "),0,1)"
End Sub


Giver en formel =IF(ISBLANK(B2);0;1)

(min Excel er engelsk)

Og =HVIS(ER.TOM(B2),0,1)i en dansk Excel.

Min er en dansk Excel, og det er lige præcis ovenstående jeg får, Excel vil bare ikke "beregne" cellens indhold.

Jeg fylder cellerne med følgende kode.

ActiveCell.Offset(1, 1).Select
ActiveCell.Value = "=IF(ER.TOM(" & Onsketslutdato_cell & "),""0"",""1"")"
Selection.AutoFill Destination:=Range(ActiveCell, ActiveCell.Offset(last_row, 0))
ActiveCell.End(xlUp).Select

Helt banalt - har du tjekket at beregningsindstillingerne er sat til "Automatisk" siden resultatet kommer ved dbl-klik.

Jep, beregning er sat til automatisk, og det hjælper ikke at trykke på F9. Den havde jeg prøvet, det kunne ellers have været sjovt:) :Men tak for spørgsmålet.

Prøv denne i stedet:

ActiveCell.Formula = "=IF(ISBLANK(" & Onsketslutdato_cell & "),""0"",""1"")"

Den virker i mit regneark :-)

Gæt:
ActiveCell.Formula = "=IF(ISBLANK(Onsketslutdato),0,1)"

Det er altid godt med lidt søvn, thor_ostergaard var den første på sporet. Da jeg gik til koden fra morgenstunden, stod det hele klart.
Der manglede en parentes på bagkanten, så nu er koden som følger.

ActiveCell.Formula = "=IF(IsBlank(" & Onsketslutdato_cell & "),""Ingen ønsket slut dato"",IsoWeekNumber(" & Onsketslutdato_cell & "))"

Så tak til jeg alle for bidrag, men jeg synes thor_ostergaard må løbe med points. Vil du smide et svar.

Så tak til jer alle for bidrag, men jeg synes thor_ostergaard må løbe med points. Vil du thor_ostergaard smide et svar.