上顿号符号_特殊符号在那里

■用输入法输入

①智能ABC输入法:按“V+数字1至9”,即可输入各种符号。

②紫光输入法:右击输入状态条上的软键盘,即可打开各种软件盘,再用鼠标在软键盘上点击就是!

■从别处复制保存在你电脑上,用时就复制粘贴过来就是!

⊙?@#&〓\㊣℡﹋﹌☆★○●◎◇◆□■?△▲??????⊿※§··々‖$£¤¢♂♀≈≡∷∮∑∈⊥‖∠⌒⊙≌∽√≈≤≥ΘΞ∏ΦΩξ≈≡≠=≤≥<>≮≯∷±+-×÷/∫∵∴∠⌒⊙≌∽√)§№☆★○●◎◇◆□■△▲※→←↑↓〓#&@\^_※☆★△▲ ≈≡≠=≤≥<>≮≯∷±+-×÷/∫∮∝∞∧∨∑∏∪∩∈∵∴⊥‖∠⌒⊙≌∽√°′〃$£¥‰%℃¤┌┍┎┏┐┑┒┓—┄┈├┝┞┟┠┡┢┣│┆┊┬┭┮┯┰┱┲┳┼┽┾┿╀╁╂╃ §№☆★○●◎◇◆□■△▲※→←↑↓〓#&@\^_&@\^ абвгдеёжзийклмнопрстуфхцчшщъыьэюяАБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ αβγδεζηθικλμνξοπρστυφχψωΑΒΓΔΕΖΗΘΙΚ∧ΜΝΞΟ∏Ρ∑ΤΥΦΧΨΩ ㄅㄉㄓㄚㄞㄢㄦㄆㄊㄍㄐㄔㄗㄧㄛㄟㄣㄇㄋㄎㄑㄕㄘㄨㄜㄠㄤㄈㄏㄒㄖㄙㄩㄝㄡㄥ āáǎàōóǒòêēéěèīíǐìūúǔùǖǘǚǜü $&¤§|°¨±·×÷ˇˉˊˋ˙ΓΔΘΞ∏∑ΥΦΨΩαβγδεζηθικλμνξπρστυφψωЁБГДЕЖЗИ ЙКЛФУЦЧШЩЪЫЭЮЯабвгджзийклфцчшщъыюяё--―‖¨…‰′〃※℃℅℉№℡Ⅰ ⅡⅢⅣⅤⅥⅦⅧⅨⅩⅪⅫⅰⅱⅲⅳⅴⅵⅶⅷⅸⅹ←↑→↓↖↗↘↙∈∏∑∕√∝∞∟ ∠∣‖∧∨∩∪∫∮∴∵∶∷∽≈≌≈≠≡≤≥≤≥≮≯?—━│┃┄┅┆┇┈┉┊┋┌┍ ┎┏┐┑┒┓└┕┖┗┘┙┚┛├┝┞┟┠┡┢┣┤┥┦┧┨┩┪┫┬┭┮┯┰┱┲ ┳┴┵┶┷┸┹┺┻┼┽┾┿╀╁╂╃╄╅╆╇╈╉╊╋═║╒╓╔╕╖╗╘╙╚╛ ╜╝╞╟╠╡╢╣╤╥╦╧╨╩╪╫╬╭╮╯╰╱╲╳▁▂▃▄?brvbar;▆▇?????? ?????■□▲△??◆◇○◎●????★☆⊙♀♂々〆?「」『』【】?〓 〖〗〡〢〣〤〥〦〧〨〩㈱㊣㎎㎏㎜㎝㎞㎡㏄㏎㏑㏒㏕??? ???????????∶||︴(){}〔〕【】《》^〉「」『』﹉﹊﹋﹌﹍﹎ \╬ ▁▂▃▄?brvbar;▆▇?▇▆?brvbar;▄▃▂▁ ╭╮ ╰╯ ? 【】 ▲ ╱╲ △ ? ? ◆ ◇ ○ ◎ ● ?? ?? ★ ☆ ⊙ ♀ ♂ ? 》 「」 『』 ? 〓 〖〗 【】 《》 ¤ ╳ ↑ ↓ ⊙ ■ ?? Ψ ※ →№← ㊣ ∑ ⌒ @ ^⌒^ ξ ζ ω □ ∮ 〓 ∏ ?e √ ∩ 々 ∞ ① ㄨ ≡ ↘↙ ⊙●○①?◎Θ⊙¤ ㊣★☆♀◆◇???▲?△?⊿? ? ▂ ▃ ▄ ?brvbar; ▆ ▇ ? ? ■ ? 回 □ 〓 ≡ ╝╚╔ ╗╬ ═ ╓ ╩ ┠ ┨┯ ┷┏ ┓┗ ┛┳⊥『』┌ ┐└ ┘∟「」 ↑↓→←↘↙♀♂┇┅ ﹉﹊﹍﹎╭ ╮╰ ╯ *^_^* ^*^ ^-^ ^_^ ^(^ ∵∴‖| |︴﹏﹋﹌()〔〕 【】〖〗@:!/\ " _ `,·。

