Kako izbrati stolpec na podlagi glave stolpca v Excelu?
Recimo, da imate velik delovni list, ki vsebuje več stolpcev, zdaj pa bi radi izbrali določen stolpec na podlagi imena glave stolpca. Če želite, da bo stolpec za stolpcem na velikem delovnem listu izgubil veliko časa, bom v tem članku predstavil hiter način za reševanje tega dela v Excelu.
Izberite stolpec na podlagi imena glave stolpca s kodo VBA
Izberite stolpec na podlagi imena glave stolpca s kodo VBA
Naslednja koda VBA vam lahko pomaga pri izbiri stolpcev na podlagi določenega imena glave, naredite tako:
1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.
Koda VBA: Izberite stolpec glede na ime glave stolpca:
Sub FindAddressColumn()
'Updateby Extendoffcie
Dim xRg As Range
Dim xRgUni As Range
Dim xFirstAddress As String
Dim xStr As String
On Error Resume Next
xStr = "Name"
Set xRg = Range("A1:P1").Find(xStr, , xlValues, xlWhole, , , True)
If Not xRg Is Nothing Then
xFirstAddress = xRg.Address
Do
Set xRg = Range("A1:P1").FindNext(xRg)
If xRgUni Is Nothing Then
Set xRgUni = xRg
Else
Set xRgUni = Application.Union(xRgUni, xRg)
End If
Loop While (Not xRg Is Nothing) And (xRg.Address <> xFirstAddress)
End If
xRgUni.EntireColumn.Select
End Sub
Opombe: V zgornji kodi, A1: P1 je obseg glav, iz katerih želite izbrati stolpce, in "Ime«V scenariju xStr = "Ime" je ime glave, na podlagi katerega želite izbrati stolpce. Prosimo, spremenite jih glede na vaše potrebe.
3. Po kopiranju in lepljenju kode pritisnite F5 ključ za zagon te kode in vsi stolpci z določenim imenom glave so bili izbrani hkrati, glejte posnetek zaslona:
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
