Excel 2016 genberegner
HejPludselig får jeg en besked om, at Excel genberegner formler i tidligere versioner af Excel når jeg forsøger at køre en af mine "gamle" makroer.
Så det er ligesom den åbner min Klientliste.xls i baggrunden men ikke bare kan lukke den igen som den plejer fordi den er i en ældre version af Excel ?
Jeg har prøvet af gemme klientliste.xls som xlsx fil, men det hjalp heller ikke.
Hvordan undgår jeg det ?
Const KunderSti = "H:\SHEETS\SR\Klientliste.xls"
Private Function søgKunde(kNr)
Set kXLS = CreateObject("Excel.application")
With kXLS
.Workbooks.Open KunderSti
.Sheets(1).Activate
Max = .ActiveCell.SpecialCells(xlLastCell).Row
For r = 1 To Max
If .Cells(r, 1) = kNr Then
søgKunde = .Cells(r, 2)
Exit Function
End If
Next r
End With
søgKunde = ""
MsgBox ("Det indtastede kundenr. kunne ikke findes")
End Function