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

Вход

Регистрация

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

 

= Мир MS Excel/Убрать лишнюю кавычку в колонтитуле - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Убрать лишнюю кавычку в колонтитуле (Макросы/Sub)
Убрать лишнюю кавычку в колонтитуле
Anton1013 Дата: Четверг, 01.06.2017, 11:34 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 203
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день форумчане!

Подскажите как можно исправить код - сделан чтобы добавлять колонтитул на листе. Сейчас получается: "Финансовая модель проекта Соколки. Нужно что то исправить чтобы не ставилась кавычка перед словом Финансовая. В VBA не сильно разбираюсь, так что писал код на основе шаблонов найденных в интернете, а они не всегда универсальны %)
[vba]
Код
Sub Колонтитул()
Sheets("СВОД").Select
With ActiveSheet.PageSetup
       .CenterHeader = "&""Calibri""&16""&B" & "Финансовая модель проекта " & Sheets("Затраты").Range("c3").Text
End With
Sheets("СВОД").Select
With ActiveSheet.PageSetup
[/vba]


Никогда не поздно научиться!
 
Ответить
СообщениеДобрый день форумчане!

Подскажите как можно исправить код - сделан чтобы добавлять колонтитул на листе. Сейчас получается: "Финансовая модель проекта Соколки. Нужно что то исправить чтобы не ставилась кавычка перед словом Финансовая. В VBA не сильно разбираюсь, так что писал код на основе шаблонов найденных в интернете, а они не всегда универсальны %)
[vba]
Код
Sub Колонтитул()
Sheets("СВОД").Select
With ActiveSheet.PageSetup
       .CenterHeader = "&""Calibri""&16""&B" & "Финансовая модель проекта " & Sheets("Затраты").Range("c3").Text
End With
Sheets("СВОД").Select
With ActiveSheet.PageSetup
[/vba]

Автор - Anton1013
Дата добавления - 01.06.2017 в 11:34
and_evg Дата: Четверг, 01.06.2017, 11:41 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 349
Репутация: 59 ±
Замечаний: 0% ±

Excel 2007
Anton1013, что такое? [vba]
Код
"&""Calibri""&16""&B"
[/vba] может быть так?
[vba]
Код
.CenterHeader ="Финансовая модель проекта " & Sheets("Затраты").Range("c3").Text
[/vba]
 
Ответить
СообщениеAnton1013, что такое? [vba]
Код
"&""Calibri""&16""&B"
[/vba] может быть так?
[vba]
Код
.CenterHeader ="Финансовая модель проекта " & Sheets("Затраты").Range("c3").Text
[/vba]

Автор - and_evg
Дата добавления - 01.06.2017 в 11:41
buchlotnik Дата: Четверг, 01.06.2017, 11:48 | Сообщение № 3
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 928 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
Добрый день.
Думаю нужно так:
[vba]
Код
.CenterHeader = "&""Calibri""&16&B& Финансовая модель проекта" & Sheets("Затраты").Range("c3").Text
[/vba]
Цитата
что такое?
шрифт (&""Calibri""), его размер (&16) и что жирный (&B), а вот после размера в исходнике зачем-то кавычка была вляпана


Сообщение отредактировал buchlotnik - Четверг, 01.06.2017, 12:00
 
Ответить
СообщениеДобрый день.
Думаю нужно так:
[vba]
Код
.CenterHeader = "&""Calibri""&16&B& Финансовая модель проекта" & Sheets("Затраты").Range("c3").Text
[/vba]
Цитата
что такое?
шрифт (&""Calibri""), его размер (&16) и что жирный (&B), а вот после размера в исходнике зачем-то кавычка была вляпана

Автор - buchlotnik
Дата добавления - 01.06.2017 в 11:48
Anton1013 Дата: Четверг, 01.06.2017, 11:58 | Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 203
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
buchlotnik, Спасибо, работает! hands


Никогда не поздно научиться!
 
Ответить
Сообщениеbuchlotnik, Спасибо, работает! hands

Автор - Anton1013
Дата добавления - 01.06.2017 в 11:58
and_evg Дата: Четверг, 01.06.2017, 12:06 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 349
Репутация: 59 ±
Замечаний: 0% ±

Excel 2007
buchlotnik, Добрый день!
Цитата
шрифт (&""Calibri""), его размер (&16) и что жирный (&B)
точно!!


Сообщение отредактировал and_evg - Четверг, 01.06.2017, 12:07
 
Ответить
Сообщениеbuchlotnik, Добрый день!
Цитата
шрифт (&""Calibri""), его размер (&16) и что жирный (&B)
точно!!

Автор - and_evg
Дата добавления - 01.06.2017 в 12:06
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Убрать лишнюю кавычку в колонтитуле (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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