Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Возможно ли скопировать значение функции в буфер обмена / 18 сообщений из 18, страница 1 из 1
08.03.2010, 13:45
    #36507436
dizzy1984
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Существует возможность установить функцию, вычисляемую на основе значений в выделенной группе ячеек, которая будет отображаться в выбранном поле статус бара excel. Можно ли это значение скопировать в буфер обмена?
...
Рейтинг: 0 / 0
08.03.2010, 18:51
    #36507700
nporaMep
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
dizzy1984,

dim tmp as long
tmp = worksheetfunction.count(selection)
range("A1").value=tmp
range("A1").copy
...
Рейтинг: 0 / 0
08.03.2010, 19:45
    #36507749
vlth
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
...
Рейтинг: 0 / 0
09.03.2010, 05:19
    #36508053
Сергей06
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
dizzy1984,
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
Sub Колво_выделенных_ячеек_копирование_в_буфер_2()
iSum = Application.CountA(Selection)
'Подключи Microsoft Forms 2.0 Object Library
Set MyData = New DataObject
   MyData.SetText iSum
   MyData.PutInClipboard
End Sub

Sub Сумма_выделенных_ячеек_копирование_в_буфер_2()
iSum = Application.Sum(Selection)
'Подключи Microsoft Forms 2.0 Object Library
Set MyData = New DataObject
   MyData.SetText iSum
   MyData.PutInClipboard
End Sub

Sub Среднее_выделенных_ячеек_копирование_в_буфер_2()
iAverage = Application.Average(Selection)
'Подключи Microsoft Forms 2.0 Object Library
Set MyData = New DataObject
   MyData.SetText iAverage
   MyData.PutInClipboard
End Sub

Sub ПромежуточныеИтоги_выделенных_ячеек_копирование_в_буфер_2()
iSum = Application.Subtotal( 109 , Selection)
'Подключи Microsoft Forms 2.0 Object Library
Set MyData = New DataObject
   MyData.SetText iSum
   MyData.PutInClipboard
End Sub
http://www.sql.ru/forum/actualthread.aspx?tid=436633&hl=application+sum#4224561
...
Рейтинг: 0 / 0
09.03.2010, 16:42
    #36509420
dizzy1984
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Сергей06, спасибо, а можно как-то сделать, чтобы эти макросы были доступны в вновь созданных документах? Будет слишком накладно добавлять их к каждой книге с которой идет работа.
...
Рейтинг: 0 / 0
09.03.2010, 16:57
    #36509473
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
dizzy1984а можно как-то сделать, чтобы эти макросы были доступны в вновь созданных документах? Будет слишком накладно добавлять их к каждой книге с которой идет работа.
Помести их в PERSONAL.XLS, а на панели можно сделать для них кнопки - будут доступны всегда на этом компьютере.
...
Рейтинг: 0 / 0
10.03.2010, 07:48
    #36510508
Valll
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Хороший вопрос - отличный ответ!
...
Рейтинг: 0 / 0
10.03.2010, 08:58
    #36510579
Сергей06
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Valll, иронизируете?
Требуется пояснение, как сделать то, что предлагает Hugo121?
...
Рейтинг: 0 / 0
10.03.2010, 09:35
    #36510644
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Сергей06, вопросы всвязи с PERSONAL.XLS или кнопками?
...
Рейтинг: 0 / 0
10.03.2010, 09:41
    #36510655
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Если проблема с кнопками, на картинке всё видно - создаём новую кнопку, меняем её картинку, задаём макрос (в данном случае сортировка всей таблицы по убыванию по активному столбцу).
...
Рейтинг: 0 / 0
10.03.2010, 13:06
    #36511322
Сергей06
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Hugo121, я не знаю, что имел ввиду Valll.
Я пользуюсь этими макросами в персональном файле и кнопками.
Мне пока удобно.
...
Рейтинг: 0 / 0
10.03.2010, 16:30
    #36512111
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Сергей06,
извините, неверно понял суть ответа... Но ничего, лишним не будет :)
...
Рейтинг: 0 / 0
17.03.2010, 20:29
    #36527059
Valll
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Блин, какая ирония - я серьёзно! Я уже пользуюсь вашим макросом и доволен как слон!!!

Если бы вы посоветовали как автоматически вставить значение (числовое) из буфера обмена в текстовое поле в форме (при её загрузке ), при выполнении макроса... А то что то не нахожу решения.

Ещё раз повторю: приведённые макросы Сергеем06 просто великолепны! Всем бы рекомендовал воткнуть их в PERSONAL.XLS
...
Рейтинг: 0 / 0
17.03.2010, 20:47
    #36527072
vlth
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
ValllЕсли бы вы посоветовали как автоматически вставить значение (числовое) из буфера обмена в текстовое поле в форме (при её загрузке ), при выполнении макроса... А то что то не нахожу решения.
Valll, а что, по приведённой мной выше ссылке пройти влом? - там есть то, что Вам нужно.
...
Рейтинг: 0 / 0
17.03.2010, 21:08
    #36527102
Valll
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
vlth

Да, прошёл по вашей ссылки - буду изучать. Несколько более сложнее, чем я ожидал. Спасибо за наводку.
...
Рейтинг: 0 / 0
17.03.2010, 21:51
    #36527154
Valll
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Всё просто: Forma.textBox.Paste
...
Рейтинг: 0 / 0
17.03.2010, 22:16
    #36527190
vlth
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
ValllНесколько более сложнее, чем я ожидал. Valll, что сложного?
Код: plaintext
1.
2.
3.
Dim MyData As DataObject
Set MyData = New DataObject
MyData.GetFromClipboard
Forma.TextBox = MyData.GetText( 1 )
...
Рейтинг: 0 / 0
18.03.2010, 19:39
    #36529491
Valll
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Возможно ли скопировать значение функции в буфер обмена
Спасибо, пригодится!
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Возможно ли скопировать значение функции в буфер обмена / 18 сообщений из 18, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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