Создание макроса в Excell RRS feed

  • Вопрос

  • Добрый день. Написал запрос, который выдает определенные данные


    declare @date1 varchar(64) = '2015-11-25 00:00:00'

    declare @date2 varchar(64) = '2016-01-01 00:00:00'

    select aa.[Код отгрузки],aa.[Код путевого],rr.shv_Value as [Номер маршрута],

    when aa.Объем <1.2 then '1'
    when aa.Объем>1.2 then round(aa.Объем/1.2,0)
    --else  'null'
    end 'Кол-во паллет'
    ,aa.Объем,aa.[Дата погрузки в ТС]
    ( select  
    c.shp_Code [Код путевого],a.ost_Code [Код отгрузки], a.ost_Volume [Объем],    d.shv_Value [Дата погрузки в ТС],shv_AttributeID,d.shv_Value,
    from lv_ordershipment a with (nolock)
    join LV_Order b with (nolock) on b.ord_ID =a.ost_OrderID
    join LV_Shipment c with (nolock) on c.shp_ID=a.ost_ShipmentID
    join LV_ShipmentAttributesValues d with (nolock) on d.shv_ShipmentID=c.shp_ID
    join LV_ShipmentAttributes e with (nolock) on e.spa_ID = d.shv_AttributeID
    --a.ost_ShipmentID = 111810 and
    e.spa_Code = 'SH6'
    --d.shv_Value>'2015-11-01 00:00:00'
    ) aa
    join LV_ShipmentAttributesValues rr on rr.shv_ShipmentID=aa.shp_ID
    join LV_ShipmentAttributes dd on dd.spa_ID=rr.shv_AttributeID
    where dd.spa_Code= 'SH2'
    and aa.shv_Value > @date1
    and aa.shv_Value<@date2
    order by aa.shv_Value desc

    Создал подключение в эксель. Имеет вид в экселе следующий

    Вопрос:можно ли как-то сделать кнопку Дата в экселе,чтобы пользователи задавали дату не чере фильтр,а посредством этой кнопки?

    27 ноября 2015 г. 6:08


  • Скопировано из первой ссылки

    Add a command button (ActiveX control)

    1. If the Developer tab is not available, display it.

      Display the Developer tab

      1. Click the Microsoft Office Button Office button image, and then click Excel Options.

      2. In the Popular category, under Top options for working with Excel, select the Show Developer tab in the Ribbon check box, and then click OK.

        Note   The Ribbon is a component of the Microsoft Office Fluent user interface.

    2. On the Developer tab, in the Controls group, click Insert, and then under ActiveX Controls, click Command Button Button image.

      controls group

    3. Click the worksheet location where you want the upper-left corner of the command button to appear.

    4. In the Controls group, click View Code.
      This starts the Visual Basic Editor. Make sure that Click is selected in the dropdown list on the right. The sub procedure called CommandButton1_Click, as shown in the following picture, runs two macros when the button is clicked: SelectC15 and HelloMessage.

    The opinion expressed by me is not an official position of Microsoft

    27 ноября 2015 г. 10:36

Все ответы