27. oktober 2005 - 16:02Der er
15 kommentarer og 1 løsning
run-time error 1004 ved åbning af txt fil i excel
Kære alle, hvorfor giver følgende kode en fejl 1004 for 2 ud af 10 separate brugere, når de andre kan eksekvere det uden problemer?
Hver bruger har fået tilsendt en excel-fil, der kan importere txt filer ind i en formular (= excel ark). Systemet er testet i Excel 2003
KODE:
Dim fileToOpen As String Dim thisWorkbook, importWorkbook As Workbook ... Set thisWorkbook = ActiveWorkbook fileToOpen = Application.GetOpenFilename("Text Files (*.txt), *.txt")
og derefter fint kan køre de næste 3 linjer, (if-konstruktionen) - derefter fejler den. Dermed tolker vi ikke netværk mv. + selve tekstfilen som årsag til fejlen - men hvad er det så???
Som altid - på forhånd mange tak for alle input og bidrag der kan redde mig.
Jeg kan umiddelbart komme i tanke om to ting, der kan gå galt her. origin er her defineret som 65001 (dette kan være xl97 problemet), prøv istedet at skrive origin = xlWindows eller check at der i vba-editoren under tools/references er flueben i Microsoft office xx object library
tak for kommentarene - vi vil straks afprøve de nævnte hints. 65001 var medtaget for at kunne håndtere DK-tegn, gør xlWindows det samme, eller har vi misforstået origin...
Brug af reserverede ord er selvfølgelig ikke smart - det skal ikke gentage sig :o)
Vi har nu forsøgt efter bedste evne at: * sikre at flueben er sat til til Microsoft office xx object library * sikre at security level er ens på maskinerne * rettet ThisWorkbook til AktuelWorkbook * ændret 65001 til xlWindows
- INGENTING hjælper - stadig samme debug error fejl på samme linje kode:
Ny udvikling - nu virker det principielt, når vi udskifter 65001 med xlWindows. Måske var det en fejl-40 da jeg før sagde at testen med xlWindows ikke lykkedes - for det gør den nu.
Desværre mister vi de danske specialtegn ved dette skift til origin:=xlWindows- kan vi (uden alt for stor indsats) undgå at miste de danske specialtegn?
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.