IPB

Здравствуйте, гость ( Вход | Регистрация )

3 страниц V  1 2 3 >  
Ответить в эту темуОткрыть новую тему
> Конвертер валют, Пересчет валюты
Amirana
сообщение 19.2.2008, 14:31
Сообщение #1


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Плиииз!
Как сделать на BASIC конвертер валют? Нужен для пересчета евро в доллары в таблице Excel, с указанием обменного курса и даты обмена. Курс и дата зависимы друг от друга.
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
afterstep
сообщение 19.2.2008, 14:41
Сообщение #2


Пользователь


Группа: Активисты
Сообщений: 5 336
Регистрация: 14.3.2005
Пользователь №: 2 413



обязательно Бейсик - или можно используя функцию excel vlookup?
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 19.2.2008, 17:13
Сообщение #3


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Можно и с vlookup, в пределах Excel. Важно, чтобы пересчет по 1 курсу был не во всей таблице целиком, а по столбцам. В разных столбцах могут быть разные обменные курсы, на разную дату.
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
PolPoll
сообщение 19.2.2008, 19:59
Сообщение #4


:)


Группа: Главные администраторы
Сообщений: 5 858
Регистрация: 24.11.2005
Из: Москва
Пользователь №: 5 327



А просто умножение не пройдет?

Типа

Код
--    A      B     C
1           дата1  дата2    <--даты
2  евро     25,4   24,5     <---курс
3  20       =$A3*B$2
4  100
5  10  

Формулу из B3 можно за правый нижний угол распространить ко всем ячейкам вниз и вправо...


--------------------
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 20.2.2008, 13:37
Сообщение #5


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Простое умножение к сожалению не пойдет, мне кужно еще, чтобы можно было искать конкретный курс по дате (зависимость) и наоборот и вывод результата перевода валюты на этот конкретный курс и дату.
А так, спасибо)))
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 20.2.2008, 13:48
Сообщение #6


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Конкетнее нужно так: в таблице ввести данные для обмена - евро, рядом с таблицей ввести коэфициент и дату и нажать кнопку "Перевести в доллары"?))). А затем искать по дате в ячейке "Дата"? И еще вопрос: можно сделать так, чтобы пересчет зависел не от диапазона ячеек, а от формата чисел? Если число - перевести, если текст - выдать сообщение об ошибке?
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
afterstep
сообщение 20.2.2008, 15:09
Сообщение #7


Пользователь


Группа: Активисты
Сообщений: 5 336
Регистрация: 14.3.2005
Пользователь №: 2 413



есжли на одном листе вести курсьі валют - то на втором листе при переводе можно домножать на значение, взятое из первого листа. Брать по формуле вида
=VLOOKUP(A4;Sheet1!A5:B18;2;0)
кнопку - тоже можно прицепить, и привязать ее к макросу, которьій просто подкинет нужньіе формульі в нужньіе ячейки
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 20.2.2008, 16:41
Сообщение #8


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



А как конкретно написать?????
У меня не получается, совсем замучилась... unsure.gif
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
afterstep
сообщение 20.2.2008, 17:26
Сообщение #9


Пользователь


Группа: Активисты
Сообщений: 5 336
Регистрация: 14.3.2005
Пользователь №: 2 413



не понял smile.gif
как написать макрос - или что?
или достаточно взаимодествия двух листов - на одном указаньі курсьі валют, а на другом просто вводишь дату и сумму - а по курсу оно само пересчитьівает (ячейка результата использует поиск по hlookup)?
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 21.2.2008, 7:15
Сообщение #10


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Да, мне нужен макрос или программка на vba. Чтобы было достаточно ввести данные и нажать кнопку "Пересчитать". rolleyes.gif
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
PolPoll
сообщение 21.2.2008, 16:59
Сообщение #11


:)


Группа: Главные администраторы
Сообщений: 5 858
Регистрация: 24.11.2005
Из: Москва
Пользователь №: 5 327



а где курсы валют по дням хранятся?


--------------------
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
PolPoll
сообщение 21.2.2008, 17:14
Сообщение #12


:)


Группа: Главные администраторы
Сообщений: 5 858
Регистрация: 24.11.2005
Из: Москва
Пользователь №: 5 327



Пример
Код
--    A      B     C
1     a      b      a*b      Кнопку сюда, Двойной щелчек по ней и код туда:
2      3      4

Private Sub CommandButton1_Click()
    Sheets("Лист1").Select
    Range("C2").Select
    ActiveCell.Formula = "=A2*B2"
    Range("C3").Select
End Sub

Типа этого чтоль?


--------------------
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 21.2.2008, 17:55
Сообщение #13


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Да, типа этого, с умножением на произвольный обменный курс по столбцам. А дату можно записывать и хранить на отдельном листе или файле.
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
PolPoll
сообщение 21.2.2008, 18:05
Сообщение #14


:)


Группа: Главные администраторы
Сообщений: 5 858
Регистрация: 24.11.2005
Из: Москва
Пользователь №: 5 327



Все равно условие не понятно huh.gif
Что где писать и что что должно делать...


--------------------
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 21.2.2008, 19:43
Сообщение #15


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Прикрепленный файл  Valuta.bmp ( 1.61 мегабайт ) Кол-во скачиваний: 159

В этом файле я нарисовала, как этот конвертер должен выглядеть.
1) ввод данных в таблицу
2) ввод коэффициента и даты
3) нажимаем кнопку "пересчитать", в столбцах данных должны отобразиться переведенные цифры.
4) для поиска вводим коэффициент в ячейку "коэффициент" и получаем в ячейке "дата" дату ввода этого коэффициента.


Сообщение отредактировал Amirana - 21.2.2008, 19:54
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
PolPoll
сообщение 22.2.2008, 7:33
Сообщение #16


:)


Группа: Главные администраторы
Сообщений: 5 858
Регистрация: 24.11.2005
Из: Москва
Пользователь №: 5 327



То есть цены в евро должны затираться? huh.gif
Это чтоб проверить нельзя было? smile.gif


про 1,5 не понятно. Куда он вводится и по какому событию находится...
а если ввести 1,6 что найдется? huh.gif


--------------------
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 22.2.2008, 18:03
Сообщение #17


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Да, цены в евро должны затираться, т.к. они по-любому должны быть переведены в доллары.
Коэффициенты могут быть разные, с указанием даты обмена. Если вместо 1,5 ввести 1,6, должна будет появиться дата ввода 1,6 и сам 1,6. Я думаю, что коэффициент и дата должны храниться на отдельном листе со ссылкой на нее. В нем будут записываться все коэффициенты и даты. Их можно будет оттуда находить по поиску.
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
PolPoll
сообщение 23.2.2008, 15:15
Сообщение #18


:)


Группа: Главные администраторы
Сообщений: 5 858
Регистрация: 24.11.2005
Из: Москва
Пользователь №: 5 327



Цитата(Amirana @ 22.2.2008, 21:03) *

Их можно будет оттуда находить по поиску.
Это ччто? еще одна кнопка? или функции Excel можно использовать?

Примеры какие-нибудь есть??


Вот здесь почитай http://www.opeople.ru/forum58.html
http://glagolevvb.narod.ru/Informatika/zad...emestr2/z16.htm
http://glagolevvb.narod.ru/Informatika/zad...emestr2/z17.htm


--------------------
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Amirana
сообщение 23.2.2008, 18:09
Сообщение #19


Пользователь


Группа: Собеседник
Сообщений: 34
Регистрация: 19.2.2008
Пользователь №: 18 980



Нет, это не кнопка, а те же ячейки, куда вводятся коэффициент и дата. Чтобы можно было ввести ранее введенные коэффициент или дату и там же выходили найденные значения.

Сообщение отредактировал Amirana - 23.2.2008, 18:14
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
PolPoll
сообщение 24.2.2008, 7:37
Сообщение #20


:)


Группа: Главные администраторы
Сообщений: 5 858
Регистрация: 24.11.2005
Из: Москва
Пользователь №: 5 327



Цитата
Нет, это не кнопка, а те же ячейки, куда вводятся коэффициент и дата. Чтобы можно было ввести ранее введенные коэффициент или дату и там же выходили найденные значения.
По щучьему веленью? huh.gif

Функции туда не писать... Кнопки нет...


--------------------
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения

3 страниц V  1 2 3 >
Ответить в эту темуОткрыть новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия Сейчас: 9.2.2012, 4:41