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

Вход

Регистрация

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

 

= Мир MS Excel/Ширина столбцов, после команды:форматировать как таблицу - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Ширина столбцов, после команды:форматировать как таблицу (Макросы/Sub)
Ширина столбцов, после команды:форматировать как таблицу
Mark1976 Дата: Воскресенье, 21.02.2016, 16:28 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Всем привет. Может кто знает, почему после команды: форматировать как таблицу, ширина столбцов меняется. Мне это не надо, т.к. первоначальная ширина меня устраивает. Файл форматирую каждый понедельник, и данная проблемка напрягает? Может есть решение, чтобы при форматировании ширина не менялась. Заранее спасибо. 1-файл до форматирования, 2-й после.
К сообщению приложен файл: lp2016-02-21-1_.xlsx(9Kb) · 9103002.xlsx(12Kb)
 
Ответить
СообщениеВсем привет. Может кто знает, почему после команды: форматировать как таблицу, ширина столбцов меняется. Мне это не надо, т.к. первоначальная ширина меня устраивает. Файл форматирую каждый понедельник, и данная проблемка напрягает? Может есть решение, чтобы при форматировании ширина не менялась. Заранее спасибо. 1-файл до форматирования, 2-й после.

Автор - Mark1976
Дата добавления - 21.02.2016 в 16:28
Mark1976 Дата: Воскресенье, 21.02.2016, 16:30 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Не в той ветке тему создал. Админ можешь перенести?
 
Ответить
СообщениеНе в той ветке тему создал. Админ можешь перенести?

Автор - Mark1976
Дата добавления - 21.02.2016 в 16:30
StoTisteg Дата: Воскресенье, 21.02.2016, 16:40 | Сообщение № 3
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
Потому что добавляются стрелки для сортировки. Ваш Капитан Очевидность :)


Проверь всё. ThisWorkbook.Save. On Error Resume Next.
 
Ответить
СообщениеПотому что добавляются стрелки для сортировки. Ваш Капитан Очевидность :)

Автор - StoTisteg
Дата добавления - 21.02.2016 в 16:40
Mark1976 Дата: Воскресенье, 21.02.2016, 16:48 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Как мне решить проблему?
 
Ответить
СообщениеКак мне решить проблему?

Автор - Mark1976
Дата добавления - 21.02.2016 в 16:48
StoTisteg Дата: Воскресенье, 21.02.2016, 16:49 | Сообщение № 5
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
Но это, разумеется шутка. А всерьёз — при переносе по словам сей метод почему-то сам решает, по никому не ведомым признакам, какая ширина столбцов Вам больше подойдёт.
Цитата
Как мне решить проблему?

Можно макросом сохранять прежнюю ширину, раз уж Вы тут оказались :) Писать?


Проверь всё. ThisWorkbook.Save. On Error Resume Next.

Сообщение отредактировал StoTisteg - Воскресенье, 21.02.2016, 16:51
 
Ответить
СообщениеНо это, разумеется шутка. А всерьёз — при переносе по словам сей метод почему-то сам решает, по никому не ведомым признакам, какая ширина столбцов Вам больше подойдёт.
Цитата
Как мне решить проблему?

Можно макросом сохранять прежнюю ширину, раз уж Вы тут оказались :) Писать?

Автор - StoTisteg
Дата добавления - 21.02.2016 в 16:49
Mark1976 Дата: Воскресенье, 21.02.2016, 16:55 | Сообщение № 6
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
StoTisteg, если не сложно. Я каждый раз мучаюсь.
 
Ответить
СообщениеStoTisteg, если не сложно. Я каждый раз мучаюсь.

Автор - Mark1976
Дата добавления - 21.02.2016 в 16:55
StoTisteg Дата: Воскресенье, 21.02.2016, 17:02 | Сообщение № 7
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
Не сложно, сейчас сделаю.


Проверь всё. ThisWorkbook.Save. On Error Resume Next.
 
Ответить
СообщениеНе сложно, сейчас сделаю.

Автор - StoTisteg
Дата добавления - 21.02.2016 в 17:02
Mark1976 Дата: Воскресенье, 21.02.2016, 19:12 | Сообщение № 8
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
StoTisteg, не получилось?
 
Ответить
СообщениеStoTisteg, не получилось?

Автор - Mark1976
Дата добавления - 21.02.2016 в 19:12
StoTisteg Дата: Воскресенье, 21.02.2016, 19:15 | Сообщение № 9
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
Готово. Запускается при открытии, выбирать можно любое число файлов, не смущаясь, если попадутся не-экселевские или уже обработанные. Обрабатывает все листы книги, гарантированно корректно работает только с таблицами, начинающимися с ячейки A1.
К сообщению приложен файл: TableFormat.xlsm(19Kb)


Проверь всё. ThisWorkbook.Save. On Error Resume Next.
 
Ответить
СообщениеГотово. Запускается при открытии, выбирать можно любое число файлов, не смущаясь, если попадутся не-экселевские или уже обработанные. Обрабатывает все листы книги, гарантированно корректно работает только с таблицами, начинающимися с ячейки A1.

Автор - StoTisteg
Дата добавления - 21.02.2016 в 19:15
StoTisteg Дата: Воскресенье, 21.02.2016, 19:16 | Сообщение № 10
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
StoTisteg, не получилось?

Получилось, просто отходил от компа.


Проверь всё. ThisWorkbook.Save. On Error Resume Next.
 
Ответить
Сообщение
StoTisteg, не получилось?

Получилось, просто отходил от компа.

Автор - StoTisteg
Дата добавления - 21.02.2016 в 19:16
Mark1976 Дата: Воскресенье, 21.02.2016, 20:04 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
StoTisteg, ок. Спасибо. Как поужинаем буду пробовать. Отпишу. Ещё раз спасибо.
 
Ответить
СообщениеStoTisteg, ок. Спасибо. Как поужинаем буду пробовать. Отпишу. Ещё раз спасибо.

Автор - Mark1976
Дата добавления - 21.02.2016 в 20:04
Mark1976 Дата: Воскресенье, 21.02.2016, 20:53 | Сообщение № 12
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Mark1976, не пойму как это работает?
 
Ответить
СообщениеMark1976, не пойму как это работает?

Автор - Mark1976
Дата добавления - 21.02.2016 в 20:53
StoTisteg Дата: Воскресенье, 21.02.2016, 21:29 | Сообщение № 13
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
Mark1976, в смысле — как? При запуске говорит "Выберите файлы", потом открывает окно для их выбора, обрабатывает и закрывает.


Проверь всё. ThisWorkbook.Save. On Error Resume Next.
 
Ответить
СообщениеMark1976, в смысле — как? При запуске говорит "Выберите файлы", потом открывает окно для их выбора, обрабатывает и закрывает.

Автор - StoTisteg
Дата добавления - 21.02.2016 в 21:29
StoTisteg Дата: Воскресенье, 21.02.2016, 21:37 | Сообщение № 14
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
Или Вы хотите, чтобы макрос Вам отчёт о проделанной им работе написал? Это можно, если он Вам зачем-нибудь нужен.


Проверь всё. ThisWorkbook.Save. On Error Resume Next.
 
Ответить
СообщениеИли Вы хотите, чтобы макрос Вам отчёт о проделанной им работе написал? Это можно, если он Вам зачем-нибудь нужен.

Автор - StoTisteg
Дата добавления - 21.02.2016 в 21:37
Mark1976 Дата: Воскресенье, 21.02.2016, 21:42 | Сообщение № 15
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Я открываю, выбираю, ничего не меняется. Файл как был так отформатирован так и остался. По какому шаблону макрос делает форматирование?
 
Ответить
СообщениеЯ открываю, выбираю, ничего не меняется. Файл как был так отформатирован так и остался. По какому шаблону макрос делает форматирование?

Автор - Mark1976
Дата добавления - 21.02.2016 в 21:42
Mark1976 Дата: Воскресенье, 21.02.2016, 21:42 | Сообщение № 16
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Ширина то не меняется. Вот я о чем.
 
Ответить
СообщениеШирина то не меняется. Вот я о чем.

Автор - Mark1976
Дата добавления - 21.02.2016 в 21:42
Mark1976 Дата: Воскресенье, 21.02.2016, 21:55 | Сообщение № 17
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
StoTisteg, сорь. Все работает. Разобрался. Спасибо огромное !!!!!!!!!!
 
Ответить
СообщениеStoTisteg, сорь. Все работает. Разобрался. Спасибо огромное !!!!!!!!!!

Автор - Mark1976
Дата добавления - 21.02.2016 в 21:55
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Ширина столбцов, после команды:форматировать как таблицу (Макросы/Sub)
Страница 1 из 11
Поиск:

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