Добрый вечер. Есть вопрос как указать диограмме последнюю строку. У меня таких диограмм штук 40 на одном листе и количество их будет увеличиватся. Количество строк у диограмм одинаковое. Я нашол похожую тему, но ума не хватает как для всех диограмм указать индекс нужной строки. http://www.excelworld.ru/forum/2-3264-1?lZ49Aq И вопрос по постоению диограмм, как сделать, чтобы на диограмме отображалось последнее значение с столбика "Time" в области диограммы
Добрый вечер. Есть вопрос как указать диограмме последнюю строку. У меня таких диограмм штук 40 на одном листе и количество их будет увеличиватся. Количество строк у диограмм одинаковое. Я нашол похожую тему, но ума не хватает как для всех диограмм указать индекс нужной строки. http://www.excelworld.ru/forum/2-3264-1?lZ49Aq И вопрос по постоению диограмм, как сделать, чтобы на диограмме отображалось последнее значение с столбика "Time" в области диограммыinohodec
Попробывал, что то написать, но ничего не получается АУ!!!!! Hugo, _Boroda_, Саня, Pelena мне нужен ваш совет.
[vba]
Код
Sub Изменение_диапозона() Dim nt As Long, kt As Long Range("A25") = nt Range("A26") = kt ActiveSheet.ChartObjects("6").Activate ActiveChart.SetSourceData Source:=Sheets("Лист1").Range("C" & nt & ":I" & kt) End Sub
[/vba]
Попробывал, что то написать, но ничего не получается АУ!!!!! Hugo, _Boroda_, Саня, Pelena мне нужен ваш совет.
[vba]
Код
Sub Изменение_диапозона() Dim nt As Long, kt As Long Range("A25") = nt Range("A26") = kt ActiveSheet.ChartObjects("6").Activate ActiveChart.SetSourceData Source:=Sheets("Лист1").Range("C" & nt & ":I" & kt) End Sub
АУ!!!!! Hugo, _Boroda_, Саня, Pelena мне нужен ваш совет.
inohodec, а Вам не кажется, что столь фамильярное обращение к незнакомым Вам близко людям не только не поможет решению Вашей проблемы, а наоборот, вызовет отторжение и нежелание чем-то помогать? Ну, за одно и логику объясните: если у Вас диОграмма, то почему тогда диАпозон, а не диОпАзон?
АУ!!!!! Hugo, _Boroda_, Саня, Pelena мне нужен ваш совет.
inohodec, а Вам не кажется, что столь фамильярное обращение к незнакомым Вам близко людям не только не поможет решению Вашей проблемы, а наоборот, вызовет отторжение и нежелание чем-то помогать? Ну, за одно и логику объясните: если у Вас диОграмма, то почему тогда диАпозон, а не диОпАзон?Alex_ST
С уважением, Алексей MS Excel 2003 - the best!!!
Сообщение отредактировал Alex_ST - Четверг, 30.10.2014, 16:03
Да моя грамматика действительно хромает, не любил я гуманитарию и прогуливал в школе уроки литературы и языка. Прошу прощения, я никого не хотел обидеть. А то что обращаюсь к модераторам по их нику, так это просто потому, что я прочитал много их советов и некоторые мне пригодилось в работе за, что им большое спасибо
Да моя грамматика действительно хромает, не любил я гуманитарию и прогуливал в школе уроки литературы и языка. Прошу прощения, я никого не хотел обидеть. А то что обращаюсь к модераторам по их нику, так это просто потому, что я прочитал много их советов и некоторые мне пригодилось в работе за, что им большое спасибо inohodec
Alex_ST, вы меня культуре общения поучить решили и грамматике? А макрос Вам, что не по силе оказался? И не знаете что мне ответить по построению диаграммы? Так бы и написали, что не знаете и не надо было бы этих пантов, делать вид что "обиделся". Не хотите помогать, тогда просто не пишите здесь, не мешайте другим!
Alex_ST, вы меня культуре общения поучить решили и грамматике? А макрос Вам, что не по силе оказался? И не знаете что мне ответить по построению диаграммы? Так бы и написали, что не знаете и не надо было бы этих пантов, делать вид что "обиделся". Не хотите помогать, тогда просто не пишите здесь, не мешайте другим!inohodec
Понимаете, сложно давать ответы, по VBA, тому, кто не понимает, что пишет. Причём мне монопенисуально на ваш русский. Ну, "не любили вы гуманитарию" - но язык программирования, раз начали им пользоваться, учить надо? [vba]
Код
Sub Изменение_диапозона() Dim nt As Long, kt As Long nt = Range("A25") kt = Range("A26") ActiveSheet.ChartObjects("6").Activate ActiveChart.SetSourceData Source:=Sheets("Лист1").Range("C" & nt & ":I" & kt) End Sub
Понимаете, сложно давать ответы, по VBA, тому, кто не понимает, что пишет. Причём мне монопенисуально на ваш русский. Ну, "не любили вы гуманитарию" - но язык программирования, раз начали им пользоваться, учить надо? [vba]
Код
Sub Изменение_диапозона() Dim nt As Long, kt As Long nt = Range("A25") kt = Range("A26") ActiveSheet.ChartObjects("6").Activate ActiveChart.SetSourceData Source:=Sheets("Лист1").Range("C" & nt & ":I" & kt) End Sub
А макрос Вам, что не по силе оказался? И не знаете что мне ответить по построению диаграммы?
inohodec, интересно, с чего Вы взяли, что я тут кому-то что-то обязан делать, если мне это не интересно? Диаграммы я не люблю. Поэтому даже смотреть на Ваш файл не стал. Да даже если бы и захотел, то не смог бы его скачать с работы из-за ограничений системы безопасности. А, не видя файла, пытаться разобрать код в посте с обращениями к диапазонам - занятие практически бессмысленное. И не интересующую меня тему отслеживать, естественно, не стал.
А замечание я Вам сделал за фамильярное обращение к незнакомым людям, которые, к стати, тоже не стали отвечать на Ваш вопрос... Грамматика - это, конечно, Ваше личное дело. Только я, например, с людьми, коверкающими русский язык, на форуме стараюсь не общаться даже в интересующих меня темах, т.к. грязь в изложении мыслей мне просто не приятна. И, похоже, не одному мне. Так что делайте выводы.
А макрос Вам, что не по силе оказался? И не знаете что мне ответить по построению диаграммы?
inohodec, интересно, с чего Вы взяли, что я тут кому-то что-то обязан делать, если мне это не интересно? Диаграммы я не люблю. Поэтому даже смотреть на Ваш файл не стал. Да даже если бы и захотел, то не смог бы его скачать с работы из-за ограничений системы безопасности. А, не видя файла, пытаться разобрать код в посте с обращениями к диапазонам - занятие практически бессмысленное. И не интересующую меня тему отслеживать, естественно, не стал.
А замечание я Вам сделал за фамильярное обращение к незнакомым людям, которые, к стати, тоже не стали отвечать на Ваш вопрос... Грамматика - это, конечно, Ваше личное дело. Только я, например, с людьми, коверкающими русский язык, на форуме стараюсь не общаться даже в интересующих меня темах, т.к. грязь в изложении мыслей мне просто не приятна. И, похоже, не одному мне. Так что делайте выводы.Alex_ST
Alex_ST, я не заставлял и не обязывал Вас или кого либо другого мне помогать! Я попросил совет и помощ! Это дело добровольное, кто захочит тот поможет и объяснит что нужно делать и как. Вы пишите, что не любите диограммы, посмотреть файл не могли и нехотели, и тема вас не заинтересовала. Тогда зачем вы в моей теме пишите??? Гордитесь тем что вы ошибки не делаете! А я делаю!!!! Я учусь на своих ошибкахне и не стыжусь этого. Если вы не хотите общатся с людьми которые могут делать ошибки, то это Ваши проблемы!
Alex_ST, я не заставлял и не обязывал Вас или кого либо другого мне помогать! Я попросил совет и помощ! Это дело добровольное, кто захочит тот поможет и объяснит что нужно делать и как. Вы пишите, что не любите диограммы, посмотреть файл не могли и нехотели, и тема вас не заинтересовала. Тогда зачем вы в моей теме пишите??? Гордитесь тем что вы ошибки не делаете! А я делаю!!!! Я учусь на своих ошибкахне и не стыжусь этого. Если вы не хотите общатся с людьми которые могут делать ошибки, то это Ваши проблемы!inohodec
AndreTM, спасибо за помощь! Учусь экселю , стараюсь Совсем недавно я думал, что в эта программа для того чтоб легче было таблички делать Но жизнь заставила узнать про написания формул, сводные таблици и графики, условное форматирование и макросы. Мне нравится, то что я узнаю про возможности экселя , жаль времени практически нет на самообучение , но потихоньку изучаю.
AndreTM, спасибо за помощь! Учусь экселю , стараюсь Совсем недавно я думал, что в эта программа для того чтоб легче было таблички делать Но жизнь заставила узнать про написания формул, сводные таблици и графики, условное форматирование и макросы. Мне нравится, то что я узнаю про возможности экселя , жаль времени практически нет на самообучение , но потихоньку изучаю.inohodec