Note: The other languages of the website are Google-translated. Back to English

Hogyan lehet úszó táblázatot vagy szövegdobozt beszúrni az Excel munkalapba?

Ha van táblája vagy szövegdoboza néhány fontos adattal, amelyet mindig a munkalap képernyőn szeretne látni, annak ellenére, hogy felfelé vagy lefelé görget a munkalapon. Ez érdekes feladat lehet, ez a cikk, bemutatok egy gyors trükköt annak megoldására.

Helyezzen be úszó táblázatot az Excelbe VBA kóddal

Helyezzen be úszó szövegdobozt az Excelbe VBA kóddal


nyíl kék jobb buborék Helyezzen be úszó táblázatot az Excelbe VBA kóddal

Nincs közvetlen módja az úszó tábla behelyezésének, ezért a tábla adatait képpé kell konvertálni, majd a befejezéséhez kódot kell alkalmaznia, kérjük, tegye a következőket:

1. Jelölje ki azt az adattáblát, amelyet láthatóan szeretne tartani, majd kattintson a gombra másolat > Másolás képként alatt a FŐOLDAL fül, lásd a képernyőképet:

doc beszúrja az úszóasztalt 1

2. A kiugrott Kép másolása párbeszédpanelen válassza ki A képernyőn látható módon tól megjelenés rész, és válassza Kép alatt a kialakított szakasz, kattintson OK a párbeszédpanel bezárásához, majd a kép megjelenítéséhez kattintson egy cellára, végül nyomja meg a gombot Ctrl + V a kép beillesztéséhez lásd a képernyőképet:

doc beszúrja az úszóasztalt 2

3. Miután átalakította a táblázatot képpé, kattintson a jobb gombbal a lapfülre, amely tartalmazza azt a táblázatos képet, amelyet mindig látni szeretne, és válassza Kód megtekintése a helyi menüből és a megnyitottból Microsoft Visual Basic alkalmazásokhoz ablakba másolja és illessze be a következő kódot az üres modulba:

VBA kód: Az úszó tábla beillesztése az Excelbe:

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

Megjegyzések: Ebben a kódban az Kép1 az Ön által létrehozott képnév, kérjük, változtassa meg igénye szerint.

doc beszúrja az úszóasztalt 3

4. Ezután mentse el és zárja be a kódablakot. Most, amikor görgeti a munkalapot és rákattint egy cellára, a táblázat képe mindig a munkalap jobb felső sarkában marad.


nyíl kék jobb buborék Helyezzen be úszó szövegdobozt az Excelbe VBA kóddal

Lebegő szövegdoboz beszúrásához itt van egy VBA-kód is a feladat megoldására.

1. Először be kell illesztenie egy szövegdobozt a Fejlesztő fülre kattintva Fejlesztő > betétlap > Szövegdoboz (ActiveX-vezérlő), majd rajzolja meg a szövegdobozt, és szükség szerint írja be az információkat a szövegmezőbe. Lásd a képernyőképet:

doc beszúrja az úszóasztalt 4

2. Ezután kattintson a jobb gombbal a lapfülre, amely tartalmazza azt a szövegdobozt, amelyet mindig láthatóan szeretne tartani, majd válassza a Kód megtekintése a helyi menüből és a megnyitottból Microsoft Visual Basic for Applications ablakba másolja és illessze be a következő kódot az üresbe Modulok:

VBA kód: Lebegő szövegdoboz beszúrása az Excelbe:

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

Megjegyzések: Ebben a kódban az 1. szövegdoboz a beillesztett szövegdoboz neve, kérjük, változtassa meg igénye szerint.

doc beszúrja az úszóasztalt 5

3. Ezután mentse el és zárja be a kódablakot. Most, amikor a munkalapot bárhová görgeti, a beszúrt szövegdoboz mindig a munkalap jobb felső sarkában marad.


A munkalap ablakának nagyítása vagy minimalizálása

A munkalap ablaka maximalizálása érdekében több hely szabadulhat fel a felhasználók számára, az Excel programban maximalizálhatja a munkalap ablakát a szalag, a képletsáv vagy az állapotsor elrejtésével. Kutools az Excel számára's Munkaterület egyetlen kattintással segíthet elrejteni a szalagot. Töltse le és ingyenes próbaverziót Kutools for Excel most!


A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

  • újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
  • Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
  • Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
  • Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
  • Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
  • Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
  • Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
  • Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
  • Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.
kte lap 201905

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
officetab alja
A megjegyzések rendezése szerint
Hozzászólások (8)
Még nincs értékelés. Legyen Ön az első, aki értékel!
A weboldal moderátora ezt a megjegyzést minimalizálta
Köszönöm - ez nagyon könnyen megoldotta a problémámat!
A weboldal moderátora ezt a megjegyzést minimalizálta
Ha átméretezem az ablakot, a kép túlságosan középre úszik. Hogyan tudom a képet ugyanarra a margóra lebegni a képernyőről, függetlenül attól, hogy mekkora ablakom van?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia,
Valahol a „Lebegő táblázat beszúrása Excelben VBA kóddal” 2. és 3. lépése között hiányoltam, hogyan nevezzem el azt a képet, amelyet most másolok és illesztek be.

Tomi
A weboldal moderátora ezt a megjegyzést minimalizálta
Velem is ugyanez történt, honnan tudod a képfájl nevét?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia Péter,
A kép nevének megismeréséhez csak ki kell választania a képet, majd meg kell tekintenie a nevet a bal felső sarokban található Névdobozban.
A weboldal moderátora ezt a megjegyzést minimalizálta
A képlet beviteli mezője melletti bal felső sarokban
A weboldal moderátora ezt a megjegyzést minimalizálta
A nevek ugyanazok, de valamilyen oknál fogva még mindig a 424-es futásidejű hiba objektum szükséges?
A weboldal moderátora ezt a megjegyzést minimalizálta
Helló, jó reggelt.

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

Saludos y gracias por compartir tus conocimientos.
Még senki sem írt megjegyzést
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi