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

Вход

Регистрация

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

 

= Мир MS Excel/добавления примечания в ячейку - Страница 2 - Мир MS Excel

Старая форма входа
  • Страница 2 из 2
  • «
  • 1
  • 2
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » добавления примечания в ячейку (макрос ВБА)
добавления примечания в ячейку
RAN Дата: Среда, 24.04.2013, 14:22 | Сообщение № 21
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Цитата (Hyperboreus)
Как это можно осуществить через макрос.

По разному. Откуда я знаю? Обратитесь к гадалке.

Или прочитайте правила форума. Вдруг поможет?
И это почитать не помешает.


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение
Цитата (Hyperboreus)
Как это можно осуществить через макрос.

По разному. Откуда я знаю? Обратитесь к гадалке.

Или прочитайте правила форума. Вдруг поможет?
И это почитать не помешает.

Автор - RAN
Дата добавления - 24.04.2013 в 14:22
A_3485 Дата: Вторник, 19.11.2013, 17:06 | Сообщение № 22
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Добрый день!

Помогите пожалуйста решить похожую ситуацию. Изачально на листе стаит защита "7777". При выполнении кода, данные в ячейку добавляются, но когда добавляется коментарий, то выдает ошибку "Ячейка защищена паролем". Ведь я пароль снимаю в самом начале......

[vba]
Код
Sub Программа()

Worksheets("Лист1").Protect Password:="7777", UserInterfaceOnly:=True

Sheets("Лист1").Cells(1, 1) = Date
Sheets("Лист1").Cells(1, 2) = "Привет"

CommentText = Date & ": " & Environ("USERNAME") & ": " & " В работу"

Sheets("Лист1").Cells(1, 1).AddComment
Sheets("Лист1").Cells(1, 1).Comment.Visible = True
Sheets("Лист1").Cells(1, 1).Comment.Text Text:=Text & Chr(10) & CommentText

Worksheets("Лист1").Protect Password:="7777", UserInterfaceOnly:=False

End Sub
[/vba]


Сообщение отредактировал A_3485 - Вторник, 19.11.2013, 17:08
 
Ответить
СообщениеДобрый день!

Помогите пожалуйста решить похожую ситуацию. Изачально на листе стаит защита "7777". При выполнении кода, данные в ячейку добавляются, но когда добавляется коментарий, то выдает ошибку "Ячейка защищена паролем". Ведь я пароль снимаю в самом начале......

[vba]
Код
Sub Программа()

Worksheets("Лист1").Protect Password:="7777", UserInterfaceOnly:=True

Sheets("Лист1").Cells(1, 1) = Date
Sheets("Лист1").Cells(1, 2) = "Привет"

CommentText = Date & ": " & Environ("USERNAME") & ": " & " В работу"

Sheets("Лист1").Cells(1, 1).AddComment
Sheets("Лист1").Cells(1, 1).Comment.Visible = True
Sheets("Лист1").Cells(1, 1).Comment.Text Text:=Text & Chr(10) & CommentText

Worksheets("Лист1").Protect Password:="7777", UserInterfaceOnly:=False

End Sub
[/vba]

Автор - A_3485
Дата добавления - 19.11.2013 в 17:06
Inna13Kr Дата: Понедельник, 29.12.2014, 12:50 | Сообщение № 23
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день!
Помогите, пожалуйста, с решением такой задачи:
во вложенном файле нужно макросом в ячейки M:M (с листа "Магазин №1", ячейки H:H), U:U (с листа "Магазин №2", ячейки H:H), AC:AC (с листа "Магазин №4", ячейки H:H), AK:AK (с листа "Магазин №6", ячейки H:H) листа "АНАЛИТ" подтягивать примечания.
[moder]Читаем Правила форума, создаём свою тему. Эта тема закрыта[/moder]


Сообщение отредактировал Inna13Kr - Понедельник, 29.12.2014, 14:15
 
Ответить
СообщениеДобрый день!
Помогите, пожалуйста, с решением такой задачи:
во вложенном файле нужно макросом в ячейки M:M (с листа "Магазин №1", ячейки H:H), U:U (с листа "Магазин №2", ячейки H:H), AC:AC (с листа "Магазин №4", ячейки H:H), AK:AK (с листа "Магазин №6", ячейки H:H) листа "АНАЛИТ" подтягивать примечания.
[moder]Читаем Правила форума, создаём свою тему. Эта тема закрыта[/moder]

Автор - Inna13Kr
Дата добавления - 29.12.2014 в 12:50
Мир MS Excel » Вопросы и решения » Вопросы по VBA » добавления примечания в ячейку (макрос ВБА)
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:

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