Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » Megamen2
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 3 4 След.
Почему ничего не появляется в окне отладки?
 
#
26.12.2018 15:13:39
Юрий М, ясно.
Спасибо.
 
Перейти    
Почему ничего не появляется в окне отладки?
 
#
26.12.2018 15:03:53
Юрий М, спасибо.

А вот подскажите - можно в диапазон напротив E7:E12 чисел (напротив значений расстояний) - еще выводить собственно названия фигур.
А то получается числа есть - а к какому Прямоугольнику они принадлежат - непонятно.
 
Перейти    
Почему ничего не появляется в окне отладки?
 
#
26.12.2018 14:48:52
Юрий М, да помогло.

Подскажите - а как этот результат вывести в диапазон D7:D12 ?
Пытаюсь использовать такую строчку - что-то не помогает:
Код
Sheets("Лист3").Range("D7:D12").Value = DistanceCent(Sheets("Лист3").Shapes("Рисунок 7"), objShape)
 
Перейти    
Почему ничего не появляется в окне отладки?
 
#
26.12.2018 14:36:07
Добрый день.
Подскажите - почему в макросе при запуске ничего не появляется в окне отладки ?
Код
Function DistanceCent(objA As Object, objB As Object)
    DistanceCent = Sqr((objA.Left + objA.Width / 2 - objB.Left + objB.Width / 2) ^ 2 + (objA.Top + objA.Height / 2 - objB.Top + objB.Height / 2) ^ 2)
End Function

Sub test()
Dim objShape As Object
For Each objShape In Sheets("Лист3").Shapes
If objShape.Name Like "Прямоугольник*" Then
Debug.Print DistanceCent(Sheets("Лист3").Shapes("Рисунок 7"), objShape)
End If
Next

End Sub

(Окно отладки - это имеется ввиду Ctrl+G в редакторе ВБА)
 
Перейти    
Удаление фигур по их номеру
 
#
14.11.2018 23:37:54
БМВ, понятно.
Оба варианта хороши.

Спасибо за ответ.
 
Перейти    
Удаление фигур по их номеру
 
#
14.11.2018 20:34:11
БМВ, почему такое непостоянство в выборе форума....

Ну вот представьте себе - все желающие пойдут - только на форум planetaexcel.ru.
На этом форуме - будут очень интересные, оживленные дискуссии на разные темы.
А остальные форумы - зачахнут, и им с такой низкой посещаемостью не хватит денег - даже чтобы оплатить свой хостинг.
(Не о себе думаю... а о благе народном)
 
Перейти    
Удаление фигур по их номеру
 
#
14.11.2018 19:33:04
БМВ, так вопрос-то новый.

Один вопрос - одна тема.
Таковы вроде бы - правила этого форума.
Или я ошибаюсь ?
 
Перейти    
Удаление фигур по их номеру
 
#
14.11.2018 19:24:42
Приветствую всех форумчан.
Имеется код, который по таблице - рисует фигуры.

Подскажите - как по щелчку макроса - удалить с листа - фигуры, номера которых вписаны в диапазон C4:C15 ?
(ориентировка должна быть только на номера)
 
Перейти    
Рисование фигур по таблице
 
#
13.11.2018 09:00:26
RAN, спасибо.
 
Перейти    
Рисование фигур по таблице
 
#
12.11.2018 21:53:37
Добрый день.
Такой вопрос появился:

В файле xls - есть таблица. В нее - в одном столбце вписаны индексы фигур, затем типы фигур, их ширина-высота, затем текст который должен в фигурах быть.

Как при нажатии на кнопку - нарисовать фигуры с этими параметрами ?
(Сейчас макрос рисует - просто фигуру Прямоугольника - без порядкового номера)
 
Перейти    
Поиск сразу нескольких слов в столбце (причем поисковой запрос на оба слова находится в одной ячейке)
 
#
12.10.2018 18:17:50
Сергей, спасибо.
Работает как надо.
 
Перейти    
Поиск сразу нескольких слов в столбце (причем поисковой запрос на оба слова находится в одной ячейке)
 
#
12.10.2018 15:16:57
Добрый день.
Подскажите как формулой осуществить поиск нескольких слов в столбце D сразу по двум словам ?

В столбце D7:D34 находятся различные слова.
В ячейку G4 - вписаны те слова, которые нужно искать.
Они выглядят примерно так Слово1+Слово2
Если в ячейке столбца D - встречаются оба этих слова - то в столбце G (напротив) - появляется "1".

Сложность наверное в том, что поисковой запрос задан именно - сразу двумя словами, разделенными плюсом (Слово1+Слово2)
 
Перейти    
Что нужно изменить в настройках Properties объекта АктивХ - чтобы выполнялась прозрачность фона ?
 
#
01.07.2018 18:06:53
Помогите решить проблему.

Вставляю на лист экселя -  объекты Shockware Flash Object (элемент АктивХ) - с поддержкой прозрачности.
(В графе Movie -  прописан путь к конкретному файлу swf)
Однако эксель - отказывается отображать прозрачность.
Он может залить прозрачный фон - белым цветом или серым или черным цветом - лишь бы не отображать прозрачность.

Подскажите - что нужно изменить в настройках Properties этого объекта АктивХ - чтобы прозрачность фона данного объекта все-таки отображалась ?  
Изменено: Megamen2 - 02.07.2018 12:11:19
 
Перейти    
Что нужно изменить в настройках Properties объекта АктивХ - чтобы выполнялась прозрачность фона ?
 
#
28.06.2018 00:44:56
Добрый день.
Помогите решить проблему.
 
Перейти    
Что нужно изменить в настройках Properties объекта АктивХ - чтобы выполнялась прозрачность фона ?
 
