Excel vba sub
Автор Ольга Бартунская задал вопрос в разделе Другие языки и технологии
Программирование в Excel - VBA и получил лучший ответ
Ответ от Владимир Рудаков[гуру]
по моему так (без красивок, конечно, но работает) :Sub ffg() Dim x, y As Single '- можно сразу описать все однотипные переменные перечисляя их через запятую, описывать "a=2" не вижу смысла, во всяком случае по данному примеру, x = Val(InputBox("Введите x")) If x < 2 Then y = 1 + Sqr(2 * x) Cells(13, 12) = "При x = " & x Cells(13, 13) = "y = " & y ElseIf x = 2 Then' - пишется в одно слово y = Sqr(2) + Log(x ^ 2) Cells(14, 12) = "При x = " & x Cells(14, 13) = "y = " & y Else y = Sin(2 * x) Cells(15, 12) = "При x = " & x Cells(15, 13) = "y = " & yEnd IfMsgBox xMsgBox yend sub
Для начала надо пояснить, какие ошибки выводятся и где.Код надо запостить на сайт pastebin.com а сюда кинуть ссылку.Иначе его трудно читать. Хотя если Вы, как говорится, не привыкли ставить отступ слева внутри Sub..End Sub, то и это мало поможет.Поймите, у нас не бесконечно много времени, и скорее мы займёмся тем, за что нам платят или что нам интересно, чем разбором какого-то мутного кода с каким-то непонятными ошибками.
Сведение двух таблиц в одну. Excel
В каждой таблице на Лист1 и Лист2 в столбце А - код, в В - наименование, в С - количество
подробнее...
Visual basic как передать значение в Combobox из столбца в Excel
Вот для VB6:
Подключить в проекте Microsoft Excel Object Library
Private Sub
подробнее...
Не могу разобраться с VBA Excel 2003 как копировать содер жимое одной ячейки в другую
в общем случае делается так
Sheets("Лист 1").Range("A1").Copy
подробнее...
Excel. Как удалить первые два символа в ячейке?
функция ПРАВСИМВ или ПСТР
для ячейки E13
=ПРАВСИМВ (E13;ДЛСТР (E13)-2)
или
Регулярные выражения Exel VBA
Вы почти правильно написали шаблон.
Попробуйте следующий код
Sub Macros()
Set objRegExp
подробнее...
Вопрос по Excel + VBA (фильтр по диапазону дат)
Для этого как минимум надо иметь МАКРОС.
Макрос я записал макрокодером, а потом слегка
подробнее...
Excel. VBA. Поиск текста. Ошибка когда не найдет текст
ну дык.. . проверяйте сперва -- нашлось ли что-либо -- перед тем как делать что-то с найденным.
VBA excel вставка листа в excel из другой книги excel
Твой макрос работает только с текстовыми файлами
Для того, чтобы открыть в VBA книгу,
подробнее...
VBA Excel Обработка ошибки
из справки VBA:
On Error
Statement
Enables an error-handling routine
подробнее...
Как в макросе (VBA) создать гиперссылку на другой лист книги?
Проверял у себя, работает
Sub content()
Dim w As Worksheet
Dim i As Integer
i = 0
подробнее...
Кто может помочь с работой в Excel с макросами?
Макрос запускается на событие изменения данных на листе.
КОД.
Private Sub
подробнее...
Подскажите по Excel!!! Есть ли такая функция, которая выводит в ячейку путь к тому файлу,с которым работаешь?
Alt F11 -этой комбинацией клавиш перейдите в VBA
там наберите:
Sub
подробнее...
VBA Excel - IF ...THEN
Sub Удалить ()
Dim i As Long, EndRow As Long
i = ПерваяСтрока
EndRow =
подробнее...
Как записать в VBA excel функцию максимум?
на вот. сам разбирайся:
Sub ExitForDemo()
MaxVal =
подробнее...