≈{}~ ~() _ -『』√ $ @ * & # ※ ?e 々∞Ψ ∪∩∈∏ の ℡ ぁ §∮"″ ミ灬ξ№∑⌒ξζω*??ㄨ ≮≯ +-×÷+-±/=∫∮∝ ∞ ∧∨ ∑ ∏ ‖∠ ≌ ∽ ≤ ≥ ≈<>じ☆veve↑↓⊙●★☆■♀『』 ◆??▲Ψ ※? ? →№←㊣∑⌒〖〗@ξζω□∮〓※∴ぷ▂▃?brvbar;▆? ∏?e【】△√ ∩¤々♀♂∞①ㄨ≡↘↙▂ ▂ ▃ ▄ ? brvbar; ▆ ▇ ?┗┛╰☆╮ じ╰☆╮ve ⊙●○①?◎Θ⊙¤㊣★☆♀◆◇???▲?△?⊿? ? ▆ ▇ ? ? ■ ? 回 □ 〓≡ ╝╚╔ ╗╬ ═ ╓ ╩ ┠ ┨┯ ┷┏ ┓┗ ┛┳⊥『』┌ ┐└ ┘∟「」↑↓→←↘↙♀♂┇┅ ﹉﹊﹍﹎╭ ╮╰ ╯ *^_^* ^*^ ^-^ ^_^ ^(^ ∵∴‖| |︴﹏﹋﹌()〔〕【】〖〗@:!/ " _ `,·。

≈{}~ ~() _ -『』√ $ @ * & # ※ ?e 々∞Ψ ∪∩∈∏ の ℡ ぁ §∮”〃ミ灬ξ№∑⌒ξζω*??ㄨ ≮≯ + -×÷+-±/=∫∮∝ ∞ ∧∨ ∑ ∏ ‖∠ ≌ ∽ ≤ ≥ ≈<>じ ☆veve↑↓⊙●★☆■♀『』◆??▲Ψ ※? ? →№←㊣∑⌒〖〗@ ξζω□∮〓※∴ぷ▂▃▅▆? ∏?e【】△√ ∩¤々♀♂∞①ㄨ≡↘↙▂ ▂ ▃ ▄ ▅ ▆ ▇ ?┗┛╰☆╮ ≠ ▂ ▃ ▄ ▅ 【】—一 ▄【┻┳═一 ▄【┳一 ▄【┻═┳一 ▄【┳-一 ▄【┻═┳ 【┳═一 ▄【┳一· ▄【┳═一 【┳═一oO -—═┳【 ∝╬══→ ::======>> ┈━═☆ ┣▇▇▇═—

全部