#
24.06.2018 20:41:10
Всем привет.
Помогите.

Вставляю на лист экселя -  объекты Shockware Flash Object (элемент АктивХ) - с поддержкой прозрачности.
(В графе Movie -  прописан путь к конкретному файлу swf)
Однако эксель - отказывается отображать прозрачность.
Он может залить прозрачный фон - белым цветом или серым или черным цветом - лишь бы не отображать прозрачность.

Подскажите - что нужно изменить в настройках Properties этого объекта АктивХ - чтобы прозрачность фона данного объекта все-таки отображалась ?  
 
Перейти    
Где можно скачать надстройку ZVI "Classic Excel Colors"
 
#
15.06.2018 20:51:13
Hugo, наверное она.
Буду разбираться.
 
Перейти    
Где можно скачать надстройку ZVI "Classic Excel Colors"
 
#
15.06.2018 20:21:27
Здравствуйте.

Много слышал на этом форуме, про таинственную надстройку ZVI "Classic Excel Colors"
Однако где ее можно скачать - пока остается тайной.

Подскажите если кто знает - где можно скачать надстройку ZVI "Classic Excel Colors".
 
Перейти    
Как добавить в документ 1.doc - таблицу из экселя - в нужное место.
 
#
13.06.2018 17:38:21
alexleoix, ясно.
Спасибо за ответ.
 
Перейти    
Как добавить в документ 1.doc - таблицу из экселя - в нужное место.
 
#
12.06.2018 17:59:11
Как макросом - произвести замену второй таблицы документа 1.doc - на ту, что находится в экселе 1.xls (то есть старую таблицу убрать, а новую таблицу заместо старой - вставить) ?
 
Перейти    
Как добавить в документ 1.doc - таблицу из экселя - в нужное место.
 
#
12.06.2018 17:56:16
Цитата
Юрий М написал:
Какая у Вас версия Офиса?  
Microsoft Word 2003
 
Перейти    
Как добавить в документ 1.doc - таблицу из экселя - в нужное место.
 
#
12.06.2018 17:43:24
Юрий М, появляется меню - "вставить", "шрифт", "абзац", "список", "гиперссылка", "поиск", "синонимы", "перевод", "выделить текст имеющий такой же формат".

Там нет никаких предложений сохранения связей.
 
Перейти    
Как добавить в документ 1.doc - таблицу из экселя - в нужное место.
 
#
12.06.2018 17:21:52
Юрий М, еще раз пишу:
Скопировал таблицу и вставил ее в ворд - никаких сохранений связей не произошло.

Никаких меню не появилось.
Вставилась обычная таблица.
 
Перейти    
Как добавить в документ 1.doc - таблицу из экселя - в нужное место.
 
#
12.06.2018 17:16:38
Цитата
Юрий М написал:
скопируйте таблицу, которая в Excel, вставьте её в Word с сохранением связей.
Скопировал таблицу и вставил ее в ворд - никаких сохранений связей не произошло.
Вставилась обычная таблица.
 
Перейти    
Как добавить в документ 1.doc - таблицу из экселя - в нужное место.
 
#
12.06.2018 14:59:50
Здравствуйте.
Подскажите - как добавить в документ 1.doc - таблицу из экселя - в нужное место.
В документе 1.doc - есть три таблицы, и некий текст.
В экселевском файле 1.xls - есть таблица.

Как макросом - произвести замену второй таблицы документа 1.doc - на ту, что находится в экселе 1.xls (то есть старую таблицу убрать, а новую таблицу заместо старой - вставить) ?

(Просто не очень понятно, что в ворде означает - положение на листе. Если в экселе есть ячейки - и можно задать расположение выдачи результата - то в ворде не очень понятно - что является точкой положения - строка, координата - или что-то еще.)
 
Перейти    
Как заставить работать макрос в Excel 2007 ? (сейчас работает в Excel 2013)
 
#
12.04.2018 07:06:13
Доброе утро.
Есть такой вопрос.

Имеется макрос перевода текста на английский язык .
Но он работает только в Е2013, а в Е2007 работать не хочет.

Как заставить этот макрос -  работать в Excel 2007  ?
 
Перейти    
Перевод текста на английский язык
 
#
07.04.2018 14:19:53
VSerg, да.
Подтормаживает, но тем не менее работает.
Спасибо за ответ.
 
Перейти    
Перевод текста на английский язык
 
#
07.04.2018 02:47:11
Доброй ночи.
Помогите разобраться.

В ячейку E6 вписан определенный текст на русском языке.
Как макросом - вывести перевод этого текста  - на английском языке - в ячейку E8 ?

(тут видимо нужно обращение макроса к какому-то веб-сервису переводчику на английский)
 
Перейти    
Добавка макросом текста в ячейку, не стирая тот текст - что в ней на данный момент находится. 
 
#
11.03.2018 22:51:55
Юрий М, так при чем тут стрелка ?

Макрос в первом сообщении - может менять содержимое - вообще в любой зеленой ячейке.
В вашем макросе -  непонятно по какому принципу происходит выбор ячейки для добавки текста.
 
Перейти    
Добавка макросом текста в ячейку, не стирая тот текст - что в ней на данный момент находится. 
 
#
11.03.2018 22:42:45
Юрий М, не работает.

Копирует текст в ячейку G31, тогда как по идее - должен копировать в ячейку G34
 
Перейти    
Добавка макросом текста в ячейку, не стирая тот текст - что в ней на данный момент находится. 
 
#
11.03.2018 14:31:54
Юрий М, куда именно эту строчку добавлять в моем макросе ?
 
Перейти    
Страницы: 1 2 3 4 След.
Наверх