download.bg
 Вход Списание  Новини  Програми  Статии  Форум  Чат   Абонамент  Топ95   Архив 

Записване на събитие в диалогов прозорец

Автор
Съобщение
zlatena
Съб, 06.04.13, 11:53

В Ексел трябва да въвеждам една и съща парола в много Листи.
Като я въведа в първия,автоматично ме прехвърля във втория и т.н...
Как мога да автоматизирам нещата ако например паролата е цифрата "1"?
После да го изпълня,като макрос.

редактиран от zlatena на 06.04.13 11:53
dreven
Съб, 06.04.13, 23:08

RE: Записване на събитие в диалогов прозорец

” Как мога да автоматизирам нещата ако например паролата е цифрата "1"?
После да го изпълня,като макрос. „

Заключването и отключването става с по един ред само виж двете процедури за отключване и заключване:

'..........................................................................
Sub Otkluchi()
ActiveSheet.Unprotect ("1")
End Sub

'...........................................................................

Sub Zakluchi()
ActiveSheet.Protect ("1")
End Sub
'...........................................................................

Пример: ParolaSheet.xls

zlatena
Нед, 07.04.13, 10:08
Благодаря за примера!
Аз тръгнах в друга посока,със SendKeys и позабатачих нещата.
Sub openKey()
Sheets("Sheet1").Select
SendKeys "1"
SendKeys "{ENTER}"
ActiveSheet.Unprotect
End Sub
След като заключа Листа...
Проблема беше,че след като се изпълни SendKeys и въведе автоматично паролата...
После я отпечатва и в Листа,върху клетката която е маркирана.
Беше голям майтап.
Тоест,ако листа вече е отключен и пак се изпълни макроса,се отпечатва и паролата
А аз не исках това
Благодаря ти още веднъж.
редактиран от zlatena на 07.04.13 10:09

Коментар

за нас | за разработчици | за реклама | станете автори | in english  © 1998-2024   Experta Ltd.