Outlook-ում բոլոր անդամներին մեկ կոնտակտային խմբից մյուսը պատճենելու 2 մեթոդ

Outlook լուծումներ Սեպտեմբեր 29, 2025
Կիսվել հիմա ՝

Այս հոդվածը կներկայացնի 2 մոտեցում՝ բոլոր անդամներին մեկ կոնտակտային խմբից մյուսը պատճենելու համար: Դուք կարող եք ընտրել կամ ըստ ձեր կարիքների:

Շատ օգտատերեր հույս ունեն, որ Outlook-ը կարող է արագ միջոց տրամադրել անդամներին մի կոնտակտային խմբից մյուսը պատճենելու համար: Դա կարող է օգնել նրանց խուսափել ձեռքով անդամներ մեկ առ մեկ ավելացնելու դժվարություններից: Այժմ, հաջորդիվ, մենք կկիսվենք 2 եղանակով: Առաջինը լուծում է, օգտագործելով Outlook-ի բնիկ հատկությունը: Իսկ վերջինս շատ ավելի խելացի է VBA կոդի օգտագործման շնորհիվ:

Outlook-ում պատճենեք բոլոր անդամներին մեկ կոնտակտային խմբից մյուսը

Մեթոդ 1. Պատճենեք և տեղադրեք անդամներին ձեռքով

  1. Նախևառաջ, գործարկեք ձեր Outlook ծրագիրը։
  2. Այնուհետև կարող եք մուտք գործել Կոնտակտների տարածք, որտեղ դուք պետք է տեղորոշեք և տեղադրեք կոնկրետ կոնտակտային խումբ:
  3. Հաջորդը, դուք կարող եք սեղմել «Էլ. փոստ» կոճակը «Հաղորդակցվել» խմբում «Տուն» ներդիրում:Ուղարկել Կոնտակտային խմբին
  4. Դրանից հետո կցուցադրվի նոր նամակ, որում պետք է սեղմել «+» պատկերակը խմբի դիմաց «Դեպի» դաշտում՝ խումբն ընդլայնելու համար:
  5. Ավելի ուշ «Դեպի» դաշտը ընդլայնելուց հետո պատճենեք բոլոր անդամների էլփոստի հասցեները:
  6. Այնուհետև վերադարձեք Կոնտակտների պանակ և գտնեք և բացեք կոնտակտային խումբը, որտեղ ցանկանում եք պատճենել անդամներին:
  7. Նշված կոնտակտային խմբի պատուհանում սեղմեք «Ավելացնել անդամներ» > «Հասցեների գրքից»։
  8. Այնուհետև բացվող երկխոսության վանդակում սեղմեք «Ctrl + V»՝ պատճենված անդամները «Անդամներ->» դաշտում տեղադրելու համար:Ավելացնել անդամներ
  9. Վերջում սեղմեք «OK» և «Պահպանել և փակել» կոճակը՝ փոփոխությունները պահպանելու համար:

Մեթոդ 2. Պատճենեք անդամներին մի կոնտակտային խմբից մյուսը VBA-ի միջոցով

  1. Նախ, Outlook-ի հիմնական պատուհանում սեղմեք «Alt + F11» կոճակները:
  2. Հաջորդ «Microsoft Visual Basic հավելվածների համար» պատուհանում պատճենեք հետևյալ VBA կոդը չօգտագործված մոդուլի մեջ:
Sub CopyMembersFromOneContactGroupToAnother()
    Dim objSourceGroup As DistListItem
    Dim strTargetGroupName As String
    Dim objCurrentContactsFolder, objDefaultContactsFolder As Folder
    Dim objTargetGroup As DistListItem
    Dim objGroupMember As recipient
 
    Select Case Application.ActiveWindow.Class
           Case olInspector
                Set objSourceGroup = ActiveInspector.CurrentItem
           Case olExplorer
                Set objSourceGroup = ActiveExplorer.Selection.Item(1)
    End Select
 
    If objSourceGroup.MemberCount > 0 Then
 
       strTargetGroupName = InputBox("Enter the target contact group name:", "Specify Target Contact Group")
 
       Set objCurrentContactsFolder = objSourceGroup.parent
       Set objTargetGroup = objCurrentContactsFolder.Items.Find("[Subject]= " & Chr(34) & strTargetGroupName & Chr(34))
 
       If Not objTargetGroup Is Nothing Then
          For i = objSourceGroup.MemberCount To 1 Step -1
              Set objGroupMember = objSourceGroup.GetMember(i)
              objTargetGroup.AddMember objGroupMember
          Next i
          objTargetGroup.Save
          MsgBox "Copy Successfully!", vbInformation
      Else
          Set objDefaultContactsFolder = Application.Session.GetDefaultFolder(olFolderContacts)
          Set objTargetGroup = objDefaultContactsFolder.Items.Find("[Subject]= " & Chr(34) & strTargetGroupName & Chr(34))
 
          If Not objTargetGroup Is Nothing Then
             For i = objSourceGroup.MemberCount To 1 Step -1
                 Set objGroupMember = objSourceGroup.GetMember(i)
                 objTargetGroup.AddMember objGroupMember
             Next i
             objTargetGroup.Save
             MsgBox "Copy Successfully!", vbInformation
         Else
             MsgBox "There is not a contact group named as" & Chr(34) & strTargetGroupName & Chr(34) & "!", vbExclamation
         End If
      End If
    End If
End Sub
  1. Այնուհետև, ինչպես միշտ, կարող եք ավելացնել այս մակրո Արագ մուտքի գործիքագոտում:
  2. Վերջապես, կարող եք փորձել:
  • Սկսելու համար ընտրեք կամ բացեք աղբյուրի կոնտակտային խումբ:
  • Դրանից հետո կտտացրեք մակրո կոճակին Արագ մուտքի գործիքագոտում:
  • Հետագայում ձեզ կխնդրվի մուտքագրել թիրախային կոնտակտային խմբի անունը։Նշեք թիրախային կոնտակտային խումբը
  • Դրանից հետո սեղմեք «Լավ»։ Outlook-ը անմիջապես կգտնի թիրախային կոնտակտային խումբը և կպատճենի սկզբնաղբյուր խմբի անդամներին այնտեղ։

Փրկեք վնասված Outlook ֆայլերը

Outlook-ը ենթակա է տարբեր վնասակար գործոնների, ներառյալ էլեկտրաէներգիայի անջատումը, վիրուսային վարակը և այլն: Անցանկալի կոռուպցիայից պաշտպանվելու համար մենք այլ ելք չունենք, քան կանոնավոր Outlook-ի կրկնօրինակում կատարելը: Բացի այդ, խորհուրդ է տրվում տեղադրել PST վերանորոգման հզոր գործիք, ինչպիսին է DataNumen Outlook Repair, Այն կարող է սկանավորել և վերանորոգել PST ֆայլը վերականգնման բարձր արագությամբ:

Հեղինակի ներածություն.

Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում sql վերականգնում և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com

Կիսվել հիմա ՝

Comments փակվում են: