|
Выполнение макроса в фоновом режиме.
|
||
|---|---|---|
Участник
Сообщения: 6 245
|
||
|
Код: plaintext 1. 2. 3. НДС сейчас 18%  |
||
| 11.07.2006, 13:38 |
|
|
|
|
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
Народ, помогите. Мне надо чтобы макрос выполнялся непрерывно, сейчас работает только от нажатия сочетания клавиш. Суть макроса такова: В определенной ячейке выводить значение, полученное в результате умножения значения активной ячейки на 1,2 (тобишь НДС) Worksheets("Лист1").Range("G3").FormulaR1C1 = ActiveCell.Value * 1.2 Может можно как-то сделать чтобы запуск макроса происходил после смены активной ячейки, хотя в идеале чтобы все время выполнялся макрос. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2006, 13:18 |
|
||
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
Private Sub Worksheet_SelectionChange(ByVal Target As Range) End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2006, 13:28 |
|
||
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
Sub НДС() Worksheets("Karbon").Range("G3").FormulaR1C1 = ActiveCell.Value * 1.2 End Sub куда вставлять?? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2006, 13:35 |
|
||
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. НДС сейчас 18% ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2006, 13:38 |
|
||
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
ну и как оно должно выглядеть? значение само меняется? или надо чета еще нажимать..... короче у меня не считает, выбираю любую активную ячейку, а значения в G3 не меняются. ps А Я из Украины, у нас 20% ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2006, 13:46 |
|
||
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
в каком листе процедура в током и будет работать проверь процедуру таким образом Код: plaintext 1. 2. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2006, 13:50 |
|
||
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
Все, работает. Огромное тебе спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2006, 13:55 |
|
||
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
Все классно, только вот маленькая проблемка, при выборе ячейки, которая содержит буквы вылазит ошибка №13, можно ли как-то поставить игнор на эту ошибку??? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2006, 18:19 |
|
||
|
Выполнение макроса в фоновом режиме.
|
|||
|---|---|---|---|
|
#18+
Sergey_suВсе классно, только вот маленькая проблемка, при выборе ячейки, которая содержит буквы вылазит ошибка №13, можно ли как-то поставить игнор на эту ошибку??? или так On error resume next или лучше так If IsNumeric(Worksheets("Ëèñò1").Range("G3").Value) = True Then Worksheets("Ëèñò1").Range("G3").Value = Target.Value * 1.2 End If ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.07.2006, 07:13 |
|
||
|
|
start [/forum/topic.php?fid=60&fpage=273&tid=2165592]: |
0ms |
get settings: |
11ms |
get forum list: |
20ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
52ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
59ms |
get tp. blocked users: |
1ms |
| others: | 249ms |
| total: | 411ms |
| 0 / 0 |