Ниже представлены две части кода VBA, которые могут решить задачу: Первый код используется для создания формы расчета графика платежей по кредиту: ``` Sub СоздатьФормуРасчетаГрафикаПлатежейПоКредиту() Dim ДатаНачалаКредита As Date Dim СрокКредитаВМесяцах As Integer Dim ПроцентнаяСтавка As Double Dim СуммаКредита As Double Dim ДатаПланируемогоПлатежа As Date 'Запросить информацию у пользователя ДатаНачалаКредита = InputBox("Введите дату начала кредита (в формате ГГГГ/ММ/ДД)") СрокКредитаВМесяцах = InputBox("Введите срок кредита в месяцах") ПроцентнаяСтавка = InputBox("Введите процентную ставку по кредиту") СуммаКредита = InputBox("Введите сумму кредита") ДатаПланируемогоПлатежа = InputBox("Введите планируемую дату платежа (в формате ГГГГ/ММ/ДД)") 'Добавить заголовок таблицы Range("A1:F1").Merge Range("A1").Value = "График платежей по кредиту" Range("A1").Font.Size = 20 Range("A1").Font.Bold = True 'Добавить заголовки столбцов таблицы Range("A3").Value = "Дата платежа" Range("B3").Value = "Месяц платежа" Range("C3").Value = "Год платежа" Range("D3").Value = "Сумма платежа" Range("E3").Value = "Основной долг" Range("F3").Value = "Проценты" 'Рассчитать график платежей и заполнить таблицу Dim i As Integer For i = 1 To СрокКредитаВМесяцах Dim ДатаПлатежа As Date Dim МесяцПлатежа As Integer Dim ГодПлатежа As Integer ДатаПлатежа = DateSerial(Year(ДатаПланируемогоПлатежа), Month(ДатаПланируемогоПлатежа), 10) If i > 1 Then ДатаПлатежа = DateAdd("m", 1, Range("A" & i + 2).Value) End If МесяцПлатежа = Month(ДатаПлатежа) ГодПлатежа = Year(ДатаПлатежа) Dim СуммаПлатежа As Double Dim ОсновнойДолг As Double Dim Проценты As Double СуммаПлатежа = WorksheetFunction.Pmt(ПроцентнаяСтавка / 12, СрокКредитаВМесяцах, -СуммаКредита) ОсновнойДолг = WorksheetFunction.PPmt(ПроцентнаяСтавка / 12, i, СрокКредитаВМесяцах, -СуммаКредита) Проценты = WorksheetFunction.IPmt(ПроцентнаяСтавка / 12, i, СрокКредитаВМесяцах, -СуммаКредита) Range("A" & i + 3).Value = ДатаПлатежа Range("B" & i + 3).Value = МесяцПлатежа Range("C" & i + 3).Value = ГодПлатежа Range("D" & i + 3).Value = СуммаПлатежа Range("E" & i + 3).Value = ОсновнойДолг Range("F" & i + 3).Value = Проценты Next i 'Оформить таблицу Range("A3:F" & СрокКредитаВМесяцах + 3).HorizontalAlignment = xlCenter Range("A3:F" & СрокКредитаВМесяцах + 3).Borders.LineStyle = xlContinuous Range("A3:F" & СрокКредитаВМесяцах + 3).Font.Size = 12 Range("A3:F" & СрокКредитаВМесяцах + 3).Font.Name = "Calibri" Range("A" & СрокКредитаВМесяцах + 5).Value = "Подпись:" Range("A" & СрокКредитаВМесяцах + 7).Value = "Дата: " & Format(Date, "ГГГГ/ММ/ДД") End Sub ``` Второй код используется для привязки первого кода к кнопке "ОК" на форме: ``` Private Sub CommandButton1_Click() Call СоздатьФормуРасчетаГрафикаПлатежейПоКредиту End Sub ``` Чтобы использовать код, создайте новый Excel-файл, нажмите на кнопку "Разработчик" в меню, выберите "Вставка формы" и добавьте кнопку "ОК". Щелкните правой кнопкой мыши на кнопке "ОК" и выберите "Просмотр кода", чтобы открыть редактор VBA. Скопируйте второй код в редактор, чтобы связать его с кнопкой. Затем скопируйте первый код в редактор, чтобы создать форму расчета графика платежей по кредиту. Сохраните файл и нажмите на кнопку "ОК" для запуска формы и отображения графика платежей.
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值