• IgorOK
  • Восстановленный участник
  • На форуме с 3 декабря 2005г.
  • Сообщений: 1
  • Спасибо: 0

Тема: VBA: запись свойств объекта в файл.

Доброго времени суток.
Подкинте примерчик записи свойст объекта в текстовый файл.
Есть чертеж, на котором есть выделенные в данный момент  окружности.
Необходимо получить текстовый файл с координатами центров выделенных окружностей. (Center X и Center Y)

  • SmeL
  • SmeL
  • Активный участник
  • Откуда: Молдова
  • На форуме с 29 сентября 2005г.
  • Сообщений: 464
  • Спасибо: 1

Re: VBA: запись свойств объекта в файл.

Вот как писать в файл средствами VBA

Open "my.txt" For Output As #1 ' Открываем файл для записи
Write #1, "вот это пишем в файл", 12 ' Записываем строку, разделённую запятой
Write #1, ' Записываем пустую линию
Close #1 ' Закрываем файл

вот тоже самее только используем FileSystemObject

Dim fso As FileSystemObject
Dim ts
Set fso = CreateObject("Scripting.FileSystemObject")
Set ts = fso.OpenTextFile("my.txt", ForWriting, True)
ts.Write "вот это пишем в файл, 12"
ts.Close

опросить окружности надеюсь труда не составит