Note: The other languages of the website are Google-translated. Back to English

Conas ainmneacha pictiúr / ainmneacha comhaid fillteán a liostáil go tapa chuig cealla Excel?

Sa rang teagaisc seo, cuirfidh mé roinnt cleasanna ar fáil chun gach ainm pictiúr nó ainm comhaid de fhillteán ar leith a liostáil go tapa i mbileog Excel mar a thaispeántar an pictiúr.

SONRADH CEOL

Liostaigh ainmneacha pictiúr fillteán in Excel le VBA
Liostaigh ainmneacha pictiúr nó ainmneacha comhaid formáide ar leith fillteán in Excel le Liosta Ainm Comhad
Íoslódáil comhad samplach

liosta doc ainm pictiúr 1

Liostaigh ainmneacha pictiúr fillteán in Excel le VBA

In Excel, níl aon fheidhm ionsuite ann a fhéadann ainmneacha pictiúr uile ar fhillteán a roghnaíonn tú i gcill leatháin a liostáil go huathoibríoch, ach anseo tá cód VBA agam a chabhróidh leat an post seo a réiteach go tapa.

1. In Excel, ansin brúigh + eochracha le hoscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. I bhfuinneog popping, cliceáil Ionsáigh > Modúil chun script Modúl nua a chruthú.

3. Cóipeáil thíos an cód agus déan iad a ghreamú ar fhuinneog script nua an Mhodúil.

