Note: The other languages of the website are Google-translated. Back to English
Մուտք  \/ 
x
or
x
Գրանցում  \/ 
x

or

Ինչպե՞ս արագ տեղադրել 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- ի Տեղադրեք աշխատանքային գրքի տեղեկատվության մասին ավելի շատ մանրամասներ իմանալու համար


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

Excel- ի համար նախատեսված Kutools- ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80% -ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր հատկություններ, Աջակցում է Office / Excel 2007-2019 և 365. Աջակցում է բոլոր լեզուները: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հատկություններ ՝ 30-օրյա անվճար փորձաշրջան: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

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

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր կտտոցները ձեզ համար ամեն օր:
officetab ներքևում
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Lisa · 2 years ago
    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?
    • To post as a guest, your comment is unpublished.
      namco · 1 years ago
      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")