Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Удаление данных в столбце по выбору номера столбца
 
#1
01.03.2015 11:03:02
Помогите пожалуйста. При выборе номера столбца удаляются  данные этого столбца.
Файл прилагается
 
 
 
#2
01.03.2015 11:54:06
Вот это удаляет целиком столбец:
Код
Private Sub CommandButton2_Click()
'удаляет столбец по нажатию на кнопку "Удалить"
Dim cell As Range
Set cell = Rows(6).Find(ComboBox2.Text)
If Not cell Is Nothing Then cell.EntireColumn.Delete
End Sub
С уважением,
Федор/Все_просто
 
 
 
#3
01.03.2015 12:12:42
Все_просто Надо чтобы данные в определённом диапазоне удалял. Как в форме.
 
 
 
#4
01.03.2015 23:17:32
Код
Private Sub CommandButton2_Click()
Dim I As Integer
For I = 8 To 16 Step 2
    Sheets("Лист1").Cells(I, Val(Me.ComboBox2.Text)).Clear
Next
End Sub

Цитата
ХАВ62, Надо чтобы по выбору столбца удалялись только данные в этом столбце минуя формулы.

В какой-то из Ваших предыдущих тем по этому примеру уже спрашивали - Зачем там вообще формулы раз макросы применяете? Считайте все в коде и выгружайте готовые данные на лист.

 
Изменено: Sanja - 01.03.2015 23:25:10
Согласие есть продукт при полном непротивлении сторон
 
 
 
#5
02.03.2015 07:21:43
Минуя формулы ▼
Код
Private Sub CommandButton2_Click()
    On Error Resume Next
    Range(Cells(8, Val(Me.ComboBox2.Text)), Cells(17, Val(Me.ComboBox2.Text))).SpecialCells(xlCellTypeConstants, 23).ClearContents
End Sub
Всё сложное - не нужно. Всё нужное - просто /М. Т. Калашников/
 
 
 
#6
02.03.2015 17:12:18
ВСЕМ СПАСИБО !!!
 
 
 
Страницы: 1
Наверх