Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Анимация Excel - Страница 2 - Мир MS Excel

Старая форма входа
  • Страница 2 из 2
  • «
  • 1
  • 2
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Анимация Excel (Макросы/Sub)
Анимация Excel
buchlotnik Дата: Среда, 03.12.2014, 17:23 | Сообщение № 21
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
LionKing2, одна тема - один вопрос. Плюс нужен файл - выкатываться - это переместиться или ещё вращать хотите?
 
Ответить
СообщениеLionKing2, одна тема - один вопрос. Плюс нужен файл - выкатываться - это переместиться или ещё вращать хотите?
Автор - buchlotnik
Дата добавления - 03.12.2014 в 17:23
LionKing2 Дата: Среда, 03.12.2014, 19:08 | Сообщение № 22
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Так тема же про анимацию, какой смысл плодить?
Именно вращение
 
Ответить
СообщениеТак тема же про анимацию, какой смысл плодить?
Именно вращение
Автор - LionKing2
Дата добавления - 03.12.2014 в 19:08
buchlotnik Дата: Среда, 03.12.2014, 19:14 | Сообщение № 23
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
LionKing2, да просто вообще не понятно куда его вертеть - как пример:
[vba]
Код
Sub rot()
ActiveSheet.Shapes.Range(Array("Oval 10")).Select
For i = 0 To 90 Step 1
Selection.ShapeRange.IncrementRotation i
DoEvents
Next i
End Sub
[/vba] это просто ротация, ну дополнительно можно передавать координаты местоположения. Остальное с файлом. B)
К сообщению приложен файл: 6795874.xls (38.5 Kb)


Сообщение отредактировал buchlotnik - Среда, 03.12.2014, 19:28
 
Ответить
СообщениеLionKing2, да просто вообще не понятно куда его вертеть - как пример:
[vba]
Код
Sub rot()
ActiveSheet.Shapes.Range(Array("Oval 10")).Select
For i = 0 To 90 Step 1
Selection.ShapeRange.IncrementRotation i
DoEvents
Next i
End Sub
[/vba] это просто ротация, ну дополнительно можно передавать координаты местоположения. Остальное с файлом. B)
Автор - buchlotnik
Дата добавления - 03.12.2014 в 19:14
LionKing2 Дата: Среда, 03.12.2014, 19:32 | Сообщение № 24
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Воооо.... как раз то, что мне необходимо, единственно, осталось понять, как координаты передать hands
 
Ответить
СообщениеВоооо.... как раз то, что мне необходимо, единственно, осталось понять, как координаты передать hands
Автор - LionKing2
Дата добавления - 03.12.2014 в 19:32
buchlotnik Дата: Среда, 03.12.2014, 19:47 | Сообщение № 25
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
Цитата
как координаты передать

[vba]
Код
    Selection.ShapeRange.IncrementLeft
     Selection.ShapeRange.IncrementTop  
[/vba] B)
 
Ответить
Сообщение
Цитата
как координаты передать

[vba]
Код
    Selection.ShapeRange.IncrementLeft
     Selection.ShapeRange.IncrementTop  
[/vba] B)
Автор - buchlotnik
Дата добавления - 03.12.2014 в 19:47
nerv Дата: Среда, 03.12.2014, 23:28 | Сообщение № 26
Группа: Редакторы
Ранг: Обитатель
Сообщений: 431
Репутация: 193 ±
Замечаний: 0% ±

два года назад писал http://www.excelworld.ru/forum/3-2974-1, http://www.planetaexcel.ru/forum....e375883

Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук

YM 41001156540584 / WM WMR R21924176233

https://github.com/nervgh/vba

Сообщение отредактировал nerv - Среда, 03.12.2014, 23:40
 
Ответить
Сообщениедва года назад писал http://www.excelworld.ru/forum/3-2974-1, http://www.planetaexcel.ru/forum....e375883
Автор - nerv
Дата добавления - 03.12.2014 в 23:28
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Анимация Excel (Макросы/Sub)
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!