ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Объединение значений из нескольких ячеек
17 сообщений из 17, страница 1 из 1
Объединение значений из нескольких ячеек
    #38325908
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
Пытаюсь в макросе прописать, чтобы значение одной ячейки было составным из данных из двух других ячеек и строки.

Код: plsql
1.
Sheet.Cells('|| cRow ||', 3).Value = Sheet.Cells(23, 12).Value & "' || tab(1).cl.[NAME] || '" & Sheet.Cells(23, 14).Value



Значение из ячейки (23, 12) не переносится в нужную ячейку (cRow, 3)

Обе ячейки имеют формат Text

Отличие в том, что ячейка (cRow, 3) - это объединение нескольких ячеек из строки. А (23, 12) - просто ячейка.

Подскажите в чем проблема?
...
Рейтинг: 0 / 0
09.07.2013, 17:31
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38325943
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Пример файла с данными и вашим макросом можно?
...
Рейтинг: 0 / 0
09.07.2013, 17:47
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38325955
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
AndreTM,

Строка из PL_SQL, выполняющая описанные действия
Код: plsql
1.
excel.cmd('Sheet.Cells('|| cRow ||', 3).Value = Sheet.Cells(23, 12).Value & "' || tab(1).cl.[NAME] || '" & Sheet.Cells(23, 14).Value');



В результате формируется кусок VBA кода

Sheet.Cells(35, 3).Value = Sheet.Cells(23, 12).Value & "ООО Ромашка" & Sheet.Cells(23, 14).Value

где Sheet - переменная, хранящая текущий лист

Файл выложить, к сожалению, не могу
...
Рейтинг: 0 / 0
09.07.2013, 17:57
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38325964
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
danzkiSheet.Cells(35, 3).Value = Sheet.Cells(23, 12).Value & "ООО Ромашка" & Sheet.Cells(23, 14).ValueЕсли испольнить этот код прямо в Excel-файле - нужное действие происходит?
...
Рейтинг: 0 / 0
09.07.2013, 18:04
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326336
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
AndreTM,

нет

пробовал даже так

Sheet.Cells(35, 3).Value = Sheet.Cells(23, 12).Value

как я понимаю, это просто присваиваение значения одной ячейки другой ячейке.
...
Рейтинг: 0 / 0
10.07.2013, 10:01
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326343
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
а если
Код: vbnet
1.
Workbooks("Книга1.xls").Worksheets("Лист1").Cells(35, 3).Value =....



и вообще, тупо ничего не происходит или ошибка какая-нибудь выдается?
...
Рейтинг: 0 / 0
10.07.2013, 10:05
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326379
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
Shocker.Pro,

Код: vbnet
1.
2.
3.
Sub mrc1()
    Workbooks("test_file.xlsx").Worksheets("Letter_tmp").Cells(31, 3).Value = Workbooks("test_file.xlsx").Worksheets("Letter_tmp").Cells(23, 12).Value
End Sub



не работает это...

файл не могу приложить, залочено все...

Может объединение ячеек (merge) влиять?
...
Рейтинг: 0 / 0
10.07.2013, 10:33
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326382
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
Shocker.Pro,

Код: vbnet
1.
2.
3.
Sub mrc1()
    Workbooks("test_file.xlsx").Worksheets("Letter_tmp").Cells(31, 3).Value = Workbooks("Sum_Reply_Generation_Report_Auditor1.xlsx").Worksheets("Letter_tmp").Cells(23, 12).Value
End Sub



не работает это...

файл не могу приложить, залочено все...

Может объединение ячеек (merge) влиять?
...
Рейтинг: 0 / 0
10.07.2013, 10:34
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326390
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
danzkiМожет объединение ячеек (merge) влиять?ну так а без него попробовать слабо?
...
Рейтинг: 0 / 0
10.07.2013, 10:39
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326398
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
danzki,

У вас случайно офис не 2007/2010, а файл - XLSX?
...
Рейтинг: 0 / 0
10.07.2013, 10:46
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326399
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
[quot danzki]
Код: vbnet
1.
2.
3.
Sub mrc1()
    Workbooks("test_file.xlsx").Worksheets("Letter_tmp").Cells(31, 3).Value = Workbooks("test_file.xlsx").Worksheets("Letter_tmp").Cells(23, 12).Value
End Sub


quot]

При таком варианте пишет Script out of range
...
Рейтинг: 0 / 0
10.07.2013, 10:46
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326401
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Ага, вижу что XLSX... Что ж вы макросы пытаетесь исполнять в файле, который макросы не поддерживает?
...
Рейтинг: 0 / 0
10.07.2013, 10:47
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326402
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
AndreTM,

проверяю на 2010 офисе, но

из PL/SQL запускает файл-шаблон xlt и работает все в офисе 2003
...
Рейтинг: 0 / 0
10.07.2013, 10:47
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326405
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
AndreTM,

дык он и в xlsm выдает Аут оф Рэндж
...
Рейтинг: 0 / 0
10.07.2013, 10:48
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326410
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
Код: vbnet
1.
2.
3.
Sub mcr1()
    Workbooks("test_file.xlsm").Worksheets("Letter_tmp").Cells(31, 3).Value = Workbooks("test_file.xlsm").Worksheets("Letter_tmp").Cells(23, 12).Value
End Sub



файл xlsm.
никаких ошибок тупо ничего не делает.
...
Рейтинг: 0 / 0
10.07.2013, 10:50
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326411
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Ну, раз вы пример выложить не можете - дальше сказать пока нечего...
...
Рейтинг: 0 / 0
10.07.2013, 10:52
| Ответить | Цитировать | Написать  
Объединение значений из нескольких ячеек
    #38326412
danzki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
danzki
Участник
AndreTM,

сорри. ладно сам разберусь.

спасибо.
...
Рейтинг: 0 / 0
10.07.2013, 10:53
| Ответить | Цитировать | Написать  
17 сообщений из 17, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Объединение значений из нескольких ячеек
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=55&tid=2156871]:
 0ms
get settings:
 10ms
get forum list:
 17ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 38ms
get topic data:
 14ms
get forum data:
 3ms
get page messages:
 58ms
get tp. blocked users:
 2ms
others: 282ms
total:  432ms
созд. / загр.: 432ms
x
x
Закрыть


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