Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Посчитать итог в накладной - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Посчитать итог в накладной (Макросы/Sub)
Посчитать итог в накладной
Grecha Дата: Пятница, 20.06.2014, 10:23 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

2007
Пожайлуйста подскажите как посчитать Итог в накладной по столбцу, причем суммы в этом столбце меняются в зависисмости от вида и количества наименований.
[vba]
Код
Private Sub CommandButton3_Click()
N = 0
While Worksheets(1).Cells(N + 10, 6).Value <> ""
N = N + 1
Wend
TextBox1.Value = N
'Application.Worksheets(1).Cells(7, 6).Value =
[/vba]
Процедура при помощи цикла которая проверяет последующую строку на пустоту.
 
Ответить
СообщениеПожайлуйста подскажите как посчитать Итог в накладной по столбцу, причем суммы в этом столбце меняются в зависисмости от вида и количества наименований.
[vba]
Код
Private Sub CommandButton3_Click()
N = 0
While Worksheets(1).Cells(N + 10, 6).Value <> ""
N = N + 1
Wend
TextBox1.Value = N
'Application.Worksheets(1).Cells(7, 6).Value =
[/vba]
Процедура при помощи цикла которая проверяет последующую строку на пустоту.

Автор - Grecha
Дата добавления - 20.06.2014 в 10:23
Alex_ST Дата: Пятница, 20.06.2014, 10:37 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3206
Репутация: 609 ±
Замечаний: 0% ±

2003
Приложите файл-пример, а не фрагмент процедуры, тогда народ посмотрит.



С уважением,
Алексей
MS Excel 2003 - the best!!!
 
Ответить
СообщениеПриложите файл-пример, а не фрагмент процедуры, тогда народ посмотрит.

Автор - Alex_ST
Дата добавления - 20.06.2014 в 10:37
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Посчитать итог в накладной (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!