Kako se rezalnik vrtilne tabele premika s premikanjem delovnega lista v Excelu?
Med delom s pivot tabelo lahko vstavite rezalnike za vizualno filtriranje podatkov v tabeli. Ta članek govori o tem, da je rezalnik vrtilne tabele med drsenjem delovnega lista vedno viden.
Rezalnik vrtilne tabele naj se premika s pomikanjem delovnega lista s kodo VBA
Rezalnik vrtilne tabele naj se premika s pomikanjem delovnega lista s kodo VBA
Naslednji skript VBA vam lahko pomaga, da se rezalnik vrtilne tabele premika z delovnim listom. Naredite naslednje.
1. Pritisnite druga + F11 tipke hkrati, da odprete Microsoft Visual Basic za aplikacije okno.
2. V Ljubljani Microsoft Visual Basic za aplikacije okno, dvokliknite Ta delovni zvezek v levo podokno Project, nato pa kopirajte in prilepite spodnjo kodo VBA v ThisWorkbook (koda) okno. Oglejte si posnetek zaslona:
Koda VBA: Rezalnik vrtilne tabele naj se premika z drsenjem delovnega lista
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Dim ShF As Shape
Dim ShM As Shape
'specify a slicer
Application.ScreenUpdating = False
Set ShF = ActiveSheet.Shapes("Column1")
Set ShM = ActiveSheet.Shapes("Column2")
'change position of the slicer
With Windows(1).VisibleRange.Cells(1, 1)
ShF.Top = .Top
ShF.Left = .Left + 300
ShM.Top = .Top
ShM.Left = .Left + 100
End With
Application.ScreenUpdating = True
End SubOpombe:
1). V kodi sta stolpca1 in stolpec2 ime rezalnikov.
2). Med listanjem delovnega lista v kodi lahko določite položaj rezalnikov.
3). In lahko v kodo dodate več rezalnikov ali pa po potrebi odstranite rezalnike iz nje.
3. Pritisnite druga + Q tipke za zapiranje Microsoft Visual Basic za aplikacije okno pogovorno okno.
Od zdaj naprej se bodo določeni rezalniki med pomikanjem po delovnem listu premikali z aktivno celico. Oglejte si posnetek zaslona:
Sorodni članki:
- Kako ohraniti razširljivost tabele z vstavljanjem vrstice tabele v zaščiteni delovni list v Excelu?
- Kako združiti celice in obdržati oblikovanje celic v Excelu?
- Kako odstraniti dvojnike, vendar obdržati prvi primerek v Excelu?
Najboljša orodja za pisarniško produktivnost
Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%
- Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
- Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
- Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
- Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
- Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
- Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
- Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
- Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
- Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
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!
