powered by simpleCommunicator - 2.0.49     © 2025 Programmizd 02
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Синтаксис Ексель>Access
14 сообщений из 14, страница 1 из 1
Синтаксис Ексель>Access
    #32516349
Фотография Ирча
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет всем!
Подскажите, кто знает.
Если я в Excele пишу формулу

1) =СУММЕСЛИ(B211:B218;"=*Всего*";C211:C219)
Если мне надо копировать ее, а ссылка B211:B218 не менялась автоматически
на с211:с218, и т.д. я делаю так:

2) =СУММЕСЛИ($B211:$B218;"=*Всего*";C211:C219),

В модуле Аccess первоначальная формула выглядит так:
= "=SUMIF(R[1]C[-1]:R[8]C[-1],""=*Всего*"",R[1]C:R[9]C)"

как мне ее привести во второй вид?
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516396
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Насколько я помню, в экселе у объекта Range есть св-ва Formula, FormulaLocal, FormulaR1C1, FormulaR1C1Local
Вот с этими св-вами и попробуй поиграть
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516410
Фотография Ирча
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Большое спасибо, а можно еще!!

Почему такая конструкция работает нестабильно, через 2-3 вывода отчета выдает ошибку
Dim WB As Excel.Workbook
Dim ws As Dim WB As Excel.Workbook
Dim ws As Excel.Worksheet
ws.Cells(10, 3).Select
Selection.AutoFill Destination:=ws.Range("C10:AH10"), Type:=xlFillDefault
ws.Range("C10:AH10").Select
ws это Worksheet
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516434
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что за ошибка? И в какой строке?
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516468
Фотография Ирча
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сообщение:
Run-time error '91': Object variable or With block variable not set

ругается на строку

Selection.AutoFill Destination:=ws.Range("C10:AH10"), Type:=xlFillDefault
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516487
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У тебя или Selection отсутствует, что маловероятно (после явного вызова Select), или ws куда-то потерялся (а куда потерялся - непонятно, ибо не видно откуда он взялся)
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516496
Фотография Ирча
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ws взялся отсюда

Set WB = xl.Workbooks.Add("D:\Шаблон.xlt")
Set ws = WB.Worksheets(1)
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516505
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У тебя испольуется 3 объекта:
Selection (типа Range)
ws (типа Worksheet)
ws.Range("C10:AH10") (типа Range)

Вот когда в ошибку сваливаешься - смотри отладчике, кто же из них nothing
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516512
Фотография Ирча
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Отвечаю на 1 вопрос, вдруг кому-то надо
Второй вариант записи делается так:

= "=SUMIF(R[1]C2:R[8]C2,""=*Всего*"",R[1]C:R[9]C)"
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516530
Фотография Ирча
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторВот когда в ошибку сваливаешься - смотри отладчике, кто же из них nothing
Смешной вопрос, а как это делается.
при наведении курсора ничего не показывает, а по другому я не умею...
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32516605
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Выделяешь мышкой - жмешь Shift-F9 - жмешь "добавить" - и просматриваешь объект (если он есть) либо любуешься на слово "Nothing" (если его нет)
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32517231
Фотография Ирча
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Selektion - nothing
Ровно через раз
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32517325
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Попробуй явно ExcelObject.Selection, где ExcelObject ссылка на Excel.Application.
...
Рейтинг: 0 / 0
Синтаксис Ексель>Access
    #32517335
Фотография Ирча
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ой, какие Вы все-таки умные!!!!
Заработало!!!
Спасибо
...
Рейтинг: 0 / 0
14 сообщений из 14, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Синтаксис Ексель>Access
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]