Ինչպե՞ս արտահանել մեկնաբանությունները Excel- ից Word:
Excel- ի օգտագործողների համար բջիջների մեջ մեկնաբանությունների տեղադրումը սովորական խնդիր է, երբեմն, անհրաժեշտ է, որ ինչ-որ նպատակով պատճենեք և տեղադրեք այս մեկնաբանությունները Word փաստաթղթում: Իհարկե, դուք կարող եք մեկ առ մեկ մեկնաբանել և տեղադրեք մեկնաբանությունը Word- ին, բայց դա ձանձրալի և ժամանակատար աշխատանք է: Կա՞ որևէ եղանակ Excel- ից Word միանգամից արտահանելու բոլոր եղանակները:
Արտահանեք մեկնաբանություններ ընթացիկ աշխատաթերթից VBA կոդով Word- ով
Արտահանեք մեկնաբանություններ ընթացիկ աշխատաթերթից VBA կոդով Word- ով
Unfortunatelyավոք, Excel- ը չի տրամադրում բոլոր մեկնաբանությունները միանգամից պատճենելու և տեղադրելու հնարավորությունը: Այնուամենայնիվ, հետևյալ VBA կոդով դուք կարող եք արագ արտահանել ակտիվ աշխատանքային թերթի բոլոր մեկնաբանությունները Word փաստաթղթին:
1, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլի պատուհան.
VBA կոդ. Ընթացիկ աշխատանքային թերթից մեկնաբանություններ արտահանել Word- ին
Sub CopyCommentsToWord()
'Update 20140325
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
Err.Clear
Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub
3, Դրանից հետո սեղմեք F5 այս կոդը գործելու բանալին, և ակտիվ աշխատաթերթի բոլոր մեկնաբանություններն արտահանվել են նոր Word փաստաթուղթ ՝ իր բջջային հասցեով: Տեսեք,
Առնչվող հոդվածներ քանակը:
Ինչպե՞ս արագ մեկնաբանություն տեղադրել Excel- ում բազմաթիվ բջիջների մեջ:
Ինչպե՞ս փոխել մեկնաբանության տուփի ձևը Excel- ում:
Ինչպե՞ս փոխել մեկնաբանության բոլոր ձևաչափերը Excel- ի բջիջներում:
Ինչպե՞ս փոխել բոլոր մեկնաբանությունների հեղինակի անունը Excel-ում:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: