Сообщений в теме: 914

[DeoN]

Код макроса на листе DATA.

Private Sub Worksheet_Change(ByVal Target As Range) -- это предопределенная процедура, срабатывает при изменении содержимого листа. то есть при изменении данных в ячейке или диапазоне, при этом адрес ячейки попадает в переменную Terget
    
    CreditStory = Cells(21, 2).Value -- здесь я получил значение изменяемой ячейки
    
    If (Target = Range("B21")) Then -- так как нам не нужно, чтобы процедура отрабатывала ПРИ ЛЮБЫХ ИЗМЕНЕНИЯХ НА ЛИСТЕ, то я проверяю, что измененная ячейка является целевой, нужной мне
        If (CreditStory = "Отсутствует") Then -- думаю, понятно все
            Worksheets("РЕЗЮМЕ").Rows("29:36").EntireRow.Hidden = True -- то же думаю понятно
        Else
            Worksheets("РЕЗЮМЕ").Rows("29:36").EntireRow.Hidden = False
        End If
    End If
End Sub

объяснения в коде

то есть добавите новые условия If (Target = .... и так далее

нет, еще изменяемые ячейки разные хочу прописать.

[Мэс]

ну так я и пишу - добавляйте новые условия через переменную Target.
Какие проблемы?
Кстати, я работал в Народном и собаку съел на калькуляторах )

[Fidelis]

всем привет! такая проблема:
с помощью стандартных библиотек экзуль реализована выгрузка данных C# => Excel, кода под рукой к сожалению нет а на работе заблокирована функция постить на форумах( но если очень нужно будет найду пример выложу, так вот имеется сервер куда пользователи подключаются через веб, если запускать проект на самом сервере то при выгрузке открывается экзель, вставляются данные и дальше можно делать что нужно с файлом экзеля, а вот если подключаться как обычный пользователь через веб то при срабатывании события выгрузки ничего не происходит (сделала логирование - вижу что метод выгрузки полностью отрабатывает, но на стороне клиента ничего нет), впервые сталкиваюсь с таким, кто-нибудь знает почему так и можно ли решить проблему?

[Dmitriy_N]

всем привет! такая проблема:
с помощью стандартных библиотек экзуль реализована выгрузка данных C# => Excel, кода под рукой к сожалению нет а на работе заблокирована функция постить на форумах( но если очень нужно будет найду пример выложу, так вот имеется сервер куда пользователи подключаются через веб, если запускать проект на самом сервере то при выгрузке открывается экзель, вставляются данные и дальше можно делать что нужно с файлом экзеля, а вот если подключаться как обычный пользователь через веб то при срабатывании события выгрузки ничего не происходит (сделала логирование - вижу что метод выгрузки полностью отрабатывает, но на стороне клиента ничего нет), впервые сталкиваюсь с таким, кто-нибудь знает почему так и можно ли решить проблему?

утра доброго всем, выгрузка может и происходит да только на сервер, расписать можно по подробнее, у меня на атлантисе похожая хрень была выгружалась ДБФка в двухзвенке файл появляется у пользователя а в трехзвенке файла нет, он собака создавался, да только на сервере, я по запарке не правильно указал путь . А можно вопрос, а что это за стандартные библиотеки - "экзуль реализована выгрузка данных C# => Excel", просто интересно для общего развития .

[Fidelis]

утра доброго всем, выгрузка может и происходит да только на сервер, расписать можно по подробнее, у меня на атлантисе похожая хрень была выгружалась ДБФка в двухзвенке файл появляется у пользователя а в трехзвенке файла нет, он собака создавался, да только на сервере, я по запарке не правильно указал путь . А можно вопрос, а что это за стандартные библиотеки - "экзуль реализована выгрузка данных C# => Excel", просто интересно для общего развития .

под стандартными библиотеками я имела ввиду что не создаю XML и не открываю его экзелем (раньше именно так всегда делала так как быстрее и проще, но теперь надо чтоб экзелевские формулы работали а через XML как раз не работают), экзелевские dll-ки подключаю к проекту и создаю конкретно workbook экзель, заполняю данными и так далее. Не знаю как подробнее написать, хотела код принести да флешка дома осталась, а у на работе даже электронка не работает завтра постараюсь не забыть.
А как-то можно проверить создается ли на сервере файл, у меня там винда, после выгрузки данных в экзель захожу удаленником на сервер, там тоже ничего нет(.

[Dmitriy_N]

Всем доброго дня, Fidelis без кода выгрузки трудно что либо понять, проверить создание файла, наверное просто поискать его. С екселем сложнее в том плане что ДБФку программа создавала по любому есть на сервере офис или нет офис программе нафиг не нужен - программа просто создавала файл, а вот как поведет себя Ваша программа не обнаружив офиса, не видя кода не возможно точно сказать что либо . Я помню в юности у нас преподаватель на РСЮТ когда к нему подходили и говорили - А Вы знаете, у меня приемник дома шипит но ничего не ловит, как Вы думаете почему? он отвечал - А вот у моей бабушки зад болит, как ты думаешь это случайно не геморрой... действительно пока не увидишь кода можно лишь гадать и предполагать, нужен код . удачи Вам Fidelis.

[Fidelis]

вобщем принесла наконец код выгрузки в экзель, правда за это время я её реализовала еще через гугловскую библиотеку, проще некуда - кода одна строчка
но что не так с предыдущей реализацией все-таки тоже интересно, так что прикладываю код, может у кого будут соображения

using System;
using System.Collections.Generic;
using System.Web;
using Excel = Microsoft.Office.Interop.Excel;
using System.Reflection; 
using System.Data;
using Microsoft.Office.Interop.Excel;

public class ExportExcel
{
	public ExportExcel()
	{
	}

    public void ExcelExport(DataTable dt)
    {
            Excel.Range oRng;
            Excel.Application oXL;

            oXL = new Excel.Application();
            oXL.Visible = true;
            Excel.ApplicationClass excel = new Microsoft.Office.Interop.Excel.ApplicationClass();
            System.Globalization.CultureInfo oldCI = System.Threading.Thread.CurrentThread.CurrentCulture;
            System.Threading.Thread.CurrentThread.CurrentCulture = new System.Globalization.CultureInfo("en-US");
            excel.Visible = true;
            excel.UserControl = true;
            Excel.Workbook wb = (Excel.Workbook)excel.Workbooks.Add(Missing.Value);
            System.Threading.Thread.CurrentThread.CurrentCulture = oldCI;
            Excel.Worksheet ws = (Excel.Worksheet)excel.ActiveSheet;

            ws.Cells[1, 3] = "какие-то данные";

            //Format A1:D1 as bold, vertical alignment = center.
            ws.get_Range("A1", "IV1").Font.Bold = true;
            ws.get_Range("A1", "IV1").VerticalAlignment = Excel.XlVAlign.xlVAlignCenter;

            //AutoFit columns A:D.
            oRng = ws.get_Range("A1", "IV1");
            oRng.EntireColumn.AutoFit();

            //Make sure Excel is visible and give the user control
            //of Microsoft Excel's lifetime.
            oXL.Visible = true;
            oXL.UserControl = true;
        }

[Visual1]

но что не так с предыдущей реализацией все-таки тоже интересно, так что прикладываю код, может у кого будут соображения

Вот мне тоже интересно, зачем в вашем примере в функцию ExcelExport передается параметр dt типа DataTable.

Внутри функции с этим dt ничего не делают. И вообще, он там даже не появляется.

Сообщение отредактировал Visual1: 05.10.2011, 16:00:17

[idaa]

но что не так с предыдущей реализацией все-таки тоже интересно, так что прикладываю код, может у кого будут соображения

Вот мне тоже интересно, зачем в вашем примере в функцию ExcelExport передается параметр dt типа DataTable.

Внутри функции с этим dt ничего не делают. И вообще, он там даже не появляется.

очевидно же что копирование информации из dt в примере заменено на

ws.Cells[1, 3] = "какие-то данные";

что весьма разумно, т.к. не перегружает пример ненужными деталями.

[Visual1]

очевидно же что копирование информации из dt в примере заменено на

ws.Cells[1, 3] = "какие-то данные";

Не очевидно. Докажите.

что весьма разумно, т.к. не перегружает пример ненужными деталями.

Ну и заявление. С точностью до наоборот.

[idaa]

очевидно же что копирование информации из dt в примере заменено на

ws.Cells[1, 3] = "какие-то данные";

Не очевидно. Докажите.

что весьма разумно, т.к. не перегружает пример ненужными деталями.

Ну и заявление. С точностью до наоборот.

кто ж вам виноват что вы читать (или анализировать) не умеете?
показываю один раз. из http://vse.kz/index....8#entry17632998 следует
1) работает локально, не работает удаленно
2) "метод выгрузки полностью отрабатывает" - значит проблем с обработкой данных из dt нет - обработка не падает
3) "срабатывании события выгрузки ничего не происходит" - т.е. не отображается на клиенте
из 1-3 следует что проблема именно в передаче результата клиенту, а не в обработке dt, и вполне разумно работающую часть кода в пример не включать, а заменить кусочком данных, что б было.

[Visual1]

кто ж вам виноват что вы читать (или анализировать) не умеете?

Хамить не надо. Чем разговоры в такой манере, я лучше буду тратить свое время не на вас, а на что-нибудь более интересное и полезное.

показываю один раз. из http://vse.kz/index....8#entry17632998 следует
1) работает локально, не работает удаленно
2) "метод выгрузки полностью отрабатывает" - значит проблем с обработкой данных из dt нет - обработка не падает
3) "срабатывании события выгрузки ничего не происходит" - т.е. не отображается на клиенте
из 1-3 следует что проблема именно в передаче результата клиенту, а не в обработке dt, и вполне разумно работающую часть кода в пример не включать, а заменить кусочком данных, что б было.

Мой вопрос не касался всего этого. Я спрашивал именно насчет параметра dt, зачем он нужен, если он никак не обрабатывается. Ваш ответ ("очевидно же...") не годится. Из вашего ответа ничего такого не очевидно.

[Fidelis]

только не ругайтесь, совсем этого не люблю

с таблицей конечно производятся действия

          int j = 1; 
            for (int i = 0; i < dt.Columns.Count; i++)
            {
                ws.Cells[1, j] = dt.Columns[i].ColumnName;
                j++;
            }

         int x = 2; int k = 1;
            for (int i = 0; i < dt.Rows.Count; i++)
            {
                for (int v = 0; v < dt.Columns.Count; v++)
                {
                    string s = dt.Rows[i][v].ToString();
                    ws.Cells[x, k] = dt.Rows[i][v].ToString();
                    k++;
                }
                x++;
            }

я действительно исключила эту часть для экономии места в сообщении и в чужих мозгах
у idaa получилось очень точное выражение "проблема в передаче результата клиенту", у меня пока новых мыслей не появилось, да и откуда, я не одну неделю с этим билась, кажется моих мозгов просто не хватает

[idaa]

"проблема в передаче результата клиенту"

В самом примере есть только формирование эксельного файла, но нету его пересылки.
Как вариант, серверный вариант должен заканчиваться примено следующим:
- сохранить полученный эксельный файл во временный файл (что-то вроде oXL.Save),
- отправить клиенту (для IIS через Response, предварительно зачистив его от мусора и установив свойства имени файла и его тип, для других технологий в зависимости от их возможностей)
- удалить временный файл

Почему не видно ничего через удаленный доступ.
Если для доступа клиента используется веб-сервер то все запросы от него, как правило, выполняются под системным пользователем, которому еще и взаимодействие с десктопом обычно запрещено. Обечный пользователь при удаленом входе, не видит процессы других пользователей, и соотвествено всего того, что творит веб-сервер. В результате в логи все попадает, а не экране удаленного доступа ничего нет.

[Fidelis]

пробовала Save, при этом выдается диалоговое сообщение куда сохранить, только пробовала это на сервере, почему не пришло в голову попробовать тоже самое от клиента постараюсь попробовать на след неделе

[idaa]

пробовала Save, при этом выдается диалоговое сообщение куда сохранить, только пробовала это на сервере, почему не пришло в голову попробовать тоже самое от клиента постараюсь попробовать на след неделе

я ж сказал "что-то вроде oXL.Save".
это значит что надо окрыть MSDN и посмотреть что еще похоже на Save
а на Save там похоже SaveAs и SaveCopyAs

[Fidelis]

я ж сказал "что-то вроде oXL.Save".
это значит что надо окрыть MSDN и посмотреть что еще похоже на Save
а на Save там похоже SaveAs и SaveCopyAs

ну да, я так и пробовала, все отлично сохраняет, но пробовала только на сервере, теперь попробую от клиента.

[Sherlock]

Привет, кто умеет, знает как составлять арифметические прогрессии в Экселе?

Помогите, как сделать, особенно 1 вопрос? СРОЧНО нужна помощь!!! Инструкцию может напишите, или еще что? Времени в обрез

[Sherlock]

Привет, кто умеет, знает как составлять арифметические прогрессии в Экселе?

Помогите, как сделать, особенно 1 вопрос? СРОЧНО нужна помощь!!! Инструкцию может напишите, или еще что? Времени в обрез

НУ?

[ekoekoeko]

для Sherlock:
Не уверен на счет логарифмов я не математик ! В остальном совершенно не сложная задачка...ушло 7 минут на ее решение

Забыл добавить-остальные вопросы хорошо гугляться, читайте и изучайте. Удачи

Сообщение отредактировал ekoekoeko: 31.10.2011, 19:20:41