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

Ինչպե՞ս արագ տեղադրել Windows- ի օգտվողի անունը բջիջում Excel- ում:

Excel- ում աշխատելը, երբեմն կարող է անհրաժեշտ լինել windows- ի օգտվողի անունը տեղադրել բջիջներում: Կարող եք ձեռքով մեկ առ մեկ մուտքագրել օգտվողի անունը, բայց ես ունեմ մի փոքր ավելի լավ ձև ՝ ձեր ժամանակը խնայելու համար:

Տեղադրեք օգտվողի անունը VBA- ով բջիջում

Տեղադրեք օգտվողի անունը կամ այլ աշխատանքային գրքի տեղեկությունները բջիջում Kutools- ի համար Excel- ի համար լավ գաղափար 3


Տեղադրեք օգտվողի անունը VBA- ով բջիջում

Այստեղ ես ձեզ եմ ներկայացնում VBA կոդ, որպեսզի Windows- ի օգտվողի անունը արագորեն տեղադրվի Excel- ի մի շարք բջիջների մեջ:

1. Մամուլ Alt + F11 հնարավորություն տալու ստեղները Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, ապա պատճենեք և տեղադրեք ներքևում գտնվող VBA կոդի Մոդուլի պատուհանում:

VBA. Տեղադրեք օգտվողի անունը:

Sub Usernameincell()
    Range("A1:D5").Value = Application.UserName
End Sub

2: սեղմեք Վազում կոճակը կամ F5 ծածկագիրը գործարկելու համար ստեղնը, ապա օգտագործողի անունը տեղադրվում է յուրաքանչյուր բջիջում A1: D5 տիրույթում: Տեսեք,

փաստաթուղթ տեղադրեք օգտագործողի անունը 1

Ձեր կարիքը բավարարելու համար կարող եք փոխել A1: D5 տիրույթը VBA կոդում:

Բայց եթե նշված տիրույթում կան որոշ բովանդակություն, այս VBA կոդը կփոխարինի բջիջների պարունակությունը միայն օգտագործողի անունով:

Այս դեպքում կարող եք ընտրել Excel- ի համար Kutools:


Տեղադրեք օգտվողի անունը կամ այլ տեղեկություններ բջիջում Kutools- ի համար Excel- ի համար

Եթե ​​ցանկանում եք տեղադրել windows- ի օգտագործողի անունը կամ աշխատանքային գրքերի այլ տեղեկություններ, ինչպիսիք են աշխատանքային գրքի անունը, աշխատանքային թերթի անունը, աշխատանքային գրքի ուղին և անունը բջիջում կամ տողատակում կամ վերնագիր, կարող եք օգտագործել Excel- ի համար նախատեսված գործիքներ'S Տեղադրեք աշխատանքային գրքի տեղեկատվությունը.

Excel- ի համար նախատեսված գործիքներ, ավելի քան 300 հարմար գործառույթներ, ավելի հեշտացնում է ձեր գործերը: 

Այն բանից հետո անվճար տեղադրում Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև ՝

Սեղմել Kutools Plus > Աշխատանքային տետր > Տեղադրեք աշխատանքային գրքի տեղեկատվությունը, Տեսեք,
փաստաթուղթ տեղադրեք օգտագործողի անունը 9

փաստաթուղթ տեղադրեք օգտագործողի անունը 8
A: Ընտրեք այն տեղեկատվությունը, որը ցանկանում եք տեղադրել:
B: Ընտրեք տեղադրություն տեղադրված տեղեկատվությունը տեղադրելու համար:
C: Վերնագիր կամ էջատակ տեղադրելու համար կարող եք ընտրել տեղադրումը
տեղեկատվությունը վերնագրի հավաստագրի / էջատակի վրա, վերնագրի ձախ մասում
ստորագիր, կամ վերնագրի / էջատակի աջը:

Տեղադրեք աշխատանքային գրքի ուղին և անունը բջիջում

փաստաթուղթ ներդիր աշխատանքային գրքի վերաբերյալ տեղեկատվություն 2

Տեղադրեք օգտվողի անունը կենտրոնի վերնագրում

փաստաթուղթ ներդիր աշխատանքային գրքի վերաբերյալ տեղեկատվություն 3

Տեղադրեք ընթացիկ ամսաթիվը և ժամանակը աջ էջում

փաստաթուղթ ներդիր աշխատանքային գրքի վերաբերյալ տեղեկատվություն 4

Սեղմեք այստեղ ՝ Excel- ի Kutools- ի Տեղադրեք աշխատանքային գրքի տեղեկատվության մասին ավելի շատ մանրամասներ իմանալու համար

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

🤖 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 (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thanks for an answer to what seems to be an obscure command! This worked wonderfully, however I'd like to run an IF statement that only adds the username if "Yes" is in another cell. Can you help?
This comment was minimized by the moderator on the site
You don't need all this crap, the formula for the username is
=MID(INFO("DIRECTORY"),10,LEN(INFO("DIRECTORY"))-LEN(MID(INFO("DIRECTORY"),FIND("\",INFO("DIRECTORY"),10),1000))-LEN("C:\Users\"))

so =if(CELL="YES",MID(INFO("DIRECTORY"),10,LEN(INFO("DIRECTORY"))-LEN(MID(INFO("DIRECTORY"),FIND("\",INFO("DIRECTORY"),10),1000))-LEN("C:\Users\")),"whatever")
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations