Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Форматирование графика функции пожалуйста помогите мне с кодом нужно нарисовать графк функцииб я его нарисовала, и еще этот график должен быть разбит на деления Добавлено через 2 минуты кто-нибудь знает как разбить график функции на деления??Ответьте пожалуйста https://www.cyberforum.ru/ vba/ thread244540.html VBA Какая сумма больше
разработать подпрограмму для вычисления суммы элементов с четными и нечётными номерами выделенного диапазона рабочей таблицы.Выяснить, какая сумма больше.Элементы массива задать самостоятельно через функцию Input box!!!!!
VBA Поиск минимального элемента в массиве Написал на С, заработало, на VBA не хочет(, помогите пожалуйста исправить. В Excel я в ячейках ввел цифры и мне нужно найти минимальную и вывести. Вот код на VBA Function Min(a() As Variant) As Variant Dim i, j, Min, n As Variant n = 10 i = 0 For j = i + 1 To n Step 1 If a(i) > a(j) Then Min = j Else https://www.cyberforum.ru/ vba/ thread244410.html VBA Сравнение строк в Excel Всем привет! Столкнулся с задачей, достаточно интересной, но в виду отсутствия у меня опыта работы со строками, очень для меня непростой. Задача следующая: Есть, допустим, 500 сток текста, в которых хранятся адреса. Нужно проверить каждый из адресов на совпадения. Т.е. есть ли в таблице еще такие же адреса. Вся проблема заключается в том, что даже самые одинаковые адреса могут быть записаны... https://www.cyberforum.ru/ vba/ thread244384.html
VBA программирование обьединений
Добрый день Есть Excel лист на котором некоторые ячейки обединены(см. вложение) , как бы мне программно эмулировать нажатие на определённый плюс/минус (например 5-ю неделю открыть, а 6-ю закрыть) Запись макросов чтото не помогает Натолкните на ответ, заранее благодарен
VBA Отбор и выделения значений из строк https://www.cyberforum.ru/ vba/ thread244247.html
Доброго времени суток! Прошу помоч с написанием макроса. Таблица в Эксель. В одном из столбцов Range("B5:B5004"), нужно проверить все на число символов и если их НЕ 13, изменить шрифт ячейки на красный жирный. Если возможно ещё такой: Та же таблица, та же колонка, те же строки, нужно найти руские буквы в тексте и выделить их жирным, допустим синим цветом If c Like "**" :)
VBA Форма с Combobox Подскажите пожалуйста как реализовать следующую задачу: Всплывает форма с 2-мя Combobox 1. одним выбираю дату (месяц) - результат подставляется на лист. 2. другим выбираю получателя и в зависимости от выбранного получателя подставляется сам получатель, договор и ФИО директора. Ссылка на прикрепленный файл. ( красным выделено то что меняется ) ... https://www.cyberforum.ru/ vba/ thread244178.html VBA добавить пробел
Подскажите, что нужно добавить в следующий код, чтобы между словами в строках Cells(9, 1) и Cells(9, 2) ставился пробел? "<font face=arial><a href=mailto:" + Worksheets("Body").Cells(9, 1) + ">" + Worksheets("Body").Cells(9, 1) + "</a></font>" + _ "<font face=arial><b>" + Worksheets("Body").Cells(9, 2) + "</b></font><br><br>"
VBA Формулы и сombobox https://www.cyberforum.ru/ vba/ thread244111.html
Здравствуйте! У меня два вопроса. 1. Разместила на листе в Excel'е ComboBox (вручную, не программно). Но теперь не знаю, как обратиться к нему из макроса или написать процедуру обработки.То есть я не знаю имя, через которое к нему можно обратиться. В окошке в экселе, где обычно видно адрес ячейки, при выделении этого комбобокса появляется надпись Drop Down 7. Но и по этому имени обратиться к...
VBA Проца обработки DropDownList https://www.cyberforum.ru/ vba/ thread243969.html
Sub AddDropDownList(NameLst, SourceRng, LstRange, LinkAddr As Variant) Dim selRan, sran As Range Set selRan = Selection Set sran = Range(SourceRng) Dim x, y, w, h As Double x = sran.Left + 1 y = sran.Top + 1 w = sran.Width - 2 h = sran.Height - 1.5
VBA Нахождение и перестановка элементов
помогите пожалуйста. Надо программу создать в Excel Разработать программу для нахождения и перестановке местами элементов видемого диапазона рабочей таблице с максимальным и минимальным значением.Элементы массива задать через функцию InputBOX Добавлено через 1 час 51 минуту можете помоч кто нит плиз
VBA Остановка процесса формы https://www.cyberforum.ru/ vba/ thread243863.html
какой нужен код что бы остановить выполнения процесса если, допустим не удовлитворяет условие?
7 / 7 / 0
Регистрация: 16.03.2011
Сообщений: 26
16.03.2011, 16:52 0

Mousemove event Excel worksheet - VBA - Ответ 1456715

16.03.2011, 16:52. Показов 7868. Ответов 7
Метки (Все метки)

Ответ

Добрый вечер!

А вот так не подойдет? Правда ЛКМ кликать прийдется по каждой ячейке:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Type POINTAPI
        x As Long
        y As Long
End Type
 
Private Declare Function GetCursorPos Lib "user32.dll" (lpPoint As POINTAPI) As Long
 
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    Dim iMousePos   As POINTAPI
    Dim iResult     As Long
   
    iResult = GetCursorPos(iMousePos)
    If iResult <> 0 Then
        Cancel = True
        
        adr = ActiveWindow.RangeFromPoint(x:=iMousePos.x, y:=iMousePos.y).Address
        
        With ThisWorkbook.ActiveSheet
            .Range(adr) = "1"
        End With
    End If
End Sub


Вернуться к обсуждению:
Mousemove event Excel worksheet VBA
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.03.2011, 16:52
Готовые ответы и решения:

Event Spreadsheet.SelectionChangeing для worksheet
Eto moi pervi vapros na etom forume. Vsem spasibo! ibo ia nauchilsia mnogomu blagodaria vashim...

Excel 97 ругается на Event-ы, Enum-ы и на AddressOf
Я уже задавал однажды вопрос и тогда он благополучно для меня разрешился. Дюже доволен этим...

Microsoft.Office.Interop.Excel.Worksheet - переключение между листами
Споткнулся на пустом месте. Начал работать с многостраничным файлом. При переключении между...

Событие Event.COPY Event.PASTE Event.CUT
Привет я не знаю как написать код в котором текстовое поле реагировало бы на события...

7
16.03.2011, 16:52
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.03.2011, 16:52
Помогаю со студенческими работами здесь

Невозможно привести COM-объект типа "System.__ComObject" к интерфейсному типу "Microsoft.Office.Interop.Excel.Worksheet"
Доброго времени суток. Суть проблемы такова: написал программку добавил функцию сохранения в...

WebBrowser не поддерживает Event MouseDown и Event MouseUp
Здравствуйте, у меня имеется WebBrowser control в windowsFormApp, но он не поддерживает Event...

event.returnValue is deprecated. Please use the standard event.preventDefault() instead
Выдаёт ошибку event.returnValue is deprecated. Please use the standard event.preventDefault()...

Как узнать координаты мышки из event:Event
как из переменной event достать координаты? knob_MC.addEventListener(MouseEvent.MOUSE_DOWN,...

Worksheet
Подскажите пожалуйста хороший для пхп....и вообще ссылку на какой то учебник..где будет объяснено...

WorkSheet.Index
Получения index у Excel файла страницы, использую так int = i; WorkSheet.Index при этом WorkSheet...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru