Abattur (Все сообщения пользователя)

Ошибка: Expected End of statement в функции

Abattur Пользователь Сообщений: 3 Регистрация: 12.12.2018	# 13.02.2020 17:05:22 bedvit, Ігор Гончаренко, Большое спасибо! Работает!
	Перейти

Ошибка: Expected End of statement в функции

Abattur

Пользователь

Сообщений: 3 Регистрация: 12.12.2018

13.02.2020 16:55:34

Цитата
JeyCi написал: это коммент,

Нет, это строка кода... Судя по всему, некорректная. Мне нужно потом в другом месте значение переменной cellAddress засунуть в ячейку. Типа того:

Код
Range("G2") = CellName("A2")

Нужно ли мне как-то обозначить, что значение функции возвращается и как, если не return?

Перейти

Ошибка: Expected End of statement в функции

Abattur

Пользователь

Сообщений: 3 Регистрация: 12.12.2018

13.02.2020 16:34:12

Всем доброго времени суток! Пишу функцию на VBA в Excel 2010, при компиляции - ошибка "Expected: End of statement" Подскажите, пожалуйста, что именно ему не нравится? Вот сама функция:

Код

Function CellName(ByVal text As String) As String
Dim rowNumber, columnNumber As Integer
Dim cellAddress As String
     Worksheets("Лист1").Activate
     Range(text).Activate
     rowNumber = ActiveCell.Row
     columnNumber = ActiveCell.Column
     cellAddress = CStr(rowNumber) + ", " + CStr(columnNumber)
Return cellAddress
End Function

ругается на ту строчку, где Return. В чем здесь ошибка?

Перейти