как работает temp? / Microsoft Office

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / как работает temp?

10 сообщений из 10, страница 1 из 1

как работает temp?

#36905074

Shpr0TinG

Гость

Подскажите пожауйста как в этом макросе работает temp?

Sub Шаг5()
Dim i As Long, x As Range, temp: temp = [A2]: Application.ScreenUpdating = False
For i = 3 To Cells(Rows.Count, 1).End(xlUp).Row
If Cells(i, 1) <> "" Then If Cells(i, 1) = temp Then Cells(i, 1).ClearContents Else temp = Cells(i, 1)
Next
End Sub

...

Рейтинг:

0 / 0

18.10.2010, 13:57

| Ответить | Цитировать | Написать

как работает temp?

#36905096

fortik

Участник

Сообщения: 178

Рейтинг: 0 / 0

используется для удаления повторяющихся значений
сравниваем temp с другими непустыми ячейками.

...

Рейтинг:

0 / 0

18.10.2010, 14:05

| Ответить | Цитировать | Написать

как работает temp?

#36905098

fortik

Участник

Сообщения: 178

Рейтинг: 0 / 0

в окне locals всегда можно посмотреть значение temp

...

Рейтинг:

0 / 0

18.10.2010, 14:06

| Ответить | Цитировать | Написать

как работает temp?

#36905151

Shpr0TinG

Гость

fortik, ок, еще вопрос, мне непонятно вот это что делает:

temp: temp = [A2]: Application.ScreenUpdating = False

и вот это что делает:

For i = 3 To Cells(Rows.Count, 1).End(xlUp).Row - в частности это

...

Рейтинг:

0 / 0

18.10.2010, 14:22

| Ответить | Цитировать | Написать

как работает temp?

#36905161

ПЕНСИОНЕРКА

Участник

Откуда: Владимирская обл

Сообщения: 4 809

Рейтинг: 0 / 0

Shpr0TinG,

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.

Sub step5()
Dim i As Long, x As Range, temp
temp = Cells( 1 ,  2 )
Application.ScreenUpdating = False
'поиск повторов по столбцу 1 начиная со строки 3
For i =  3  To Cells(Rows.Count,  1 ).End(xlUp).Row
If Cells(i,  1 ) <> "" Then
If Cells(i,  1 ) = temp Then
Cells(i,  1 ).ClearContents
Else
temp = Cells(i,  1 )
End If
End If
Next
End Sub

...

Рейтинг:

0 / 0

18.10.2010, 14:24

| Ответить | Цитировать | Написать

как работает temp?

#36905180

fortik

Участник

Сообщения: 178

Рейтинг: 0 / 0

temp=[a2] - значение ячейки [a2]
application.screenupdating = false - отключает обновление экрана, макрос работает быстрее
Cells(Rows.Count, 1).End(xlUp).Row - номер последней использованной строчки

...

Рейтинг:

0 / 0

18.10.2010, 14:28

| Ответить | Цитировать | Написать

как работает temp?

#36905187

PlanB

Участник

Откуда: Moscow

Сообщения: 2 731

Рейтинг: 0 / 0

Shpr0TinGfortik, ок, еще вопрос, мне непонятно вот это что делает:

temp: temp = [A2]: Application.ScreenUpdating = False

и вот это что делает:

For i = 3 To Cells(Rows.Count, 1).End(xlUp).Row - в частности этоцикл от тройки до номера последней строки первого столбца

можно написать через lastcell, если не ошибаюсь. на форуме много примеров вычисления послндней строки массива

...

Рейтинг:

0 / 0

18.10.2010, 14:30

| Ответить | Цитировать | Написать

как работает temp?

#36905205

PlanB

Участник

Откуда: Moscow

Сообщения: 2 731

Рейтинг: 0 / 0

на 1 вопрос:
думается, эта запись аналогична temp="$A$2"
т.е. переменной temp присваивается значение ячейки A2

скорее, temp сужит для удаления из массива значений ячейки A2, а не просто повторяющихся...
ps не вижу смысла устраивать переборку циклом, когда можно это сделать встроенными функциями excel.

...

Рейтинг:

0 / 0

18.10.2010, 14:34

| Ответить | Цитировать | Написать

как работает temp?

#36905210

PlanB

Участник

Откуда: Moscow

Сообщения: 2 731

Рейтинг: 0 / 0

извиняюсь, про temp - чушь написал в предыдущем посте: код до конца не дочитал.

...

Рейтинг:

0 / 0

18.10.2010, 14:35

| Ответить | Цитировать | Написать

как работает temp?

#36905308

Shpr0TinG

Гость

ок, спасибо всем, очень помогли.

...

Рейтинг:

0 / 0

18.10.2010, 15:01

| Ответить | Цитировать | Написать

10 сообщений из 10, страница 1 из 1

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / как работает temp?

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=61&msg=36905161&tid=2177563]:	0ms
get settings:	10ms
get forum list:	16ms
check forum access:	3ms
check topic access:	3ms
track hit:	156ms
get topic data:	10ms
get forum data:	3ms
get page messages:	54ms
get tp. blocked users:	1ms
others:	247ms

total:	503ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы