Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / ПОМОГИТЕ!!! Для тех кто знает VBA / 9 сообщений из 9, страница 1 из 1
06.06.2011, 20:49
    #37297642
Снежана Ломакина
Снежана Ломакина
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
вот база данных... тут нужно прописать в VBA через ехе1 формулу ВПР(H3;$A$3:$D$7;4;0)*J3. как это сделать, что то не понимаю... там всего 3 формулы... 2 я сделала, одну не могу... помогите
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2011, 21:04
    #37297658
Снежана Ломакина
Снежана Ломакина
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
Снежана Ломакина,

никто не может помочь? (( жаль...

Модератор: Тема перенесена из форума "Вопрос-Ответ".
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2011, 21:33
    #37297695
Снежана Ломакина
Снежана Ломакина
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
Снежана Ломакина,

может все же кто то что то знает...хоть подскажите)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2011, 00:39
    #37297875
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
Видимо, вы не пользуетесь поиском...
Схожая тема была уже 9865803 , поизучайте...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2011, 00:49
    #37297883
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
А, понял... Вы её и использовали.
Тогда вам надо заполнить формулы в таблице с помощью VBA?
Код: plaintext
1.
Range("K3").Formula="=VLOOKUP(H3;$A$3:$D$7;4;0)*J3"
Range("K3").AutoFill Destination:=Range("K3:K32")
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2011, 01:01
    #37297891
Снежана Ломакина
Снежана Ломакина
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
AndreTM,

хм...но тут нужно типа

Private Sub kv_Change()
If Val(pp.Text) = "Одеса - Севастопіль" Then
vpv.Text = Val(kv.Text) * Val(zin.Text)
ElseIf Val(pp.Text) = "Одеса - Ялта" Then
vpv.Text = Val(kv.Text) * Val(zin.Text)
ElseIf Val(pp.Text) = "Одеса - Керчь" Then
vpv.Text = Val(kv.Text) * Val(zin.Text)
ElseIf Val(pp.Text) = "Одеса - Феодосія" Then
vpv.Text = Val(kv.Text) * Val(zin.Text)
Else
vpv.Text = Val(kv.Text) * Val(zin.Text)
End If
End Sub

но и тут что то не так((
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2011, 01:24
    #37297904
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
Это шутка?
Val(pp.Text) есть ЧИСЛО, а "Одеса - Севастопіль " - СТРОКА... и что вы сравниваете?
Вообще, для вычисления достаточно одной строки
Код: plaintext
vpv.Text = Val(kv.Text) * Val(zin.Text)
Вы учитывайте, что kv.Text вы заполняете вручную, а zin.Text изменяется в sud_Change()
Если же вы подразумеваете, что стоимость зависит еще и от километража, то у вас есть vids.Text , изменяющийся в pp_Change() , достаточно в формуле еще и на него домножить...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2011, 01:31
    #37297906
Снежана Ломакина
Снежана Ломакина
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
AndreTM,

я просто уже переусерствовала...
огромное спасибо вам AndreTM...

чесно говоря, я просто немного затупила(((
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.06.2011, 13:45
    #37300487
Ser Artur
Ser Artur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПОМОГИТЕ!!! Для тех кто знает VBA
МОгу программно сделать через макрос если интересует то пишите и еще Поподробнее опишите что откуда и куда должно вписываться :)
С уважением Артур
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / ПОМОГИТЕ!!! Для тех кто знает VBA / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 451ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2176793]:
 0ms
get settings:
 8ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 151ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 66ms
get tp. blocked users:
 1ms
others: 193ms
total:  451ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]