AW: [AccessD] Visual Basic error

Garraway, Alun Alun.Garraway at otto.de
Fri Sep 26 06:46:12 CDT 2003


hallo Kathryn,

two more things to try

1. Dim txtFile as String ' according to help this must be a string
				 ' but if I read correctly the user enters a number
				 ' and u have declared a variant (?) only savefile is
				 ' a string..... thats vb..
2. Origin:=xlWindows

btw you rearly need the "select" in xl e.g

Range("A1").FormulaR1C1 = "activity"
is the same as 

Range("B1").Select
    ActiveCell.FormulaR1C1 = "activity"

HTH
alun


-----Ursprüngliche Nachricht-----
Von: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kathryn
Bassett
Gesendet: Freitag, 26. September 2003 01:32
An: Access Developers discussion and problem solving
Betreff: RE: [AccessD] Visual Basic error


Stuart McLachlan suggested:
> Just a WAG, but did you leave the last comma in when you deleted the 
> last argument? If so, it will still be looking for another argument.

Well, that solved part of it. At least now it opens the dialog box for me to put the 4 digit extension. But now a new problem.

RunTime Error 1004
Method 'OpenText' of object 'Workbooks' failed.
It yellow highlights this section of the code:
    Workbooks.OpenText Filename:= _
        txtfile, Origin:=437, StartRow _
        :=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
        ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=True, _
        Space:=False, Other:=False, FieldInfo:=Array(Array(1, 9), Array(2, 9), Array( _
        3, 2), Array(4, 1), Array(5, 2), Array(6, 1), Array(7, 2))

Anymore WAG's for the next glitch?

--
Kathryn Rhinehart Bassett (Pasadena CA)
"Genealogy is my bag" "GH is my soap"
kathryn at bassett.net
http://bassett.net  

_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


More information about the AccessD mailing list