powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Помогите начинающему сделать формулу ...
25 сообщений из 143, страница 5 из 6
Помогите начинающему сделать формулу ...
    #36441617
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Большое спасибо за предложенное решение, все отлично работает.
Вот хочу поделиться своими достижениями, нашел способ укоротить код:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
Private Sub Help_Click()

If Help.Value = True Then
Y=False
Else
Y=True
End If

For x =  1  To  46 
ActiveSheet.Shapes("SpinButton" & x).Select
    With Selection
        .Placement = xlMove
    End With
Next
Rows( 2 ).EntireRow.Hidden = Y
For x =  1  To  46 
ActiveSheet.Shapes("SpinButton" & x).Select
    With Selection
        .Placement = xlFreeFloating
    End With
Next

End Sub
Работает все точно также.
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442105
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот еще маленький вопросик:
Хотел сделать у себя так, как на приложенном файле: голубая рамка и серый фон вокруг.
Никак не могу понять как это сделано. В свойствах клеток ни фона ни рамки нету...
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442131
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Пытался все выделить и скопировать себе в книгу - ни фона ни рамок тоже нету...
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442138
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
View -> Page Break Preview ?
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442248
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да я там смотрел - там разрывов страниц нету...
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442288
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
У меня в 2000 это режим предпросмотра разбивки на страницы, если перключиться в Normal, рамка пропадёт (зажал в гиф, а то не лезло):
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442341
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ага, точно! Вот спасибо! Разобрался. Вот только в этом режиме надпись появляется "Страница 1" - как-то она мешает... Интересно - а отключить ее нельзя? А то придется от этого режима отказаться...
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442372
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В 2000 работает такой вариант - скрываешь все строки правее и ниже. Тоже результат - всё вокруг серое. Ну а рамку можно форматом задать. Но вот как в 2007 эти миллионы скрывать....
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442386
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот типа так:
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442755
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да в 2007 так не получается...
Попытка выделить все столбцы справа или строки снизу окончилась неудачей.
Обшарил все настройки - думал, может можно на листе задать видимость Х строк и Y столбцов на странице - нет такой настройки.
Хорошо бы выделить нужный фрагмент - потом инвертировать выделение - и скрыть выделенное, - такого тоже нету.
Видать придется довольствоваться тем, что есть...
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442855
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Так может просто залить пару-тройку широких строк/столбцов по бокам.
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36442918
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ну я так и сделал, ибо других вариантов нету, просто еще в инет не выложил.
Все работает отлично, будем обкатывать на практике.
Пока я заметил только один "глюк", но не конкретно в этой программе, а вообще с кнопками, на которых приклеены картинки. Иногда эти картинки пропадают. И действительно, заходишь в свойства кнопки, и там стоит Picture-None. Нельзя ли их приклеить, чтоб они не слетали?
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36839379
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем добрый день!
Благодаря вашей неоценимой помощи требуемая программа RSK была закончена. Мы ее успешно используем в офисе и выложили в инет для пользователей: http://www.colormusic.ru/price.html#a
Работает все отлично, однако в процессе работы выявился один "глюк": Если оформить заказ и его сохранить, то при его открытии, кнопки управления "Дизайн-проект" и "Доставка" слетают со своих мест и сбиваются в кучу, при этом все остальные кнопки ведут себя хорошо. Подскажите, пожалуйста, можно ли это как-нить исправить?
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36839430
Фотография Serge 007
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ВладимирВДа в 2007 так не получается...
Попытка выделить все столбцы справа или строки снизу окончилась неудачей.Почему?
Ctrl+Shift+стрелка "вправо" выделяет все столбцы правее выделенного (вместе с ним), а Ctrl+Shift+стрелка "вниз" выделяет все строки ниже выделенной (вместе с ней).
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36839659
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ВладимирВ, проробуйте для начала в свойствах поставить "не перемещать и не изменять размеры" и группировка - привязать к сетке. долно помочь.
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #36839692
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hugo121В 2000 работает такой вариант - скрываешь все строки правее и ниже. Тоже результат - всё вокруг серое. Ну а рамку можно форматом задать. Но вот как в 2007 эти миллионы скрывать....да так же, как и в 2000, ничё не поменялось.
для правых столбцов, например, последовательность такая

ctrl+space - ctrl+shift+стрелка вправо - аналог пкм на клаве - жмем ы - enter
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37173961
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день!
Хочу вернуться к совету, данному тов. Hugo121 8172720
Я все сделал по данному совету. Если "встать" мышкой на любую клетку столбика "Н", то кнопка появляется. Никак не могу лишь понять, как сделать, чтоб она меняла значение в текущей клетке. В свойствах есть LnkedCell, но мне то надо, чтоб она все время менялась!
Подскажите пожалуйста, как это сделать.
Файл прилагаю.
Заранее спасибо!
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37173964
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот файл
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37183191
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Уже неделю вопрос висит...
Неужели никто не знает решения?
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37183423
basicv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ВладимирВ,
автор но мне то надо, чтоб она все время менялась!


Ну, раз надо, так меняй:
Код: plaintext
1.
SpinButton1.LinkedCell = ActiveCell.Address()
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37185204
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Уважаемый basicv !
Огромное спасибо! Благодаря вашему совету переделал файл. Все прекрасно работает, только хотелось бы добавить небольшую вещь. Посмотрите пожалуйста прилагаемый файл. Если "встать" мышкой на поле "Штук", то появляются кнопки, которыми легко и удобно можно задать нужное кол-во. Что хотелось бы добавить:

1. Ограничить появление кнопок только в диапазоне Е10-Е92, ибо выше и ниже они не нужны, а если случайно встать на поле, например, С10, то выскакивает ошибка.

2. Скрыть эту кнопку при открытии листа.

Данная программа разрабатывается для сайта colormusic.ru , называется RSK
Заранее благодарен за помощь.
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37185876
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ВладимирВЕсли "встать" мышкой на поле "Штук", то появляются кнопки, которыми легко и удобно можно задать нужное кол-во.

Данная программа разрабатывается для...1. не вижу в этих кнопках смысла
2. куча ошибок на листе при активации ячеек: не задана область обработки события Selection_Change. как-нить так пишите:
If (Target.column = 1) and (Target.row>10) and (Target.row<92) then
процедура
End If
3.раз вылезают ошибки, обработчика этих самых ошибок нет (похоже, и не предвидится), т.к. пишете, что работает всё отлчно. зря его нет;
4.врядли вы задумывались о работе в разных версиях excel и разных машинах. однако, даже англоязычная версия excel может создать проблемы в части работы с ф-циями "OLEObjects". или, например, у пользователя элементарно могут отсутствовать библиотеки references.
5. как-то блёкло. вы удивитесь, узнав, сколько красивой дряни можно в excel напихать. в т.ч. - свою рекламу. тут уж куда. а у вас - просто листик.

в связи с умозаключениями выше, пара советов:
-перестаньте пользовать vba, в котором Вы плохо понимаете он тут не нужен, он не нужен вашим клиентам. задачи стоящие перед данным файлом - сбор информации от клиентов. последующую обработку можно полностью автоматизировать - не вопрос. но тут - чем красивее и проще - тем лучше.
-сделайте всё формулами, совместимыми с 2000 версией excel, уберите vba, чтобы не нужно было ничего включать (предствьте реакцию клиента, которому комп говорит "файл может содержать вредоносные программы! включить макросы?"), уберите сетку, счетчики столбцов. повесьте красивый фон и рекламу свою.

удачи!
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37185890
basicv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ВладимирВ,

1.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    result = False
    s = ActiveCell.Address(RowAbsolute:=False, columnabsolute:=False, ReferenceStyle:=xlA1)
    ss = ActiveCell.Row
    result = (s Like "E*") And (ss >  9 ) And (ss <  93 )
    If result = True Then
        SpinButton1.Left = ActiveCell.Left + ActiveCell.Width
        SpinButton1.Top = ActiveCell.Top
        SpinButton1.LinkedCell = s
        SpinButton1.Visible = True
    Else
        SpinButton1.Visible = False
    End If
End Sub

2.Кнопка не будет видна если при открытии активная ячейка не будет в диапазоне Е10:Е92
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37185905
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
да, и ещё. раз "Отапа понесло":
дабы не вводить домохозяет в ступор сообщениями безопасности от микромягких продуктов, можно оформить процедуры в виде надстройки. в принципе, всё должно работать без вопросов и без необходимости оную надстройку включать. только хвостов она оставлять не должна... установочных файлов - Боже упаси. всё это клиентов оттолкнет скорее.

ps: всё вышесказанное - имхо, разумеется
...
Рейтинг: 0 / 0
Помогите начинающему сделать формулу ...
    #37188768
ВладимирВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Уважаемый basicv!
Огромное спасибо за помощь!
Теперь все работает просто отлично, и не вылазит никаких ошибок!

Вот еще небольшая мелочь, которую надо доделать и можно будет выложить на сайт новую версию!

В клетке есть формула: =СЕГОДНЯ()
Очень удобно показывает текущую дату. Теперь мы сохраняем заказ. Через некоторое время открываем его для оформления, при этом у на с новая дата - сегодняшняя. А нужно, чтобы дата заказа осталась прежней.

Отсюда вопрос:
Каким образом значение ячейки с формулой =СЕГОДНЯ() превратить в текст типа: 17.03.2011 ?
Этот код надо будет вставить в кнопку "Сжать"

Заранее спасибо!
...
Рейтинг: 0 / 0
25 сообщений из 143, страница 5 из 6
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Помогите начинающему сделать формулу ...
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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