Sub PictureNametoExcel()
'UpdatebyExtendoffice 
    Dim I As Long
    Dim xRg As Range
    Dim xAddress As String
    Dim xFileName As String
    Dim xFileDlg As FileDialog
    Dim xFileDlgItem As Variant
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select a cell to place name list:", "Kutools For Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Set xRg = xRg(1)
    xRg.Value = "Picture Name"
    With xRg.Font
    .Name = "Arial"
    .FontStyle = "Bold"
    .Size = 10
    End With
    xRg.EntireColumn.AutoFit
    Set xFileDlg = Application.FileDialog(msoFileDialogFolderPicker)
    I = 1
    If xFileDlg.Show = -1 Then
        xFileDlgItem = xFileDlg.SelectedItems.Item(1)
        xFileName = Dir(xFileDlgItem & "\")
        Do While xFileName <> ""
            If InStr(1, xFileName, ".jpg") + InStr(1, xFileName, ".png") + InStr(1, xFileName, ".img") + InStr(1, xFileName, ".ioc") + InStr(1, xFileName, ".bmp") > 0 Then
                xRg.Offset(I).Value = xFileDlgItem & "\" & xFileName
                I = I + 1
            End If
            xFileName = Dir
        Loop
    End If
    Application.ScreenUpdating = True
End Sub

4. Brúigh F5 eochair, ansin tagann dialóg amach duit chun cill a roghnú chun ainmneacha na bpictiúr a chur.
liosta doc ainm pictiúr 1

5. cliceáil OK chun leanúint ar aghaidh ag roghnú an fhillteáin is mian leat ainmneacha na bpictiúr a liostáil sa Brabhsáil dialóg.
liosta doc ainm pictiúr 3

6. cliceáil OK, anois tá gach ainm pictiúr san fhillteán roghnaithe liostaithe in Excel.
liosta doc ainm pictiúr 13

Nóta: Sa chód VBA, is féidir leat jpg / png /… sa téad cód Má tá InStr (1, xFileName, ".jpg") + InStr (1, xFileName, ".png") + InStr (1, xFileName, ".img") + InStr (1, xFileName, ".ioc") + InStr (1, xFileName, ".bmp") > 0 Ansin go dtí an síneadh comhaid atá uait, mar shampla, más mian leat ainmneacha comhaid an chomhaid a liostáil i bhformáid doc, ná hathraigh ach an sreangán cód go Má tá InStr (1, xFileName, ".doc")> 0 Ansin.

Más gnách duit ainmneacha comhaid amháin nó gach formáid de fhillteán i gcill Excel a liostáil i do chuid oibre laethúla, tá an cód casta agus ní furasta é a láimhseáil, ach, faoi bhun an bhealaigh, is féidir leat an post seo a réiteach go tapa.


bogadh ot

Ar mhaith leat Ardú Pá a bheith agat agus an-chuid ama le dul in éineacht leis an teaghlach?

Feabhsaíonn Tab Office d’éifeachtúlacht 50% in Microsoft Office Working Right Now

Dochreidte, tá sé níos éasca agus níos tapa oibriú ag dhá dhoiciméad nó níos mó ná a bheith ag obair ag ceann amháin.

I gcomparáid le brabhsálaithe aitheanta, tá an uirlis tabbed i Office Tab níos cumhachtaí agus níos éifeachtaí.

Laghdaigh na céadta cliceáil luch agus clóscríobh méarchláir gach lá duit, slán a fhágáil le lámh na luiche anois.

Má oibríonn tú de ghnáth ag ildhoiciméid, sábhálfaidh Office Tab am iontach duit.

Triail saor in aisce 30 lá, níl aon chárta creidmheasa ag teastáil.

Leigh Nios moÍoslódáil saor in aisce anois


Liostaigh ainmneacha pictiúr nó ainmneacha comhaid formáide ar leith fillteán in Excel le Liosta Ainm Comhad

Seo fóntais - Liosta Ainm comhaid in Kutools le haghaidh Excel, Is féidir a

>> liostáil gach ainm comhaid i ngach formáid comhaid de fhillteán i mbileog nua;

>> liostáil ainmneacha na gcomhad i bhformáid comhaid amháin nó níos mó a shonraíonn tú le Excel;

>> liostáil ainmneacha comhaid lena n-áirítear fofhillteáin agus comhaid agus fillteáin i bhfolach chuig Excel.

Slán a fhágáil le Spondylosis Láimhe Luiche agus Ceirbheacs Anois

Réitíonn 300 uirlis chun cinn de Kutools le haghaidh Excel tascanna Excel 80% i soicindí, tarraingíonn tú as na mílte cliceáil luch.

Déileáil go héasca le 1500 cás oibre, ní gá am a chur amú le réitigh a chuardach, bíodh go leor ama agat chun taitneamh a bhaint as do shaol.

Feabhas a chur ar tháirgiúlacht 80% do 110000+ duine ardéifeachtach gach lá, tú féin san áireamh ar ndóigh.

Gan a bheith cráite ag foirmlí pianmhara agus VBA a thuilleadh, tabhair suaimhneas oibre agus lúcháir oibre d’inchinn.

Triail saor in aisce 30 lá le gnéithe iomlána, airgead 30 lá ar ais gan chúiseanna.

Cruthaíonn Comhlacht Níos Fearr Saol Níos Fearr.

Tar éis Kutools a shuiteáil saor in aisce do Excel, déan mar atá thíos le do thoil:

1. Cumasaigh an leabhar oibre is mian leat ainmneacha na gcomhad a liostáil, ansin cliceáil Kutools Plus > Iompórtáil / Easpórtáil > Liosta Ainm comhaid.
liosta doc ainm pictiúr 4

2. Sa Liosta Ainm comhaid dialóg, ar dtús, cliceáil  liosta doc ainm pictiúr 5chun fillteán a roghnú ar mhaith leat a ainmneacha comhaid a liostáil, ansin is féidir leat boscaí seiceála na Cuir comhaid san áireamh i bhfochomhadlann agus Cuir comhaid agus fillteáin i bhfolach san áireamh de réir mar is gá duit.
liosta doc ainm pictiúr 6

3. Ansin roghnaigh an fhormáid comhaid ar mhaith leat na hainmneacha a liostáil ann Cineál comhaid alt seo.

seiceáil Gach comhad rogha, liostóidh sé ainmneacha na gcomhad go léir sna formáidí comhaid go léir san fhillteán roghnaithe
liosta doc ainm pictiúr 7
seiceáil Coitianta rogha, agus roghnaigh an fhormáid comhaid shonrach a theastaíonn uait ainmneacha na gcomhad a liostáil ón liosta anuas, ansin liostálfaidh sé ainmneacha comhaid uile na formáide comhaid a roghnaíonn tú ar an liosta anuas
liosta doc ainm pictiúr 8
seiceáil Sonraigh rogha, ansin clóscríobh na síntí comhaid (ag baint úsáide as camóg chun iad a dheighilt) is mian leat ainmneacha na gcomhad a liostáil sa bhosca téacs, ansin ní dhéanfaidh sé ach ainmneacha na gcomhad a liostáil leis na síntí comhaid ionchuir in Excel
liosta doc ainm pictiúr 9

4. Roghnaigh an t-aonad méide de réir mar a theastaíonn uait ón liosta anuas i Aonad méid comhaid alt, más mian leat nasc a chruthú le hainmneacha na gcomhad, seiceáil Cruthaigh hipearnasc rogha.

liosta doc ainm pictiúr 10 liosta doc ainm pictiúr 11

5. cliceáil Ok, cruthófar bileog nua chun ainmneacha na gcomhad agus roinnt faisnéise comhaid a liostáil.
liosta doc ainm pictiúr 12

Leid: más mian leat gach ainm bileog a liostáil in Excel, is féidir leat Kutools a chur i bhfeidhm ar Excel ' Cruthaigh Liosta Ainmneacha Bileog fóntais, cruthóidh sé bileog nua chun gach ainm bileog in-nasctha a liostáil.
cruthaigh liosta ainm bileog

Kutools le haghaidh Excel:

Logáil isteach  \/ 
x
or
x
Cláraigh  \/ 
x

or
+ uirlisí úsáideacha úsáideacha, ag simpliú na dtascanna casta in Excel i gcúpla cad a tharlaíonn.

Íoslódáil Comhad Samplach

sampla


Conas a Dhéanamh Leat Seasamh Amach ón Slua, Obair go héasca agus Bain sult as an Saol Leis

Feabhsóidh Kutools for Excel d’éifeachtúlacht 80% gach lá ar an meán, beidh go leor ama agat a bheith in éineacht leis an teaghlach agus spraoi a bheith agat sa saol.

Réitíonn 300 uirlis chun cinn fadhbanna Excel 80%, ní bhíonn sé deacair ort réitigh a chuardach a thuilleadh, obair a dhéanamh níos éasca.

Láimhseáil 1500 cás Excel go héasca, sábháil 1 uair an chloig ar a laghad duit gach lá.

Bí i do shaineolaí Excel i gceann 5 nóiméad, faigh aitheantas agus deis do dhaoine ardú céime a fháil.

Láimhseálann fóntais aon-cliceáil próiseáil bhaisc, lig duit na mílte cliceáil luch a sheachaint, slán a fhágáil le lámh na luiche.

Faigh réidh le foirmlí de ghlanmheabhair rote agus VBA casta, tabhair sosa d’inchinn.

110000+ oifigeach ardéifeachtúlachta agus 300+ rogha cuideachtaí a bhfuil cáil dhomhanda orthu.

Ná glac ach $ 39 ach is fiú go mór ná $ 4000 oiliúint ar dhaoine eile

Triail saor in aisce 30 lá gan aon teorannú, airgead iomlán ar ais i 30 lá gan aon chúiseanna.


Uirlisí Táirgeachta Molta

Cluaisín Oifige - Brabhsáil Tabbed, Eagarthóireacht, Bainistiú Doiciméid In Microsoft Office 2019 - 2003 Agus Office 365


cluaisín oifige

Laghdaíonn Breiseán Gairmiúil le haghaidh Excel Luasghéarú 2019-2007, tascanna uaireanta go soicindí

Cuimsíonn an breiseán seo mórán de na grúpaí gairmiúla, le 300+ rogha, uathoibreoidh sé an chuid is mó de do thascanna laethúla in Excel, agus méadóidh sé do tháirgiúlacht 50% ar a laghad. Den sórt sin mar ghrúpaí de optons aon-cliceáil agus tiontaithe baisc.
Anois tá seans agat tú féin a bhrostú le Kutools le haghaidh Excel!


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.
    JJB · 6 months ago
    Hey! This is super quick and thanks
  • To post as a guest, your comment is unpublished.
    Leonie · 1 years ago
    Thanks so much for this!


  • To post as a guest, your comment is unpublished.
    Andrej · 1 years ago
    In Libreoffice Calc I use the function of importing a list of files into the rows / columns of a Calc table, via Macro and based on certain criteria - I have created a button on the toolbar for this particular macro, and after pressing it, I select a folder, and the list of images is immediately inserted into a new document. How to make it as easy as possible in Excel? I have a lot of folders that contain 1 or more images and I need to:
    > If the folder contains 1 image, I need it to be on a new line in Excel.
    > If the folder contains more images, the first being on a new line and the second either:
    - next to the first in the same row (in one column), separated by the character | (example: photo 1.jpeg | photo 2.jpeg)
    - or to have their names in the columns (even without the | character) (the first option would be better, but the second is enough as well)
    These are the product images whose names I need for import into Woocommerce - via a csv file.
  • To post as a guest, your comment is unpublished.
    Ceki · 1 years ago
    Amazing! Thank you for sharing!
  • To post as a guest, your comment is unpublished.
    Mayank · 1 years ago
    Hi,
    As per the above code I am getting the the images name in an incrementing order, however the path where the images are being placed are in numeric incrementation.

    Kindly suggest how I can keep the same formatting.
  • To post as a guest, your comment is unpublished.
    Omila · 1 years ago
    How to export an image with specific file name in excel.
  • To post as a guest, your comment is unpublished.
    THE HELPER · 3 years ago
    I WAS HAVING THE SAME PROBLEM TANNER, IN THE SCRIPT WHERE IT HAS THE DIFFERENT FILE EXTENSIONS ITS GOING TO GRAB,YOU HAVE TO CAPITALIZE THE FILE EXTENSION ITS LOOKING FOR, FOR EXAMPLE, YOU SAID YOUR FILES ARE ".png", WELL IF YOU CAPITALIZE IT I.E ".PNG" IT MAY WORK.
    • To post as a guest, your comment is unpublished.
      Alexandre · 1 months ago
      Now it works for me. Thanks!!!
  • To post as a guest, your comment is unpublished.
    monk2011@gmail.com · 3 years ago
    Is it possible that there is something wrong with the code? The file explorer is showing my folder full of images (.png) as empty.
  • To post as a guest, your comment is unpublished.
    Tanner · 3 years ago
    Is it possible something is wrong with the code? Because it shows folders full of images (.png) as empty when it pulls up the box to select the photos.