Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Отображение гистограммы в ячейке с текстом - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Отображение гистограммы в ячейке с текстом
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 12:20 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Добрый день.
Подскажите как произвести заливку гистограммой условного формата - определенную ячейку.

В ячейке D11 - указано текущее число.
В ячейке F11 - указано максимальное для гистограммы число.
Обычная ячейка с условным форматом - приведена по адресу H13. Там гистограмма - занимает четверть от всей ячейки.

Но дело в том, что текст в нужной ячейке H11 - должен быть другой, конкретно "50/200".
Поскольку это текст, то гистограмма его обработать уже не может. Ей нужно непременно, чтобы в ячейку H11 - было вписано именно число.

Подскажите - как отобразить условное форматирование гистограммой в ячейке H11 ?
К сообщению приложен файл: 54744786.xls (28.0 Kb)
 
Ответить
СообщениеДобрый день.
Подскажите как произвести заливку гистограммой условного формата - определенную ячейку.

В ячейке D11 - указано текущее число.
В ячейке F11 - указано максимальное для гистограммы число.
Обычная ячейка с условным форматом - приведена по адресу H13. Там гистограмма - занимает четверть от всей ячейки.

Но дело в том, что текст в нужной ячейке H11 - должен быть другой, конкретно "50/200".
Поскольку это текст, то гистограмма его обработать уже не может. Ей нужно непременно, чтобы в ячейку H11 - было вписано именно число.

Подскажите - как отобразить условное форматирование гистограммой в ячейке H11 ?

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 12:20
bmv98rus Дата: Четверг, 18.04.2019, 13:42 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4147
Репутация: 772 ±
Замечаний: 0% ±

Excel 2013/2016
ОсиповаТатьяна, вы в вопросе своем уже написали ответ, раз в ячейке не число а текст, а гистограмма строится только на значении самой ячейки, то никак желаемое не построить. Максимум это в ячейке( для вашего примера ) иметь 0.25 формат простой дроби (будет выглядеть как 1/4)ну и от 0 до 1 значения приделов в УФ
К сообщению приложен файл: Copy_of_833.xlsx (17.5 Kb)


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
СообщениеОсиповаТатьяна, вы в вопросе своем уже написали ответ, раз в ячейке не число а текст, а гистограмма строится только на значении самой ячейки, то никак желаемое не построить. Максимум это в ячейке( для вашего примера ) иметь 0.25 формат простой дроби (будет выглядеть как 1/4)ну и от 0 до 1 значения приделов в УФ

Автор - bmv98rus
Дата добавления - 18.04.2019 в 13:42
_Boroda_ Дата: Четверг, 18.04.2019, 14:30 | Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 16913
Репутация: 6617 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
В примере Михаила можно поставить формат ячейки
?/200
Тогда вид будет
50/200

А в общем случае нужно знать откуда появляется текст "50/200". Что это такое, почему именно текстом, какие еще могут быть варианты?
К сообщению приложен файл: Copy_of_833_1.xlsx (11.8 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеВ примере Михаила можно поставить формат ячейки
?/200
Тогда вид будет
50/200

А в общем случае нужно знать откуда появляется текст "50/200". Что это такое, почему именно текстом, какие еще могут быть варианты?

Автор - _Boroda_
Дата добавления - 18.04.2019 в 14:30
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 14:58 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
bmv98rus, _Boroda_, все ясно - решение с изменением формата ячейки подходит.
Спасибо за ответы.
 
Ответить
Сообщениеbmv98rus, _Boroda_, все ясно - решение с изменением формата ячейки подходит.
Спасибо за ответы.

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 14:58
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 15:05 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
_Boroda_, подскажите - а как поставить связь между типом формата "?/200" и конкретной ячейкой, где стоит это число 200 ?

То есть - чтобы было так - если в ячейке меняется число, например с 200 на 350 - то и в формате меняется тип - с "?/200" на "?/350".
 
Ответить
Сообщение_Boroda_, подскажите - а как поставить связь между типом формата "?/200" и конкретной ячейкой, где стоит это число 200 ?

То есть - чтобы было так - если в ячейке меняется число, например с 200 на 350 - то и в формате меняется тип - с "?/200" на "?/350".

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 15:05
_Boroda_ Дата: Четверг, 18.04.2019, 15:12 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 16913
Репутация: 6617 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Именно этот вопрос предвидя, я и написал
нужно знать откуда появляется текст "50/200". Что это такое, почему именно текстом, какие еще могут быть варианты?


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеИменно этот вопрос предвидя, я и написал
нужно знать откуда появляется текст "50/200". Что это такое, почему именно текстом, какие еще могут быть варианты?

Автор - _Boroda_
Дата добавления - 18.04.2019 в 15:12
bmv98rus Дата: Четверг, 18.04.2019, 15:22 | Сообщение № 7
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4147
Репутация: 772 ±
Замечаний: 0% ±

Excel 2013/2016
Именно этот вопрос предвидя, я и написал
а я даже не озвучивал возможность, понимая к чему приведет :-)

ОсиповаТатьяна, тут только маленький макрос, который будет менять формат ячейки в зависимости от значений это тайной ячейки. Сложности нет, но тогда совсем можно проще, а именно вводить в саму ячейку ваши 50/200 и на основании этого заменить и значение на вычесленное и 200 использовать в формате.


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщение
Именно этот вопрос предвидя, я и написал
а я даже не озвучивал возможность, понимая к чему приведет :-)

ОсиповаТатьяна, тут только маленький макрос, который будет менять формат ячейки в зависимости от значений это тайной ячейки. Сложности нет, но тогда совсем можно проще, а именно вводить в саму ячейку ваши 50/200 и на основании этого заменить и значение на вычесленное и 200 использовать в формате.

Автор - bmv98rus
Дата добавления - 18.04.2019 в 15:22
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 15:39 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Сложности нет, но тогда совсем можно проще

Ясно, а как это сделать ?
 
Ответить
Сообщение
Сложности нет, но тогда совсем можно проще

Ясно, а как это сделать ?

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 15:39
bmv98rus Дата: Четверг, 18.04.2019, 15:51 | Сообщение № 9
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4147
Репутация: 772 ±
Замечаний: 0% ±

Excel 2013/2016
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$11" Then
Application.EnableEvents = False
    Target.NumberFormat = """" & Target.Value & """"
    Target.Value = Application.Evaluate("=" & Target.Value)
Application.EnableEvents = True
End If
End Sub
[/vba]

вводить 50/200
К сообщению приложен файл: Copy_of_834.xlsm (21.7 Kb)


Замечательный Временно просто медведь , процентов на 20.

Сообщение отредактировал bmv98rus - Четверг, 18.04.2019, 15:56
 
Ответить
Сообщение[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$11" Then
Application.EnableEvents = False
    Target.NumberFormat = """" & Target.Value & """"
    Target.Value = Application.Evaluate("=" & Target.Value)
Application.EnableEvents = True
End If
End Sub
[/vba]

вводить 50/200

Автор - bmv98rus
Дата добавления - 18.04.2019 в 15:51
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 16:17 | Сообщение № 10
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
bmv98rus,
Если я пытаюсь в ячейке H11 прописать ссылку на другие ячейки (
Код
=D11/F11
) - то вылетает ошибка #ЗНАЧ!
Если записать там
Код
=D11&"/"&F11
то получается - формула тут же заменится на значение - и в следующий раз опять надо будет вводить формулу вручную.

Вы пишите, что надо вручную вводить, но вопрос был - как сослаться на другую ячейку, а не вводить эти числа вручную.
 
Ответить
Сообщениеbmv98rus,
Если я пытаюсь в ячейке H11 прописать ссылку на другие ячейки (
Код
=D11/F11
) - то вылетает ошибка #ЗНАЧ!
Если записать там
Код
=D11&"/"&F11
то получается - формула тут же заменится на значение - и в следующий раз опять надо будет вводить формулу вручную.

Вы пишите, что надо вручную вводить, но вопрос был - как сослаться на другую ячейку, а не вводить эти числа вручную.

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 16:17
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 17:17 | Сообщение № 11
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
bmv98rus, как этот макрос заставить работать - со ссылкой на другую ячейку ?
 
Ответить
Сообщениеbmv98rus, как этот макрос заставить работать - со ссылкой на другую ячейку ?

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 17:17
bmv98rus Дата: Четверг, 18.04.2019, 18:50 | Сообщение № 12
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4147
Репутация: 772 ±
Замечаний: 0% ±

Excel 2013/2016
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$D$11" Or Target.Address = "$F$11" Then
        Application.EnableEvents = False
            [h11].NumberFormat = """" & [d11].Text & "/" & [F11].Text & """"
         Application.EnableEvents = True
    End If
End Sub
[/vba]
К сообщению приложен файл: Copy_of_834_1.xlsm (23.5 Kb)


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщение[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$D$11" Or Target.Address = "$F$11" Then
        Application.EnableEvents = False
            [h11].NumberFormat = """" & [d11].Text & "/" & [F11].Text & """"
         Application.EnableEvents = True
    End If
End Sub
[/vba]

Автор - bmv98rus
Дата добавления - 18.04.2019 в 18:50
skais Дата: Четверг, 18.04.2019, 19:10 | Сообщение № 13
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 236
Репутация: 29 ±
Замечаний: 20% ±

Excel 2010
По произведениям bmv98rus

[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Or Target.Column = 6 Then
    Application.EnableEvents = False
        If IsNumeric(Cells(Target.Row, "F")) And Cells(Target.Row, "F") > 0 Then Cells(Target.Row, "H").NumberFormat = "?/" & CStr(Cells(Target.Row, "F"))
    Application.EnableEvents = True
End If
End Sub
[/vba]
К сообщению приложен файл: Copy_of_834-1-.xlsm (21.2 Kb)


Сообщение отредактировал skais - Четверг, 18.04.2019, 19:15
 
Ответить
СообщениеПо произведениям bmv98rus

[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Or Target.Column = 6 Then
    Application.EnableEvents = False
        If IsNumeric(Cells(Target.Row, "F")) And Cells(Target.Row, "F") > 0 Then Cells(Target.Row, "H").NumberFormat = "?/" & CStr(Cells(Target.Row, "F"))
    Application.EnableEvents = True
End If
End Sub
[/vba]

Автор - skais
Дата добавления - 18.04.2019 в 19:10
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 19:41 | Сообщение № 14
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
bmv98rus, skais, спасибо.
Теперь все нормально работает.
 
Ответить
Сообщениеbmv98rus, skais, спасибо.
Теперь все нормально работает.

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 19:41
bmv98rus Дата: Четверг, 18.04.2019, 20:09 | Сообщение № 15
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4147
Репутация: 772 ±
Замечаний: 0% ±

Excel 2013/2016
аллилуйя, только вот теперь тема не соответствует содержанию, ибо в ячеке не текст.


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщениеаллилуйя, только вот теперь тема не соответствует содержанию, ибо в ячеке не текст.

Автор - bmv98rus
Дата добавления - 18.04.2019 в 20:09
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 21:35 | Сообщение № 16
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
bmv98rus, объясните, пожалуйста - почему на одном из листов (с другими макросами) при использовании этого макроса - он выдает результат #/# ?
А на других листах - нормально работает.

В чем может причина этой ошибки ?
 
Ответить
Сообщениеbmv98rus, объясните, пожалуйста - почему на одном из листов (с другими макросами) при использовании этого макроса - он выдает результат #/# ?
А на других листах - нормально работает.

В чем может причина этой ошибки ?

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 21:35
bmv98rus Дата: Четверг, 18.04.2019, 21:44 | Сообщение № 17
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4147
Репутация: 772 ±
Замечаний: 0% ±

Excel 2013/2016
неправильная работа других макросов конечно :-)

Вслепую сказать сложно.


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщениенеправильная работа других макросов конечно :-)

Вслепую сказать сложно.

Автор - bmv98rus
Дата добавления - 18.04.2019 в 21:44
ОсиповаТатьяна Дата: Четверг, 18.04.2019, 22:56 | Сообщение № 18
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
bmv98rus, ясно.
Ну ладно.
Все равно спасибо за ответы.
 
Ответить
Сообщениеbmv98rus, ясно.
Ну ладно.
Все равно спасибо за ответы.

Автор - ОсиповаТатьяна
Дата добавления - 18.04.2019 в 22:56
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!