Jeg sidder med et problem hvor jeg har brug for at kunne spørge om en .xla fil (fx ABC-CAPTICS.XLA) er tilgængelig for min kode.
Dvs. jeg skal kunne lave et spørgsmål i stil med: Hvis fil ABC-CAPTICS.xla er tilgængelig så gør X. Min kode bruger senere hen spørgsmålet: If AddIns("ABC-CAPTICS").Installed = true then og det er her koden fejler når man ikke har .xla filen ABC-CAPTICS.xla i sin project explorer.
Så hvis der er nogen der ved hvad jeg kan spørge på, når min kode siger AddIns("FIH-captics").Installed = <Subscript out of range> og derefter fejler, så vil jeg være meget taknemmelig. Jeg skal i menneske sprog spørge hvis denne xla fil eksiterer (Er tilgængelig for koden) så skal du gøre A eller B.
Jeg sidder med et problem hvor jeg har brug for at kunne spørge om en .xla fil (fx ABC-CAPTICS.XLA) er tilgængelig for min kode.
Dvs. jeg skal kunne lave et spørgsmål i stil med: Hvis fil ABC-CAPTICS.xla er tilgængelig så gør X. Min kode bruger senere hen spørgsmålet: If AddIns("ABC-CAPTICS").Installed = true then og det er her koden fejler når man ikke har .xla filen ABC-CAPTICS.xla i sin project explorer.
Så hvis der er nogen der ved hvad jeg kan spørge på, når min kode siger AddIns("FIH-captics").Installed = <Subscript out of range> og derefter fejler, så vil jeg være meget taknemmelig. Jeg skal i menneske sprog spørge hvis denne xla fil eksiterer (Er tilgængelig for koden) så skal du gøre A eller B.
Function CheckAddIN(AddINNAME as String) as Boolean On Error goto ADDINFALSE AddIns(AddINNAME).Installed = true CheckAddIN = True Exit Function ADDINFALSE: CheckAddIN = False End Function
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
