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
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 Kezdőlap fül, lásd a képernyőképet:
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:
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.
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.
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:
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.
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 for Excel's Munkaterület egyetlen kattintással segíthet elrejteni a szalagot. Letöltés és ingyenes próbaidőszak Kutools for Excel most!
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet ezzel Kutools for Excel, és tapasztalja meg a még soha nem látott hatékonyságot. Kutools for Excel Több mint 300 speciális funkciót kínál a termelékenység fokozása és az időmegtakarítás érdekében. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Office Tab Lapos felületet hoz 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!
