Conas pictiúir iolracha le hainm comhaid a chur isteach i ndoiciméad Word?
I ndoiciméad Word, is féidir leat iliomad pictiúr a chur isteach go tapa ag an am céanna tríd an bhfeidhm Ionsáigh a úsáid. Ach, uaireanta, ní mór duit cosán agus ainmneacha na gcomhad a chur isteach mar cheannteideal agus na pictiúir á gcur isteach. Conas a d’fhéadfá déileáil leis an tasc seo i gcomhad Word?
Cuir isteach pictiúir iolracha le hainm an chomhaid trí chód VBA a úsáid
Cuir isteach pictiúir iolracha le hainm an chomhaid trí Kutools for Word a úsáid
Cuir isteach pictiúir iolracha le hainm an chomhaid trí chód VBA a úsáid
Is féidir leis an gcód VBA seo a leanas cabhrú leat cosán agus ainm an chomhaid a chur isteach mar cheannteideal agus na híomhánna á gcur isteach, déan mar seo é le do thoil:
1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. Agus ansin, cliceáil Ionsáigh > Modúil, cóipeáil agus greamaigh an cód thíos sa mhodúl bán oscailte:
Cód VBA: Cuir isteach iliomad pictiúr le hainm an chomhaid:
Sub PicWithCaption()
Dim xFileDialog As FileDialog
Dim xPath, xFile As Variant
On Error Resume Next
Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
If xFileDialog.Show = -1 Then
xPath = xFileDialog.SelectedItems.Item(1)
If xPath <> "" Then
xFile = Dir(xPath & "\*.*")
Do While xFile <> ""
If UCase(Right(xFile, 3)) = "PNG" Or _
UCase(Right(xFile, 3)) = "TIF" Or _
UCase(Right(xFile, 3)) = "JPG" Or _
UCase(Right(xFile, 3)) = "GIF" Or _
UCase(Right(xFile, 3)) = "BMP" Then
With Selection
.InlineShapes.AddPicture xPath & "\" & xFile, False, True
.InsertAfter vbCrLf
.MoveDown wdLine
.Text = xPath & "\" & xFile & Chr(10)
.MoveDown wdLine
End With
End If
xFile = Dir()
Loop
End If
End If
End Sub
3. Ansin brúigh F5 eochair chun an cód seo a rith, taispeántar fuinneog Brabhsáil, roghnaigh an fillteán ina bhfuil na híomhánna a theastaíonn uait a chur isteach, féach ar an scáileán:
4. Ansin cliceáil OK cnaipe, tá na híomhánna go léir san fhillteán roghnaithe curtha isteach sa doiciméad Word, agus tá cosán agus ainm an chomhaid curtha isteach mar cheannteideal is maith linn, féach an scáileán:
Cuir isteach pictiúir iolracha le hainm an chomhaid trí Kutools for Word a úsáid
Má tá tú Kutools le haghaidh Word, Lena Íomhánna gné, is féidir leat pictiúir iolracha a chur isteach go tapa le cosán agus ainm comhaid sa doiciméad Word láithreach.
Kutools le haghaidh Word : le níos mó ná 100 breiseán áisiúil Word, saor in aisce le triail gan aon teorannú i gceann 60 lá. |
Tar éis a shuiteáil Kutools le haghaidh Word, déan mar seo le do thoil:
1. cliceáil Kutools > Íomhánna, féach ar an scáileán:
2. Sa popped amach Cuir isteach Pictiúir bosca dialóige, déan na hoibríochtaí thíos le do thoil:
- (1.) Cliceáil Cuir Comhaid or Cuir Fillteán Leis cnaipe chun na híomhánna a theastaíonn uait a chur isteach a roghnú;
- (2.) Ansin seiceáil Cuir isteach cosán comhaid gach pictiúr mar cheannteideal rogha ag bun na láimhe clé den bhosca dialóige;
- (3.) Agus ansin cliceáil Ionsáigh cnaipe.
3. Tar éis duit na híomhánna a chur isteach, feicfidh tú cosán comhaid gach pictiúr agus cuirtear ainm isteach freisin, féach an scáileán:
Cliceáil chun Kutools for Word a íoslódáil agus triail saor in aisce anois!
Uirlisí Táirgeachta Focal Molta
Kutools For Word - Níos mó ná 100 Gné Ardteist le haghaidh Word, Sábháil Do 50% Am
- Is féidir oibríochtaí casta agus arís agus arís eile a dhéanamh próiseáil aon-uaire i soicindí.
- Cuir isteach íomhánna iomadúla thar fhillteáin i ndoiciméad Word ag an am céanna.
- Cumaisc agus comhcheangail comhaid Word iolracha thar fhillteáin i gceann amháin leis an ord atá uait.
- Roinn an doiciméad reatha i ndoiciméid ar leithligh de réir ceannteidil, briseadh ailt nó critéir eile.
- Tiontaigh comhaid idir Doc agus Docx, Docx agus PDF, bailiú uirlisí le haghaidh comhshó agus roghnú coitianta, agus mar sin de ...






