|
|
| Другие темы раздела | |
| VBA VBA Access: помогите с синтаксисом команд Второй день пытаюсь освоить Access-овской VBA и второй день бьюсь об стену. Зарылся в Интернете, а толку мало. Для создания небольшой оболочки для базы данных дали неделю. Довольно неплохо программирую на Delphi, в том числе и с базами данных в формате mdb, но в данный раз потребовали чтобы данные и оболочка были в одном файле. Помогите с синтаксисом команд (пишу аналог на Delphi): ... https://www.cyberforum.ru/ vba/ thread758648.html |
Составить программу вычисления значения функции VBA Составить программу вычисления значения функции z=(x1+x2)/(x2+y2), где x1,x2 - корни уравнения ax^2+bx+c=0 , y1, y2 - корни уравнения dy^2+ey+f=0 код вот такой помогите исправить Private Sub CommandButton1_Click() Dim a, b, c, d, exp1, f As Single А = Cells(2, 1) b = Cells(2, 2) c = Cells(2, 3) d = Cells(2, 4) |
|
VBA Достать все ссылки на массивы и ячейки из формулы
https://www.cyberforum.ru/ vba/ thread758595.html Всем привет! Недавно появилась необходимость в вытаскивании имен ячеек и массивов из формулы ячейки. Следующий код делает это, НО не совсем верно, т.к. он читая формулу "=AF123" разбивает её на AF1, AF12, F1 и т.д. : Public Type rCell book As Workbook Sheet As Sheets Cell As Range Address As String End Type Public ListC() As rCell 'массив из ссылок |
VBA C чем может быть связана ошибка?
https://www.cyberforum.ru/ vba/ thread758543.html Здравствуйте, уважаемые программисты!Помогите, пожалуйста, разобраться: с чем может быть связана данная ошибка? (скриншот в приложении) она возникает при выполнении следующего кода: Private Sub CmbProc_Click() If Hol(Val(Cells(29, 77)), Cells(30, 85)) Then Chk34.Enabled = True Else Chk34.Enabled = False Chk34.Value = False End If Holls |
|
VBA вычисление sin и вывод значения VBA Простойшая функция,я знаю,но всё же помогите))) Написать процедуру,вычисляющую значения sin(k) и выводящую отрицательные значения в k-ю строку столбца A,а положительные знаечения - в k-ю строку столбца B. ПОМОГИТЕ ПОЖАЛУЙСТА |
VBA Построение графикв в Excel Добрый День. Возникла проблема с построением графика в Excel. Точнее график строится на ура, но никак не могу изменить градацию шкалы осей. Ругается на переменную xlValue. Set app = CreateObject("Excel.Application") With app .Workbooks.Add 'тут заполнение значений таблицы .Charts.Add .ActiveChart.ChartType = 4 .ActiveChart.SetSourceData... https://www.cyberforum.ru/ vba/ thread758512.html |
| VBA Как связать между собой TextBox и ScrollBar? У меня в задании значение рентабельности должно отображаться с помощью Scrollbar и текстового поля. Я связала по аналогии с примером так: Private Sub ScrollBar1_Change() TextBox3.Text = ScrollBar1.Value End Sub Private Sub TextBox4_Change() If (TextBox4.Text <> 50) Then TextBox3.Text = 50 ScrollBar1.Value = TextBox4.Text End If https://www.cyberforum.ru/ vba/ thread758406.html |
VBA Автоматическое (через VBA) преобразование больших и малых чисел в математический формат Подскажите как (я так понимаю что скорее с помощью VBA) преобразовать числа вида 1,25Е-10 в формат 1,25×10-10 2,365Е+05 в формат 2,36×105 СПАСИБО! ЗЫ по возможности объясните где в VBA прописывать соответствующие командные строки ЗЫЗЫ Офис 2003 |
| VBA Найти максимальный элемент в массиве, поменять его местами с первым элементом 3.16. Найти максимальный элемент в массиве X(N), поменять его местами с первым элементом, если же максимальный элемент стоит на первом месте, то поменять местами с последним элементом. Помогите решить пожалуйста https://www.cyberforum.ru/ vba/ thread758296.html | VBA Изменить шрифт (размер) всех надстрочных (подстрочных) символов Dim myFindRange As Word.Range Dim myFind As Word.Find 'Создаём диапазон, в котором будем искать. 'ActiveDocument.Range - это основной текст в документе. 'Есть ещё колонтитулы, сноски и другое. Set myFindRange = ActiveDocument.Range 'Создаём объект "Find" и даём ему имя "myFind". Set myFind = myFindRange.Find https://www.cyberforum.ru/ vba/ thread758250.html |
|
VBA Назначение комбинации клавиш макроса у надстройки Есть надстройка в ней полезные макросы.....для вызова которых есть комбинации клавиш.... и так возникла потребность написания....новых макросов и автоматически назначение клавиш на них.....как ето реализовать ....? Добавлено через 7 минут упс.... написания знаю а от назначение клавиш вызова макроса нет.... |
VBA Метод Чебышева,Лежандра-Гаусса
https://www.cyberforum.ru/ vba/ thread757961.html Помогите,пожалуйста. Интегральчик свой всеми методами сделала,кроме Метода Чебышева и Лежандра-Гаусса.Не понимаю их и всё. x^3-2+cos(x); границы от 0 до 3 Или хотя бы ссылки на хороший источник(всё облазила,ничего не могу найти) |
|
15151 / 6424 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
|
||||||
| 11.01.2013, 13:37 | 0 | |||||
Цикл по колонке содержащей объединенные ячейки - VBA - Ответ 398462411.01.2013, 13:37. Показов 4527. Ответов 4
Метки (Все метки)
Ответ
Как это - останавливается? Пример покажите.
Последнюю заполненную ячейку лучше искать так:
Вернуться к обсуждению: Цикл по колонке содержащей объединенные ячейки VBA
1
|
||||||
| 11.01.2013, 13:37 | |
|
Готовые ответы и решения:
4
Макросы и объединенные ячейки Переделываем объединенные ячейки Объединённые ячейки в таблице |
| 11.01.2013, 13:37 | |
| 11.01.2013, 13:37 | |
|
Помогаю со студенческими работами здесь
0
Перемещение к колонке содержащей данные Объединенные ячейки разъединяются в Excel
Построение графика и объединенные ячейки |
Наверх