Компьютерный форум NoWa.cc Здесь может быть Ваша реклама
Правила Форума
редакция от 22.06.2020
Форум .::NoWa.cc::.
Вернуться   Компьютерный форум NoWa.cc > В помощь вебмастеру > Программирование

Уважаемые пользователи nowa.cc. Мы работаем для вас более 20 лет и сейчас вынуждены просить о финансовой помощи по оплате за сервер.
Окажите посильную поддержку, мы очень надеемся на вас. Реквизиты для переводов ниже.
Webmoney Webmoney WMZ: Z021474945171 Webmoney WME: E159284508897 Webmoney WMUSDT: T206853643180
Кошелёк для вашей помощи YooMoney 4100117770549562
YooMoney Спасибо за поддержку!

Ответ
 
Опции темы Опции просмотра Language
Старый 20.04.2008, 11:50   #1
Неактивный пользователь
 
Аватар для Чех
 
Пол:Мужской
Регистрация: 30.06.2006
Сообщений: 137
Репутация: 32
Exclamation BASIC in Office 12

Помогите, где можно почитать, о написании макросов для MS Office Excel 12. BASIC не знаю, но знаю АСМ, СИ, ПАСКАЛЬ и ещё чё то (в смысле пишу на них, а не названия знаю), щас не помню, так что надеюсь разберусь .

ПОСКАЗОК, ТИПА "ПОРОБУЙ ЧЁ ТО ДР." НЕНАДО, ОК.
Чех вне форума
 
Ответить с цитированием Вверх
Здесь может быть Ваша реклама
Здесь может быть Ваша реклама


Реклама: смотреть фильм планета смертиsms рассылки сервисинтеграция сайта с телеграммомтехнические характеристики редуктора на аргон с ротаметромкруиз тур


Старый 07.05.2008, 09:13   #2
_Lz_
Пользователь
 
Пол:Мужской
Регистрация: 21.09.2006
Сообщений: 103
Репутация: 22
По умолчанию Ответ: BASIC in Office 12

Там есть дивный хелп
__________________
Beeep! Pshshshsh! Tape loading error...
_Lz_ вне форума
 
Ответить с цитированием Вверх
Старый 11.05.2008, 15:58   #3
Чех
Неактивный пользователь
 
Аватар для Чех
 
Пол:Мужской
Регистрация: 30.06.2006
Сообщений: 137
Репутация: 32
По умолчанию Ответ: BASIC in Office 12

помогите, почему функция возвращает -1
nPauses = UBound(aPeriodes)
весь код с массивом выглядит так:
Dim aPeriodes() As String
Dim nPauses As Integer
aPeriodes = Split(Str, ";")
nPauses = UBound(aPeriodes)
болше обращений нет, ни к массиву ни к nPauses, кроме присваивания значения ячейки.

Вся эта история ториться в МС оффис 2007
Чех вне форума
 
Ответить с цитированием Вверх
Старый 13.05.2008, 21:04   #4
Матвей Н
Неактивный пользователь
 
Регистрация: 17.04.2008
Сообщений: 30
Репутация: 6
По умолчанию Ответ: BASIC in Office 12

Цитата:
Сообщение от Чех Посмотреть сообщение
почему функция возвращает -1

Вероятно нельзя использовать "Str", ведь это служебное слово. Попробуй "Str1", например.
Код:
Sub Test()
    Dim aPeriodes() As String
    Dim nPauses As Integer
    
    ' В ячейке А1 - Строка "Одноко;Двоко;Троко"
    Str1 = ActiveSheet.Cells(1, 1).Value
    
    aPeriodes = Split(Str1, ";")
    nPauses = UBound(aPeriodes)
    
    For i = 0 To nPauses
        MsgBox (aPeriodes(i))
    Next
End Sub
Матвей Н вне форума
 
Ответить с цитированием Вверх
Старый 31.05.2008, 18:33   #5
Чех
Неактивный пользователь
 
Аватар для Чех
 
Пол:Мужской
Регистрация: 30.06.2006
Сообщений: 137
Репутация: 32
По умолчанию Ответ: BASIC in Office 12

Спасиб, помог. А то прогу сдавать уже надо было.

Да кста. Нашего препода по ЯПе тоже Матвеем кличут.
Чех вне форума
 
Ответить с цитированием Вверх
Старый 09.08.2008, 22:11   #6
Pixma
Неактивный пользователь
 
Аватар для Pixma
 
Пол:Женский
Регистрация: 15.01.2006
Сообщений: 8
Репутация: 2
По умолчанию Ответ: BASIC in Office 12

Ребята, может кто поможет советом, я конечно в программировании ничего не смыслю, но вот может кто популярно расскажет, как в екселе цифры в слова переделать, знаю, что это возможно, а вот как ?
Pixma вне форума
 
Ответить с цитированием Вверх
Старый 12.08.2008, 20:59   #7
_Lz_
Пользователь
 
Пол:Мужской
Регистрация: 21.09.2006
Сообщений: 103
Репутация: 22
По умолчанию Ответ: BASIC in Office 12

В смысле написать число прописью? 99 = девяносто девять?
__________________
Beeep! Pshshshsh! Tape loading error...
_Lz_ вне форума
 
Ответить с цитированием Вверх
Старый 12.08.2008, 21:16   #8
Pixma
Неактивный пользователь
 
Аватар для Pixma
 
Пол:Женский
Регистрация: 15.01.2006
Сообщений: 8
Репутация: 2
По умолчанию Ответ: BASIC in Office 12

Цитата:
Сообщение от _Lz_ Посмотреть сообщение
В смысле написать число прописью? 99 = девяносто девять?

Вот именно, например в кассовом документе чтоб указать сумму в цифрах, а в отдельной графе она была уже прописана прописью. В Майкрософт Оффис,эта функция есть, но она только для китайцев, а нам ведь тоже хочется жизнь себе облегчить. И еще интересно а в латинице можно как то этого добиться?
Pixma вне форума
 
Ответить с цитированием Вверх
Старый 13.08.2008, 21:12   #9
_Lz_
Пользователь
 
Пол:Мужской
Регистрация: 21.09.2006
Сообщений: 103
Репутация: 22
По умолчанию Ответ: BASIC in Office 12

В свое время под Excel 97 для этого писался макрос. Даже и не знаю, ушел ли с тех пор куда-нибудь прогресс.
__________________
Beeep! Pshshshsh! Tape loading error...
_Lz_ вне форума
 
Ответить с цитированием Вверх
Старый 28.01.2010, 08:02   #10
Deputy
Постоялец
 
Аватар для Deputy
 
Пол:Мужской
Регистрация: 23.05.2007
Адрес: Санкт-Петербург
Сообщений: 219
Репутация: 908
По умолчанию Re: BASIC in Office 12

Мне нужен файл ленты из офиса 2007.
У меня самого офис 2007 не установлен, да он мне и не нужен, меня 2003 устраивает, только понадобилось в проект вставить ленту, а библиотеки с этой лентой нет, и чего-то в интернете не нашёл.
Она называется, наверное, как-нибудь Ribbon.dll или Ribbon.ocx или Fluent UI.dll или что-то вроде этого.
Deputy вне форума
 
Ответить с цитированием Вверх
Старый 29.01.2010, 08:33   #11
Deputy
Постоялец
 
Аватар для Deputy
 
Пол:Мужской
Регистрация: 23.05.2007
Адрес: Санкт-Петербург
Сообщений: 219
Репутация: 908
По умолчанию Re: BASIC in Office 12

Ну залейте, кто-нибудь, ПОЖАЛУЙСТА!!!
Deputy вне форума
 
Ответить с цитированием Вверх
Ответ


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
откуда можно скачать MS OFFICE 2007 BASIC andyPROG Скорая помощь 32 03.06.2011 07:33
как запустить GW-BASIC на Висте? Jurok Скорая помощь 9 22.05.2009 14:24
Office 2007 и Office 2003 вместе ZORROSHOES Архив 7 30.12.2006 18:01

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


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


Copyright ©2004 - 2026 NoWa.cc

Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2026, vBulletin Solutions, Inc. Перевод: zCarot
Время генерации страницы 0.19815 секунды с 11 запросами