Как да скрия колони на няколко листа в работна книга?
В Excel можем бързо да скрием колони в един работен лист, но опитвали ли сте някога да скриете колони в няколко листа наведнъж? Обикновено можете да опитате да изберете всички листове и да приложите функцията Скриване, но това няма да работи успешно. В тази статия ще говоря за това как бързо да скриете колони в множество работни листове?
Скриване на колони в множество работни листове в работна книга с VBA код
Скриване на колони в множество работни листове в работна книга с VBA код
Следният код може да ви помогне незабавно да скриете конкретни колони във всички работни листове, моля, направете следното:
1. Задръжте натиснат ALT + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
2. Щракнете Поставете > Модулии поставете следния код в Модули Window.
VBA код: Скриване на колони на няколко листа наведнъж:
Sub Hide_Columns()
'Updateby Extendoffice
Dim iWs As Integer
Dim sCol As String
On Error Resume Next
sCol = Application.InputBox("Input entire column,Eg A:A OR A:B", _
"Kutools for Excel", , , , , , 2)
If sCol = "" Then
MsgBox "Empty columns", vbInformation, "Kutools for Excel"
Exit Sub
End If
For iWs = 1 To ThisWorkbook.Worksheets.Count
ThisWorkbook.Sheets(iWs).Columns(sCol).Hidden = True
Next iWs
On Error GoTo 0
End Sub
3. След това натиснете F5 ключ, за да изпълните този код, и се появява поле за подкана, за да ви напомни да въведете колоните, които искате да скриете във всички работни листове, вижте екранната снимка:
4. И после щракнете върху OK бутон, посочените от вас колони са били скрити във всички работни листове наведнъж.
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!