Run-time error 1905: Длина строки превышает 255 символов

Люся

Гость

05.02.2010 07:46:18

Доброе утро!
При открытии файла на сетевом диске макрос заканчивается с ошибкой "Run-time error 1905: Длина строки превышает 255 символов". Не могу найти настройки в Ехсel 2007, чтобы увеличить значение этого параметра. В Ехсel 2003 этой ошибки не было, все работало замечательно.
При переносе таблицы в корень диска С ошибка исчезает. Но нужно, чтобы этот макрос выполнялся именно с сетевого диска, т.к. им пользуются неск. юзеров. Спасибо.

слэн

Пользователь

Сообщений: 5192 Регистрация: 16.01.2013

05.02.2010 09:42:38

видимо это связано с именем файла, имя файла и путь... :)

надо править макрос, которого мы не видим.

недавно обсуждали похожую тему - как вариант копировать файл во временную папку с более коротким путем

Живи и дай жить..

Dophin Пользователь Сообщений: 2684 Регистрация: 01.01.1970	#3 05.02.2010 09:45:48 либо строку разбить) грубо говоря s = путь i = имя файла строка = s & i

Guest

Гость

05.02.2010 09:58:21

Простите за предыд. сумбур. Искала именно настройки...
Выполнение прерывается при открытии источника данных.

Dim oWord As New Word.Application
oWord.Visible = False

Path_in = Application.ActiveWorkbook.Path
Path_out = "C:\Documents and Settings\" & Application.UserName & "\Мои документы"

MsgBox (Path_in)

'Открываю файл Конверт.doc

MsgBox ("Конверт.doc открыт")

'Перехожу к источнику данных слияния
oWord.ActiveDocument.MailMerge.OpenDataSource Name:= _
Path_in & "\Реестр писем.xls", ConfirmConversions:= _
False, ReadOnly:=False, LinkToSource:=True, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", WritePasswordDocument:="", _
WritePasswordTemplate:="", Revert:=False, Format:=wdOpenFormatAuto, _
Connection:="Provider=Microsoft.Jet.OLEDB.4.0;Password="""";User ID=Admin;" & "Data Source=" & Path_in & "\Реестр писем.xls;Mode=Read;Extended Properties=""HDR=NO;IMEX=1;"";Jet OLEDB:System database="""";Jet OLEDB:Registry Path="""";Jet OLEDB:Database Password="""";Jet " _
, SQLStatement:="SELECT * FROM `Реестр писем$`", SQLStatement1:="", SubType:= _
wdMergeSubTypeAccess

слэн

Пользователь

Сообщений: 5192 Регистрация: 16.01.2013

05.02.2010 10:05:57

ну... скорее всего connection длинноват. но в иксель на string не накладывается ограничения в 255 символов - значит это требование базы данных, а значит разбиением на несколько строк ничего не добиться..

Живи и дай жить..

Люся Гость	#6 05.02.2010 11:14:49 а в Оffice 2003 работает :(

слэн Пользователь Сообщений: 5192 Регистрация: 16.01.2013	#7 05.02.2010 12:08:37 а путь в 2003 такой же? Живи и дай жить..

слэн Пользователь Сообщений: 5192 Регистрация: 16.01.2013	#8 05.02.2010 12:09:55 какая длина строки получается в 2003? и какой строки? :) Живи и дай жить..

Читают тему