Как сделать чтобы я мог отметить галочками необходимые строки из списка(например выбрать вид работы)и выбранные строки переносились в список на другой лист?
Как сделать чтобы я мог отметить галочками необходимые строки из списка(например выбрать вид работы)и выбранные строки переносились в список на другой лист?omsk29091988
omsk29091988, Их можно копировать протягом вниз, с одним НО. Адреса линков для каждого чекбокса нужно менять ВРУЧНУЮ. Или надо писать макрос, который сделает это автоматически.
Поискав, нашел в интернете этот код:
[vba]
Код
Sub LinkCheckBoxes() Dim chk As CheckBox Dim lCol As Long lCol = 0 'number of columns to the right for link For Each chk In ActiveSheet.CheckBoxes With chk .LinkedCell = _ .TopLeftCell.Offset(0, lCol).Address 'Начинает замену адресов с ячейки А1, нужно подправить так, чтобы замена начиналась с ячейки А2 End With Next chk End Sub
[/vba] В макросах не силен, поэтому попросите кого-нибудь из форумчан, чтобы помогли его подправить под ваши нужды.
omsk29091988, Их можно копировать протягом вниз, с одним НО. Адреса линков для каждого чекбокса нужно менять ВРУЧНУЮ. Или надо писать макрос, который сделает это автоматически.
Поискав, нашел в интернете этот код:
[vba]
Код
Sub LinkCheckBoxes() Dim chk As CheckBox Dim lCol As Long lCol = 0 'number of columns to the right for link For Each chk In ActiveSheet.CheckBoxes With chk .LinkedCell = _ .TopLeftCell.Offset(0, lCol).Address 'Начинает замену адресов с ячейки А1, нужно подправить так, чтобы замена начиналась с ячейки А2 End With Next chk End Sub
[/vba] В макросах не силен, поэтому попросите кого-нибудь из форумчан, чтобы помогли его подправить под ваши нужды.Egyptian