Первый Нижегородский АвтоФорум (Архив)

Первый Нижегородский АвтоФорум (Архив) (http://old.autoforum.pro/forum/index.php)
-   Компьютерный (http://old.autoforum.pro/forum/forumdisplay.php?f=38)
-   -   Нужен скрипт для экселя (http://old.autoforum.pro/forum/showthread.php?t=9359)

Dmitry 10-05-2005 17:19

Нужен скрипт для экселя
 
Люди хелп, для учебы надо скрипт на VB который бы копировал из определеной ячейки номер и и сохранял файл в определенной папке и именем в виде этого номера....

ВладимирС 11-05-2005 18:37

а пробовал макрос записать?

abv 11-05-2005 19:07

если все еще нать,
давай конкретные данные

Dmitry 12-05-2005 02:09

Нать. еще как нать Конкретные данные: ячейка А1. пр нажатии на кнопку макрос должен брать данные из этой ячейки заносить в имя файл который и будет собственно также называтся как и данные в ячейке. и сохранятся в определенной папке,лательно все в Visual Basic....

abv 12-05-2005 12:56

1. имя файла берется из А1 ?
2. а чего в сам файл то писать ? и в каком формате ? Или надо копию текущей книги с другим именем создать ?
3. в какой ячейке расположить кнопку или будешь этот макрос по комбинации клавиш вызывать ?
4. Куда сохранять, где будет задаваться путь для сохранения файла? (можно в какой нить соседней ячейке ;-) )
5. сохраняем в существующую папку или создаем новую ?

Что я из тебя данные тяну ?! Давай уже нормальное ТЗ
тут делов то на 5 минут, если задачу правильно поставить

Tos 12-05-2005 13:13

Правильно составленое ТЗ - 50% программы. :)

Dmitry 12-05-2005 16:58

1) Да, имя файла из А1
2) Формат xls файл сам зделаю.....
3) макрос вызываемы й на клавишах
4) С:\Werks
5) Сорхранятся в существующую папку

abv 13-05-2005 17:36

На, владей ;)

ActiveWorkbook.SaveAs "c: \werks\" & CStr(ActiveSheet.Cells.Item(1, 1))

Создашь новый макрос, назовешь его как-нибудь, внутрь вставишь этот текст, навесишь на него нужное сочетание клавиш и все...

Enjoy !!!

Dmitry 14-05-2005 14:16

Пасиба

abv 16-05-2005 11:34

не во что ;)


Часовой пояс GMT +4, время: 07:50.

vBulletin v3.5.4, Copyright ©2000-2024, Jelsoft Enterprises Ltd.