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

dim tmp as long
tmp = worksheetfunction.count(selection)
range("A1").value=tmp
range("A1").copy
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36507749
Фотография vlth
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #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
Возможно ли скопировать значение функции в буфер обмена
    #36509420
dizzy1984
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сергей06, спасибо, а можно как-то сделать, чтобы эти макросы были доступны в вновь созданных документах? Будет слишком накладно добавлять их к каждой книге с которой идет работа.
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36509473
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
dizzy1984а можно как-то сделать, чтобы эти макросы были доступны в вновь созданных документах? Будет слишком накладно добавлять их к каждой книге с которой идет работа.
Помести их в PERSONAL.XLS, а на панели можно сделать для них кнопки - будут доступны всегда на этом компьютере.
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36510508
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Хороший вопрос - отличный ответ!
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36510579
Сергей06
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Valll, иронизируете?
Требуется пояснение, как сделать то, что предлагает Hugo121?
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36510644
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сергей06, вопросы всвязи с PERSONAL.XLS или кнопками?
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36510655
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Если проблема с кнопками, на картинке всё видно - создаём новую кнопку, меняем её картинку, задаём макрос (в данном случае сортировка всей таблицы по убыванию по активному столбцу).
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36511322
Сергей06
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hugo121, я не знаю, что имел ввиду Valll.
Я пользуюсь этими макросами в персональном файле и кнопками.
Мне пока удобно.
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36512111
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сергей06,
извините, неверно понял суть ответа... Но ничего, лишним не будет :)
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36527059
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Блин, какая ирония - я серьёзно! Я уже пользуюсь вашим макросом и доволен как слон!!!

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

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

Да, прошёл по вашей ссылки - буду изучать. Несколько более сложнее, чем я ожидал. Спасибо за наводку.
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #36527154
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всё просто: Forma.textBox.Paste
...
Рейтинг: 0 / 0
Возможно ли скопировать значение функции в буфер обмена
    #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
Возможно ли скопировать значение функции в буфер обмена
    #36529491
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, пригодится!
...
Рейтинг: 0 / 0
18 сообщений из 18, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Возможно ли скопировать значение функции в буфер обмена
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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