Часовой пояс: UTC + 3 часа




Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 3 
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
 

Junior
Статус: Не в сети
Регистрация: 03.02.2011
на листе нарисовал кнопку, пытаюсь прикрутить к ней функцию, которая бы увеличивала бы числовое значение конкретных ячеек на 1. положение ячеек в разных местах листа, поэтому протягивание не предлагать.

у меня в голове сложился такой алгоритм:

считать значение конкретных ячеек
прибавить к этим значениям еденицу
записать полученные значения обратно в ячейки.


в общем в итоге получилась такая вот херь, которая ессесено не работает, так как я нуб ^^

Private Sub CommandButton1_Click()

expression = AppSheet.Cells(3, 3).Value + 1
AppSheet.Cells(3, 3).Value = expression

End Sub

_________________
i7 2600k (4600)
8GB Ram 1600Mhz
1tb WD
gtx 680 (2 gb, 256bit) OC



Партнер
 

Junior
Статус: Не в сети
Регистрация: 03.04.2008
Откуда: Санкт-Петербург
marlyn123 писал(а):
на листе нарисовал кнопку, пытаюсь прикрутить к ней функцию, которая бы увеличивала бы числовое значение конкретных ячеек на 1. положение ячеек в разных местах листа, поэтому протягивание не предлагать.

у меня в голове сложился такой алгоритм:

считать значение конкретных ячеек
прибавить к этим значениям еденицу
записать полученные значения обратно в ячейки.


в общем в итоге получилась такая вот херь, которая ессесено не работает, так как я нуб ^^

Private Sub CommandButton1_Click()

expression = AppSheet.Cells(3, 3).Value + 1
AppSheet.Cells(3, 3).Value = expression

End Sub


Попробуйте так, всё заработает :

Код:
Private Sub CommandButton1_Click()
Sheets("Лист1").Cells(3, 3).Value = Sheets("Лист1").Cells(3, 3).Value + 1

End Sub


 

Junior
Статус: Не в сети
Регистрация: 03.02.2011
примерно так я в итоге и сделал, спустя неделю стараний.
только у вас более лаконичнее чем у меняя получилось)
в люблом случаи спасибо!

_________________
i7 2600k (4600)
8GB Ram 1600Mhz
1tb WD
gtx 680 (2 gb, 256bit) OC


Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 3 
-

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 6


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  

Лаборатория














Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan