Problemer med calculate af en enkelt kolonne (ingen andre områder må beregnes)

Du mangler et s i Worksheet

Godt set ;-)

Det fik dog ikke funktionen til at opdatere kolonnen mens filen var åben. Må jeg sende dig filen?

Din kodelinie ser nu ellers rigtig nok ud
Men prøv bare at sende filen

Svaret fra Excelent var, at jeg havde fået byttet om på 2 og X i denne linje:

If Workbooks(xlsHome).Worksheets("Staff expenses").Cells(2, X) = C.Offset(0, -1) Then Workbooks(xlsHome).Worksheets("Staff expenses").Columns(X).Calculate

-----------------------------------

For Each C In Range("Filnavne").Cells

    If C.Value <> Empty Then Workbooks.Open Filename:=Sti + C.Value + "." + Filtype, ReadOnly:=True, IgnoreReadOnlyRecommended:=True
   
   
        For X = 1 To K
       
            If Workbooks(xlsHome).Worksheets("Staff expenses").Cells(2, X) = C.Offset(0, -1) Then Workbooks(xlsHome).Worksheets("Staff expenses").Columns(X).Calculate
                         
        Next X
       
    If C.Value <> Empty Then Workbooks(C.Value + "." + Filtype).Close SaveChanges:=False
   
Next C

ok et svar