Добавление коментарий кодом XL2003

@ASSEI · Регистрация: 18.10.2012

Студворк — интернет-сервис помощи студентам

Ребятки помогите добавить коментарии кодом у меня вот по моему уразумению выходит, но ни чего не получается

Visual Basic
1
2
3
4
5
6
Private Sub CommandButton1_Click()
' ============ добавление коментарии
Worksheets("долги").Cells(65536, 4).End(-4162).Item(2) = AddComment 'добавить комент
Worksheets("долги").Cells(65536, 4).End(-4162).Item(2) = Range.Comment.Visible = False
Worksheets("долги").Cells(65536, 4).End(-4162).Item(2)=Comment.Text Text:="Дмитрий:" TextBox1.text ""  'добавить текст коментарий"
End Sub

@ASSEI · 28.09.2013, 13:18 **[ТС]**

Огромнейший респект уважаемый Igor_Tr, ваш код очень полезень для изучения, я его использую

НО немного не то, или я так не правильно осветил проблемку, простите, с вашего позволения переформулирую вопрос:
первая загрузка формы один человек один коментарий,
следующая загрузка- следующий коментарий в следующей строке который относится к другому человеку

Сообщение от Igor_Tr

И Ваша кнопка на листе.

эту кнопку помести для простоты вызывания формы, у меня в проекте первая появляется форма по этому я и упростил вызов

@Igor_Tr · 28.09.2013, 13:31

Не так подходите. Таблица (любая) - это "живой" организм. Тем более, если деньги. Тем более, если долги... Хотя, с другой стороны:
"Our Father, ....., ...and forgive us our trespasses as we forgive those who trespass against us..."

Иначе это доставленная газета на один день. Ничего уже не изменить.
И про кнопку Вы не поняли. Посмотрите внимательно панели Excel (правая кнопка мыши на панели меню Excel). Там есть два варианта. Ваш для данной ситуации не совсем удачный.

@ASSEI · 28.09.2013, 13:46 **[ТС]**

Сообщение от Igor_Tr

Не так подходите. Таблица (любая) - это "живой" организм. Тем более, если деньги. Тем более, если долги... Хотя, с другой стороны:

т.е вы хотите сказать не стоит доверять XL подобные проекты?

@Igor_Tr · 28.09.2013, 14:10

Нет, я хочу сказать все наоборот. Как раз Excel (или Access по обьему) - лучше всего. Но все это должно быть максимально гибким, легким для исполнения/понимания/изменения. Если Вы делаете для себя - как учебный вариант нормально. Но вобще для этих целей есть уже куча всего и разного. Я, например, использую для учета на ходу, в т.ч. для работы, ExpenceManager для смартфона на Android. Все это, через csv, потом в любое время легко перекидывается на любом компе в Excel, из флешки подключаю один единственный обычный модуль, который в любой момент мне выдает не то, что его один раз научили, а то, что мне в данный момент от него нужно. Без всяких UserForm, модулей листа и других свисточков-гудочков (это не!, это - "Казанский"!).

Добавлено через 9 минут
O! Придумал! Гасят долг не сразу, например, а частями. А Ваша таблица такое не понимает (хотя Excel все это может), не гибкая. Или человеку нужно продлить срок возврата, что влияет на что-то. Или....Или...Или... Это и есть - "живая".

@ASSEI · 28.09.2013, 14:22 **[ТС]**

Я действительно делаю как учебный варианд, в принципе если это будет выходить как полноценный проект буду продолжать, для себя-личного пользования, хотя вы правы у меня на смартфоне есть программа но я не знаю как выгружать ее XL, с самого телефона, загнать-загнал, пользуюсь, а выгружать не понимаю как, кто писал программу говорит просто копируешь файл на комп и открываешь в XL, но что-то я сомневаюсь что все просто это делается, вот и решил в XL дублировать долги! да и упрожнятся в VBA

@Igor_Tr · 28.09.2013, 14:48

как учебный варианд

Это просто отлично, но сразу учитесь думаю хоть "на 2 сек. вперед". Что будет если... А что будет если...
А смарт Вам выдаст в формате *.csv. Что потом с ним делать - здесь на форуме этого куча. В разных вариантах. Сам страдал где-то ...

И есть подобное готовое и прямо для Excel. Ищите. Но и сами пробуйте.

@ASSEI · 28.09.2013, 15:20 **[ТС]**

Огромное спасибо

Новые блоги и статьи Все статьи Все блоги /
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .	мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))	Как у меня протекала болезнь zorxor 27.08.2026 Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .	Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему kumehtar 26.08.2026 ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .

@Igor_Tr 4377 / 661 / 36 Регистрация: 17.01.2010 Сообщений: 2,134
	28.09.2013, 13:31
	Не так подходите. Таблица (любая) - это "живой" организм. Тем более, если деньги. Тем более, если долги... Хотя, с другой стороны: "Our Father, ....., ...and forgive us our trespasses as we forgive those who trespass against us..." Иначе это доставленная газета на один день. Ничего уже не изменить. И про кнопку Вы не поняли. Посмотрите внимательно панели Excel (правая кнопка мыши на панели меню Excel). Там есть два варианта. Ваш для данной ситуации не совсем удачный. 0

@Igor_Tr 4377 / 661 / 36 Регистрация: 17.01.2010 Сообщений: 2,134
	28.09.2013, 14:10
	Нет, я хочу сказать все наоборот. Как раз Excel (или Access по обьему) - лучше всего. Но все это должно быть максимально гибким, легким для исполнения/понимания/изменения. Если Вы делаете для себя - как учебный вариант нормально. Но вобще для этих целей есть уже куча всего и разного. Я, например, использую для учета на ходу, в т.ч. для работы, ExpenceManager для смартфона на Android. Все это, через csv, потом в любое время легко перекидывается на любом компе в Excel, из флешки подключаю один единственный обычный модуль, который в любой момент мне выдает не то, что его один раз научили, а то, что мне в данный момент от него нужно. Без всяких UserForm, модулей листа и других свисточков-гудочков (это не!, это - "Казанский"!). Добавлено через 9 минут O! Придумал! Гасят долг не сразу, например, а частями. А Ваша таблица такое не понимает (хотя Excel все это может), не гибкая. Или человеку нужно продлить срок возврата, что влияет на что-то. Или....Или...Или... Это и есть - "живая". 0

@ASSEI 0 / 1 / 3 Регистрация: 18.10.2012 Сообщений: 662
	28.09.2013, 14:22 [ТС]
	Я действительно делаю как учебный варианд, в принципе если это будет выходить как полноценный проект буду продолжать, для себя-личного пользования, хотя вы правы у меня на смартфоне есть программа но я не знаю как выгружать ее XL, с самого телефона, загнать-загнал, пользуюсь, а выгружать не понимаю как, кто писал программу говорит просто копируешь файл на комп и открываешь в XL, но что-то я сомневаюсь что все просто это делается, вот и решил в XL дублировать долги! да и упрожнятся в VBA 0

@ASSEI 0 / 1 / 3 Регистрация: 18.10.2012 Сообщений: 662
	28.09.2013, 15:20 [ТС]
	Огромное спасибо 0