Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: VBA MS Office

Программирования для MS Office кроме ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Реакция на активацию ячейки мышкой
 
 автор: Nastya   (16.11.2006 в 18:57)   личное сообщение
 
 

Добрый вечер! Есть задача: в зависимости от того, на какую ячейку на листе щелкаешь мышкой, в другой (всегда одной) ячейке отображается определенная информация. Можно маленький примерчик кода на VBA?
Заранее благодарна.

  Ответить  
 
 автор: osmor   (17.11.2006 в 09:23)   личное сообщение
 
 

Const intR As Long = 1
Const intC As Long = 5


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Cells(intR, intC) = IIf(Target = "", "Пусто", Target)
End Sub

  Ответить  
 
 автор: Nastya   (17.11.2006 в 10:52)   личное сообщение
 
 

:) я извиняюсь конечно, но что-то никак не могу воплотить эти строки в жизнь, подскажите, как этим правильно воспользоваться :)

  Ответить  
 
 автор: osmor   (17.11.2006 в 10:59)   личное сообщение
18 Кб.
 
 

например так

  Ответить  
 
 автор: Nastya   (17.11.2006 в 11:11)   личное сообщение
 
 

Спасибо, честно говоря, не знала что такое вообще бывает :) (просто мне не приходилось что-то сложное писать, все else, да for, а сейчас вот надо сложное). До этого я писала только макросы в модулях. А что такое этот Option Explicit? :)
P.S. Как избавиться от ошибки, которая возникает, если выделяешь область, а не одну ячейку?
И еще, а если мне надо чтобы в постоянной ячейке появлялись данные, не из той на которую щелкаем, а из другой(которая вообще на другом листе) с определенной зависимостью от той на которую щелкаем? :)

  Ответить  
 
 автор: osmor   (17.11.2006 в 11:22)   личное сообщение
 
 

1. при указании в модуле Option Explicit требуется обязательное описнаие переменных используемых в модуле

2

If Target.Count = 1 Then Cells(intR, intC) = IIf(Target = "", "Пусто", Target)

  Ответить  
 
 автор: Nastya   (17.11.2006 в 12:33)   личное сообщение
 
 

Возможна ли Ваша помощь?

Есть три листа:
1.Лист Project содержит все данные по проектам
2. В лист Data записываются данные по проектам в зависимости от фамилии, выбранной в списке на листе Pitable. После нажатия кнопки также появляются Названия проектов по выбранной фамилии (с этим я справилась :)).

Необходимо в поля, выделенные серым цветом на листе Pitable, выводить данные по проекту на который мы щелкаем мышкой в столбце Название проекта (выводить из листа Data)

Была бы очень признательна за помощь (файл не удается прикрепить, поэтому если вы согласны посмотреть, я вышлю почтой). Жду ответа :)

  Ответить  
 
 автор: osmor   (17.11.2006 в 13:21)   личное сообщение
 
 

сроки? присылайте...

  Ответить  
 
 автор: Nastya   (17.11.2006 в 13:34)   личное сообщение
 
 

Отправила. Сроки наверное Вы устанавливайте :)

  Ответить  
 
 автор: osmor   (17.11.2006 в 14:12)   личное сообщение
 
 

а почему из листа data, а не прямо с листа Project.

  Ответить  
 
 автор: Nastya   (17.11.2006 в 14:21)   личное сообщение
 
 

Ну наверное можно и из Project, просто мне показалось, что удобнее делать выборку по Фамилии куда -то в отдельный лист, откуда потом будут браться данные :). А если из project, то придется еще отыскивать проекты по одной фамилии из листа, это пример, а на самом деле у меня там около 200 записей, а я умею только циклами пользоваться :) Ну в общем не знаю как сказать, женско-программистская логика, или ламерская Но все-таки чем-то я руководствовалась, когда писала код :)
Предложите более "умный" вариант

  Ответить  
 
 автор: osmor   (17.11.2006 в 15:11)   личное сообщение
23 Кб.
 
 

Сделал выборку с data что бы не ломать идею.
Более "умным" вариантом было бы сделать ВСЕ в ACCESS, тогда в такие дебри программирования лезть не пришлось бы.

  Ответить  
 
 автор: Nastya   (17.11.2006 в 15:26)   личное сообщение
 
 

!!!!!!!!!!!Спасибо!!!!!!!!!!!!!!!!!
Ужас как все ново и непонятно, но зато есть возможность получить новые знания
А если будут вопросы по коду, лучше задавать их в этой теме или в новой?

P.S ACCESS-ом не возможно пользоваться, этот файл будет каждый день обновляться и отправляться сотрудникам в регионы по почте.

  Ответить  
 
 автор: osmor   (17.11.2006 в 15:37)   личное сообщение
 
 

тоже можно было сделать и в ACCESS и каждый день отправлять им новый файл.
Вопросы задавайте куда хотите...
Особенно нового, чего вы еще не использовали, там ничего нет, кроме пожалуй Enum, но я вроде написал для чего это сделано.

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList