Создать jpg файлы из текста каждой ячейки xls

[kulmamirov]

Добрый вечер уважаемые коллеги!

Помогите решить следующую задачу путем создания макроса:
1. Имеется xls файл из 3 столбцов, наименование столбцов: номер по порядку, фамилия, имя. Шрифт, кегль текста arial, 12
2. Создать jpg файлы на каждую фамилию, присвоить файлам имя по значению порядковых номеров
3. Аналогично создать jpg файлы на каждое имя, присвоить файлам имя по значению порядковых номеров
4 Созданные файлы расположить на соответствующие папки: Family и Name
5. Разрешающая способность созданных jpg файлов должна быть 300 dpi

VBA плохо разбираюсь, поэтому желательно бы иметь исходный текст такого макроса.

С уважением Серик

[Hugo121]

Можете поискать код тут: http://www.excelvba.ru/
Или заказать готовое

[kulmamirov]

Hugo121 спс за инфо, поищу

[EducatedFool]

Это вообще зачем надо?
Задание по учёбе? Так вроде учебный год ещё не начался...
Для себя делаете? Так задание какое-то странное... зачем это всё?

2. Создать jpg файлы на каждую фамилию

Это как, позвольте узнать?
Вот есть фамилия Иванов - какой jpg файл должен создаться?
С фотографией Иванова?

5. Разрешающая способность созданных jpg файлов должна быть 300 dpi

Вот с этим сложнее. ЗАЧЕМ ЭТО НАДО???

VBA плохо разбираюсь, поэтому желательно бы иметь исходный текст такого макроса.

С таким подходом, как у вас (выкладываете техзадание без наработок), бесплатно делать никто не будет.
Лично я не понял вообще, что и как надо делать - ни один из пунктов.

[kulmamirov]

Сообщение от EducatedFool

Это вообще зачем надо?
Задание по учёбе? Так вроде учебный год ещё не начался...
Для себя делаете? Так задание какое-то странное... зачем это всё?


Это как, позвольте узнать?
Вот есть фамилия Иванов - какой jpg файл должен создаться?
С фотографией Иванова?


Вот с этим сложнее. ЗАЧЕМ ЭТО НАДО???

VBA плохо разбираюсь, поэтому желательно бы иметь исходный текст такого макроса.

С таким подходом, как у вас (выкладываете техзадание без наработок), бесплатно делать никто не будет.
Лично я не понял вообще, что и как надо делать - ни один из пунктов.

Это задание препода универа.
Ему это надо, чтобы делать персонализацию карточек студентов в дизайне Корела.
Текст фамилии должен быть расположен в jpg файле.
Мое гугление ничему не привело.
Третий летний семестр это. Много пропусков лекции было у меня
Количество студентов много, поэтому макрос нужен

[EducatedFool]

Ну вот теперь задание полностью понятно
(а то я пытался представить, как это воплотить в Excel)

Мое гугление ничему не привело.

готовый макрос вы не найдёте.
Есть в интернете, конечно, примеры взаимодействия Excel и Corel при помощи макросов, - но из придётся переделывать на 90%, так что проще с нуля написать.

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

А с нуля всё делать, особенно учитывая вашу фразу «Много пропусков лекции было у меня», - это только за деньги.

[Казанский]

Можно и без Корела, с бесплатным IrfanView.
Макрос для получения изображения ячейки А1:

Sub bb()
[A1].Copy
Shell """C:\Program Files\IrfanView\i_view32.exe"" /clippaste /dpi=(300,300) /convert=d:\A1.jpg"
End Sub

Приделайте цикл, паузу - и готово!

[EducatedFool]

Казанский, спасибо за идею
Не знал, что IrfanView такое умеет из командной строки.

Студенту это вряд ли подойдёт (им Корел нужен),
а я в своих макросах буду использовать.

[DiemonStar]

а я в своих макросах буду использовать.

И я тоже. Спасибо за идею.

Студенту это вряд ли подойдёт

Не факт. Что-то мне подсказывает, что ещё как прокатит: похоже на то, что для Корела требуются шаблоны имени и фамилии в именованных по маске файлах. Из таблички сделать набор картинок проблемы не составляет, значит это примерно оно и есть. Так что зациклить процесс создания табличек и результат налицо...

з.ы. А перезапись файлов через консоль в тихом режиме?

[kulmamirov]

Сообщение от EducatedFool

Ну вот теперь задание полностью понятно
(а то я пытался представить, как это воплотить в Excel)


готовый макрос вы не найдёте.
Есть в интернете, конечно, примеры взаимодействия Excel и Corel при помощи макросов, - но из придётся переделывать на 90%, так что проще с нуля написать.

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

А с нуля всё делать, особенно учитывая вашу фразу «Много пропусков лекции было у меня», - это только за деньги.

За деньги? Пока нет средств.
Я уже составил макрос установки фотки и штрих кода на 10 карточек.
Но вот не знаю, как вставить Фамилии и Имена на большое количество студентов.
Таблицу с ФИО мне уже дали, там 100 чел.