Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս տեղադրել Excel- ի աշխատանքային թերթում լողացող աղյուսակը կամ տեքստային տուփը:

Եթե ​​ունեք մի սեղան կամ տեքստային տուփ `մի քանի կարևոր տվյալներով, որոնք ցանկանում եք միշտ տեսանելի լինել աշխատանքային թերթի էկրանին, չնայած այն ժամանակ, երբ ոլորում եք աշխատանքային թերթիկը վեր կամ վար: Սա կարող է լինել հետաքրքիր խնդիր, այս հոդվածը, ես կներկայացնեմ այն ​​արագ լուծելու լուծումը:

Տեղադրեք լողացող սեղան Excel- ում `VBA կոդով

Տեղադրեք լողացող տեքստային տուփ Excel- ում `VBA կոդով


նետ կապույտ աջ պղպջակ Տեղադրեք լողացող սեղան Excel- ում `VBA կոդով

Լողացող աղյուսակը տեղադրելու համար ուղղակի եղանակ չկա, այնպես որ հարկավոր է աղյուսակի տվյալները վերածել պատկերի, այնուհետև կիրառել ծածկագիր այն ավարտելու համար, արեք հետևյալ կերպ.

1, Ընտրեք տվյալների աղյուսակը, որը ցանկանում եք տեսանելի պահել, ապա կտտացրեք պատճեն > Պատճենել որպես նկար տակ Գլխավոր ներդիր, տես նկարի նկարը.

doc ներդիր լողացող աղյուսակ 1

2, Դուրս ցցված Պատճենել նկարը երկխոսության տուփ, ընտրեք Ինչպես ցույց է տրված էկրանին - ից Հայտնվելը բաժինը և ընտրել Պատկեր տակ Ֆորմատ բաժին, սեղմեք OK երկխոսությունը փակելու համար, ապա կտտացրեք բջիջը, որպեսզի պատկերը դուրս գա, վերջապես, սեղմեք Ctrl + V այս նկարը տեղադրելու համար տես նկարի նկարը.

doc ներդիր լողացող աղյուսակ 2

3, Աղյուսակը նկարի վերափոխելուց հետո, աջով կտտացրեք թերթիկի ներդիրին, որը պարունակում է սեղանի նկարը, որը ցանկանում եք միշտ տեսանելի պահել, և ընտրեք Դիտել կոդը համատեքստային ընտրացանկից և բացվածում Microsoft Visual Basic հավելվածների համար պատուհանը, պատճենեք և տեղադրեք հետևյալ կոդը դատարկ Մոդուլի մեջ.

VBA կոդ. Excel- ում տեղադրեք լողացող սեղան.

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

Նշում: Այս օրենսգրքում, Նկար 1 ձեր ստեղծած պատկերի անունն է, խնդրում եմ փոխեք այն ըստ ձեր կարիքի:

doc ներդիր լողացող աղյուսակ 3

4, Ապա պահեք և փակեք ծածկագրի պատուհանը, այժմ, երբ ոլորեք աշխատանքային թերթիկը և կտտացրեք բջիջը, սեղանի նկարը միշտ պահվում է աշխատանքային թերթի վերևի աջ անկյունում:


նետ կապույտ աջ պղպջակ Տեղադրեք լողացող տեքստային տուփ Excel- ում `VBA կոդով

Լողացող տեքստային տուփ տեղադրելու համար ահա նաև VBA կոդ ՝ այս խնդիրը լուծելու համար:

1, Նախ, դուք պետք է տեղադրեք տեքստային տուփ ՝ Երեվակիչ էջանշանը, սեղմեք Երեվակիչ > Տեղադրել > Տեքստային տուփ (ActiveX հսկողություն), ապա նկարեք տեքստային տուփը և մուտքագրեք տեղեկատվությունը տեքստային տուփի մեջ ՝ ըստ ձեզ անհրաժեշտ: Տեսեք,

doc ներդիր լողացող աղյուսակ 4

2, Ապա աջով կտտացրեք թերթիկի ներդիրին, որը պարունակում է տեքստային տուփ, որը ցանկանում եք միշտ տեսանելի պահել, և ընտրեք Դիտել կոդը համատեքստային ընտրացանկից և բացվածում Microsoft Visual Basic հավելվածների համար պատուհանը, պատճենեք և տեղադրեք հետևյալ կոդը դատարկի մեջ Մոդուլներ:

VBA կոդ: Excel- ում տեղադրեք լողացող տեքստային տուփ:

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

Նշում: Այս օրենսգրքում, TextBox1 ձեր տեղադրած տեքստային տուփի անունն է, խնդրում ենք փոխեք այն ըստ ձեր կարիքի:

doc ներդիր լողացող աղյուսակ 5

3, Ապա պահեք և փակեք ծածկագրի պատուհանը, այժմ, երբ աշխատանքային թերթը ոլորում եք ցանկացած տեղ, տեղադրված տեքստային տուփը միշտ պահվում է աշխատանքային թերթի վերևի աջ անկյունում:


Առավելագույնի հասցնել կամ նվազագույնի հասցնել աշխատանքային թերթի պատուհանը

Excel- ում աշխատաթերթի պատուհանը առավելագույնի հասցնելու համար կարող է ավելի շատ տարածք ազատվել օգտվողների համար, Excel- ում կարող եք առավելագույնը հասցնել աշխատանքային պատուհանը ՝ թաքցնելով ժապավենը, բանաձևի տողը կամ կարգավիճակի տողը: Excel- ի համար նախատեսված գործիքներ's Աշխատանքային տարածք կարող է օգնել թաքցնել ժապավենը միայն մեկ հպումով: Ներբեռնեք և անվճար փորձեք Kutools Excel- ի համար հիմա:

Գրասենյակի արտադրողականության լավագույն գործիքները

🤖 Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup    Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar    Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները    Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

Նկարագրություն


Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
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