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

Вход

Регистрация

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

 

= Мир MS Excel/как вставить формулу в последний пуст столбец идущий за не п - Страница 3 - Мир MS Excel

Старая форма входа
  • Страница 3 из 3
  • «
  • 1
  • 2
  • 3
Модератор форума: китин, _Boroda_  
как вставить формулу в последний пуст столбец идущий за не п
Pasha Дата: Четверг, 13.12.2012, 10:14 | Сообщение № 41
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Товарищи, помогите решить задачу((((
 
Ответить
СообщениеТоварищи, помогите решить задачу((((

Автор - Pasha
Дата добавления - 13.12.2012 в 10:14
KuklP Дата: Четверг, 13.12.2012, 10:20 | Сообщение № 42
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
Замените:
ThisWorkbook.Path & "\Книга 2.xlsx"
на полный путь к Вашему файлу.


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеЗамените:
ThisWorkbook.Path & "\Книга 2.xlsx"
на полный путь к Вашему файлу.

Автор - KuklP
Дата добавления - 13.12.2012 в 10:20
Pasha Дата: Четверг, 13.12.2012, 13:57 | Сообщение № 43
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

а что по поводу вставки начиная не с "C4" а с "B4" ? Есть варианты?

Понять хочется, что на что ссылается для того что бы правильно вставлялись данные. и в последующем их можно было самому менять.
 
Ответить
Сообщениеа что по поводу вставки начиная не с "C4" а с "B4" ? Есть варианты?

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

Автор - Pasha
Дата добавления - 13.12.2012 в 13:57
KuklP Дата: Четверг, 13.12.2012, 14:01 | Сообщение № 44
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
А что, так тяжело в коде Андрея заменить "C4" на "B4"? Хотя бы попробовать.


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеА что, так тяжело в коде Андрея заменить "C4" на "B4"? Хотя бы попробовать.

Автор - KuklP
Дата добавления - 13.12.2012 в 14:01
Pasha Дата: Четверг, 13.12.2012, 14:16 | Сообщение № 45
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Пробовал, но вылезает Дэбаг(
К сообщению приложен файл: 7711654.jpg (10.9 Kb)
 
Ответить
СообщениеПробовал, но вылезает Дэбаг(

Автор - Pasha
Дата добавления - 13.12.2012 в 14:16
Serge_007 Дата: Четверг, 13.12.2012, 14:23 | Сообщение № 46
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (Pasha)
Пробовал

А что Вы пробовали нам догадаться надо?
Или Вы считаете что по Вашему скрину понятно что и как Вы в коде поменяли?


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (Pasha)
Пробовал

А что Вы пробовали нам догадаться надо?
Или Вы считаете что по Вашему скрину понятно что и как Вы в коде поменяли?

Автор - Serge_007
Дата добавления - 13.12.2012 в 14:23
Pasha Дата: Четверг, 13.12.2012, 14:28 | Сообщение № 47
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Мне кажется Вы через чур грубы. Люди обращаются к Вам за помощью, а не для получения грубого ответа.
вы задали вопрос - поменять "С" на "Б" - пробовал. менял.

[vba]
Code
    Application.ScreenUpdating = False
     With Workbooks.Open("C:\Documents and Settings\...\Рабочий стол\Рабочий стол_TEST\Книга 2.xlsx")
         .Sheets(1).Range("B4").End(xlToRight).Offset(, 1).Resize(72, 6).Value = _
         ThisWorkbook.Sheets(1).Range("C4").Resize(72, 6).Value
         .Close True
     End With
     Application.ScreenUpdating = True
[/vba]
 
Ответить
СообщениеМне кажется Вы через чур грубы. Люди обращаются к Вам за помощью, а не для получения грубого ответа.
вы задали вопрос - поменять "С" на "Б" - пробовал. менял.

[vba]
Code
    Application.ScreenUpdating = False
     With Workbooks.Open("C:\Documents and Settings\...\Рабочий стол\Рабочий стол_TEST\Книга 2.xlsx")
         .Sheets(1).Range("B4").End(xlToRight).Offset(, 1).Resize(72, 6).Value = _
         ThisWorkbook.Sheets(1).Range("C4").Resize(72, 6).Value
         .Close True
     End With
     Application.ScreenUpdating = True
[/vba]

Автор - Pasha
Дата добавления - 13.12.2012 в 14:28
KuklP Дата: Четверг, 13.12.2012, 14:44 | Сообщение № 48
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
Pasha, не горячитесь. Никто Вам не грубит. А картинки выкладывать на форуме по Эксель и правда некошерно. Я в Ваш файл не заглядывал, пока некогда. Но то, что Вы выкладываете архив с паролем, потом картинку - к чему это? Усложняете нам жизнь?
P.S.
Quote (Pasha)
RAN, подскажи пожалуйста
Вы с Андреем старые друзья?
ИМХО ТЫкать ему грубо с Вашей стороны. Еще "через чур" пишется правильно - "чересчур". Не суетитесь, освобожусь - посмотрю. Или кто другой подключится.


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеPasha, не горячитесь. Никто Вам не грубит. А картинки выкладывать на форуме по Эксель и правда некошерно. Я в Ваш файл не заглядывал, пока некогда. Но то, что Вы выкладываете архив с паролем, потом картинку - к чему это? Усложняете нам жизнь?
P.S.
Quote (Pasha)
RAN, подскажи пожалуйста
Вы с Андреем старые друзья?
ИМХО ТЫкать ему грубо с Вашей стороны. Еще "через чур" пишется правильно - "чересчур". Не суетитесь, освобожусь - посмотрю. Или кто другой подключится.

Автор - KuklP
Дата добавления - 13.12.2012 в 14:44
Serge_007 Дата: Четверг, 13.12.2012, 14:49 | Сообщение № 49
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (Pasha)
Мне кажется Вы через чур грубы. Люди обращаются к Вам за помощью

Слово "кажется" подразумевает под собой сомнение в выражении. И Вы правы, Вам именно кажется

А вот я вижу что:
а. Вы запостили свой вопрос в чужую тему
б. Выложили файл с паролем
в. Стали обращаться на форуме к конкретному человеку (RAN)
г. Перешли на ты с незнакомым человеком (RAN)
д. Ушли из темы почти на месяц даже не сказав спасибо
е. Так же отнеслись и к помогшему Вам KuklP
ж. Выложили идиотскую картинку
Очевидно что не читали правил и хотели класть на всех и вся
И не помощь Вам нужна, а халява

Так вот, ХАЛЯВЫ НЕ БУДЕТ!

Всё, тема закрыта


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (Pasha)
Мне кажется Вы через чур грубы. Люди обращаются к Вам за помощью

Слово "кажется" подразумевает под собой сомнение в выражении. И Вы правы, Вам именно кажется

А вот я вижу что:
а. Вы запостили свой вопрос в чужую тему
б. Выложили файл с паролем
в. Стали обращаться на форуме к конкретному человеку (RAN)
г. Перешли на ты с незнакомым человеком (RAN)
д. Ушли из темы почти на месяц даже не сказав спасибо
е. Так же отнеслись и к помогшему Вам KuklP
ж. Выложили идиотскую картинку
Очевидно что не читали правил и хотели класть на всех и вся
И не помощь Вам нужна, а халява

Так вот, ХАЛЯВЫ НЕ БУДЕТ!

Всё, тема закрыта

Автор - Serge_007
Дата добавления - 13.12.2012 в 14:49
  • Страница 3 из 3
  • «
  • 1
  • 2
  • 3
Поиск:

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