Форум программистов, компьютерный форум CyberForum.ru Форум программистов | Компьютерный форум | Форум web-программистов | Форум по электронике и бытовой технике | Форум о софте | Научный форум | Карьера и бизнес
CyberForum.ru - форум программистов и сисадминов > > >
Восстановить пароль Регистрация

Ответ Создать новую тему
 
Кристина 1719
Новичок
0 / 0 / 0
Регистрация: 28.05.2010
Сообщений: 13
02.09.2010, 09:54     Перевод рублей в доллары
  #1
Создайте функцию пользователя, которая бы переводила рубли в $. Курс Валют возьмите произвольно.
AdAgent
Объявления
02.09.2010, 09:54
Cigurd
Новичок
0 / 0 / 0
Регистрация: 29.08.2010
Сообщений: 18
02.09.2010, 11:04
  #2
я сам не профи, но вот такой вот нашел в книжке:

Код Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub Test()
    Dim cur_range As Range
    With ActiveSheet
        Set cur_range = Selection
        cur_range.Activate
        For x = 1 To cur_range.Rows.Count
            For y = 1 To cur_range.Columns.Count
            ' значению ячейки присвоить значение умноженно на 2 (курс)
                cur_range(x, y) = cur_range(x, y).Value * 2
            Next y
        Next x
    End With
End Sub
Vlanib
Частенько бываю
739 / 321 / 3
Регистрация: 20.06.2007
Сообщений: 854
02.09.2010, 14:48     Перевод рублей в доллары
  #3
Код Visual Basic
1
2
3
4
5
6
Function ОБМЕН_ВАЛЮТЫ(РУБЛИ)
    Application.Volatile
    Const cDoll As Currency = 25.25
    If Not IsNumeric(РУБЛИ) Then ОБМЕН_ВАЛЮТЫ = "#Н\Д": Exit Function
    ОБМЕН_ВАЛЮТЫ = FormatNumber(РУБЛИ * cDoll, 2)
End Function
Yandex
Объявления
02.09.2010, 14:48
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать новую тему

Похожие темы
Тема Раздел Автор Дата
Visual Basic .NET Написать программу для перевода рублей в доллары сша, евро, иены, юани, марки и фунты стерлингов
Написать программу для перевода рублей в доллары сша, евро, иены, юани, марки и фунты стерлингов и наоборот. Вводить нужное число необходимо с клавиатуры, а также иметь возможность задать число с...
Visual Basic .NET ttt_xx 26.11.2013 18:06
VBA Какой банк выбрать, чтобы выгодно обменять доллары на рубли
У вас есть доллары. Вы хотите обменять их на рубли. Есть информация о стоимости купли-продажи в банках города. В городе N банков. Составьте программу, определяющую, какой банк выбрать, чтобы выгодно...
VBA karpovmixa 03.06.2013 12:45
VBA Перевод на VBA с c++
Перевод на VBA с c++ Ввести строку, состоящую только из цифр и букв. Распечатать те группы цифр, в которых цифра 7 встречается не более двух раз. (Группа цифр - это последовательность цифр,...
VBA natasha777 26.05.2013 13:44
Free Pascal Составить программу для печати таблицы перевода рублей в доллары. Количество элементов таблицы и шаг задать самостоятельно
Помогите пожалуйста.....Составить программу для печати таблицы перевода рублей в доллары. Количество элементов таблицы и шаг задать самостоятельно.
Free Pascal dmperf 05.12.2012 10:35
Free Pascal FreePascal. Есть информация о стоимости купли-продажи долларов в банках города. Найти банк с наиболее выгодными условиями для обмена рублей на доллары
В городе N банков. Есть информация о стоимости купли-продажи долларов в этих банках. Найти банк с наиболее выгодными условиями для обмена рублей на доллары.
Free Pascal programmistnub 09.07.2012 11:01
VBA Найти наименьшее количество купюр и монет для выдачи N рублей
Найти наименьшее количество купюр и монет для выдачи N рублей
VBA xenear 13.12.2011 03:43
VBA 4-е макроса которые бы меняли формат ячейки на денежный – рубли, доллары, английские фунты и евро
Суть в том, что осталась последняя пресдача, есть задачи и есть решение на них, нужно помочь объяснить само решение, помогите кто чем может, или в асю напишите 401996793, заранее спасибо Запишите...
VBA Sleier 05.03.2011 10:19
VBA Найти наименьшее количество купюр и монет для выдачи энного количества рублей
Найти наименьшее количество купюр и монет для выдачи N рублей
VBA kolyusta 20.06.2010 17:27
Опции темы

Текущее время: 00:14. Часовой пояс GMT +4.

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2014, vBulletin Solutions, Inc.