Помогите разобратся в пользовательских типах данных Visual Basic код далее....

guyasyou, 321 просмотр

Type kur
fio As String
pol As String
rod As Integer
m As Single
f As Single
inf As Single
eco As Single
sr As Single
stp As String
End Type

Sub Kurs()

Dim i, j As Integer
Dim k, l As Single
Dim a(1 To 25) As kur

For i = 1 To 25
a(i).fio = Cells(i + 3, 1)
a(i).pol = Cells(i + 3, 2)
a(i).rod = Cells(i + 3, 3)
a(i).m = Cells(i + 3, 4)
a(i).f = Cells(i + 3, 5)
a(i).inf = Cells(i + 3, 6)
a(i).eco = Cells(i + 3, 7)
a(i).sr = Cells(i + 3, 8)
a(i).stp = Cells(i + 3, 9)
Next

Excel жалуется на комб. типы Type

Ответы:

Barmichev

Перенеси Type в модуль (создаётся через меню: "Insert" -> "Module"). Excel не принимает его внутри листа, а все переменные объявленные в модулях глобальны (если нет иного указания). И следи, чтобы в ячейках значения равнялись типу переменной, а то это вызовет ошибку (например, если double попробует забрать текст из ячейки с текстом).

15 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

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

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.