Ga naar hoofdinhoud

Hoe voeg ik een zwevende tabel of tekstvak in een Excel-werkblad in?

Als u een tabel of een tekstvak heeft met enkele belangrijke gegevens die u altijd zichtbaar wilt zijn op het werkblad, ook al scrolt u omhoog of omlaag in het werkblad. Dit kan een interessante taak zijn, in dit artikel zal ik een snelle truc introduceren om het op te lossen.

Voeg een zwevende tabel in Excel in met VBA-code

Voeg een zwevend tekstvak in Excel in met VBA-code


pijl blauw rechts bel Voeg een zwevende tabel in Excel in met VBA-code

Er is geen directe manier om de zwevende tabel in te voegen, dus u moet de tabelgegevens naar een afbeelding converteren en vervolgens een code toepassen om het af te maken, doe dit als volgt:

1. Selecteer de gegevenstabel die u zichtbaar wilt houden en klik op Kopiëren > Kopieer als afbeelding onder de Home tabblad, zie screenshot:

doc insert zwevende tafel 1

2. In de pop-out Afbeelding kopiëren dialoogvenster, selecteer Zoals getoond op het scherm van het het Uiterlijk sectie, en kies beeld onder de Formaat sectie, klik op OK om het dialoogvenster te sluiten en klik vervolgens op een cel om de afbeelding uit te voeren. Druk ten slotte op Ctrl + V zie screenshot om deze afbeelding te plakken:

doc insert zwevende tafel 2

3. Nadat u de tabel naar een afbeelding heeft geconverteerd, klikt u met de rechtermuisknop op de bladtab die de tabelafbeelding bevat die u altijd zichtbaar wilt houden, en kiest u Bekijk code vanuit het contextmenu en in het geopende Microsoft Visual Basic voor applicaties venster, kopieer en plak de volgende code in de lege module:

VBA-code: voeg een zwevende tabel in Excel in:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

Note: In deze code, de Picure1 is de naam van de afbeelding die u heeft gemaakt, verander deze naar uw behoefte.

doc insert zwevende tafel 3

4. Sla vervolgens het codevenster op en sluit het. Wanneer u nu door het werkblad scrolt en op een cel klikt, wordt de tabelafbeelding altijd in de rechterbovenhoek van het werkblad bewaard.


pijl blauw rechts bel Voeg een zwevend tekstvak in Excel in met VBA-code

Om een ​​zwevend tekstvak in te voegen, is hier ook een VBA-code om deze taak op te lossen.

1. Ten eerste moet u een tekstvak invoegen vanuit de Ontwikkelaar tab, klik Ontwikkelaar > Invoegen > Tekstvak (ActiveX-besturingselement), en teken vervolgens het tekstvak en voer de informatie in het tekstvak in zoals je nodig hebt. Zie screenshot:

doc insert zwevende tafel 4

2. Klik vervolgens met de rechtermuisknop op de bladtab die het tekstvak bevat dat u altijd zichtbaar wilt houden, en kies Bekijk code vanuit het contextmenu en in het geopende Microsoft Visual Basic voor toepassingen venster, kopieer en plak de volgende code in de lege ruimte Module:

VBA-code: voeg een zwevend tekstvak in Excel in:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    With ActiveWindow.VisibleRange
        TextBox1.Top = .Top + 5
        TextBox1.Left = .Left + .Width - TextBox1.Width - 45
    End With
    Application.ScreenUpdating = True
End Sub

Note: In deze code, de Tekstvak1 is de tekstvaknaam die u heeft ingevoegd, wijzig deze naar uw behoefte.

doc insert zwevende tafel 5

3. Sla vervolgens het codevenster op en sluit het. Wanneer u het werkblad ergens naartoe scrolt, wordt het ingevoegde tekstvak altijd in de rechterbovenhoek van het werkblad gehouden.


Maximaliseer of minimaliseer het werkbladvenster

Als u het werkbladvenster wilt maximaliseren, kunt u meer ruimte vrijmaken voor gebruikers, in Excel kunt u het werkbladvenster maximaliseren door het lint, de formulebalk of de statusbalk te verbergen. Kutools for Excel's Werkgebied kan u helpen om het lint met slechts één klik te verbergen. Download en gratis proef Kutools voor Excel nu!

Beste Office-productiviteitstools

Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

kte tabblad 201905


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hola, buenos días.

Mi pregunta es cómo mantener siempre visible la imagen flotante aun cuando me desplace en distintas filas o columnas de la hoja.

Saludos y gracias por compartir tus conocimientos.
This comment was minimized by the moderator on the site
The names are the same but for some reason I am still coming across runtime error 424 object required?
This comment was minimized by the moderator on the site
Hi,
Somewhere between steps 2 and 3 on "Insert Floating Table In Excel With VBA Code" I missed how to name the picture I just copy and pasted.

Tom
This comment was minimized by the moderator on the site
Top left corner next to the box you input the formula
This comment was minimized by the moderator on the site
Same has happened to me too, how do you know the name of the picture file?
This comment was minimized by the moderator on the site
Hello, Peter,
To know the name of the picture, you just need to select the picture, and then view the name from the Name Box in the top left corner.
This comment was minimized by the moderator on the site
If I re-size the window, the picture floats too far into the middle. How do I make the picture float to the same margin from the screen no matter what size window I have?
This comment was minimized by the moderator on the site
Thank you-this solved my problem very easily!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations