Вопрос : скопируйте клетки динамический, в первенствуйте

Hey

I имеет таблицу с инициалами в рядках и weeknumbers в culumn. Около я имею список с некоторым из инициалов и специфически weeknumber - от этого списка я хочу скопировать содержание к точно положениям в таблице путем нажимать кнопку. Моей догадкой, то vba было бы solution.

I имеет судимое, котор нужно объяснить в прикрепленное первенствует file.

Excel 2007 для windows.

Help -)

Cheers, Raahaugen
class= " lastRow
>Attachments " имени " class= class= " значение "
>

class= " fileInfo "
title= " " filename class= " Mappe2.xlsm (11 KB)  яваскрипт " href= " " attachmentDetails class= (тип архива детали)  
class= " описание "
мое problem
class=
>
class=

Ответ : скопируйте клетки динамический, в первенствуйте

Raahaugen,

Макрос ниже находится в прикрепленном архиве. Препятствуйте мне знать если он делает, то вы хотите.

Патрик
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
Sub specialmacro ()
Тусклое rng1 как ряд
Тусклое rng2 как ряд
Тусклое celle1 как ряд
Тусклое celle2 как ряд
Тусклый colm как длиной

С листами («Sheet1»)
    Установите rng1 = ряд (. Клетки (12, «q»). Клетки (. Rows.Count, «q»). Конец (xlUp))
    Установите rng2 = ряд (. Клетки (12, «c»). Клетки (27, «c»))
Конец с

Для каждого celle1 в rng1
    Для каждого celle2 в rng2
        Если celle1 = celle2 после этого
            colm = клетки (11, «v»). Значение
            celle2.Offset (0, colm) = celle1.Offset (0, 1)
        Закончитесь если
    Следующее celle2
Следующее celle1

Подводная лодка конца
Другие решения  
  •  Как я добавляю кнопки на форме PDF для того чтобы добавить/извлекаю рядки данных?
  •  Шнур ошибки в блоке задвижки?
  •  сколько вариант сервера SQL на одной машине
  •  Внешний вид 2007 не может архивный файл открытой сети сохраненный
  •  Активно директория DNS записывает вопрос
  •  Отчет о доступа 2010 экспорта к CSV с коллекторами?
  •  Прокладчик OCE 9400 не начинает
  •  как добавить десятичное место в формуле в отчете о кристалла seagate
  •  Windows XP и Мичрософт Оутлоок и проблемы установителя Windows
  •  VB6 к VS2010 - консультации тренировки?
  •  
    programming4us programming4us