Skip i'r prif gynnwys

Delweddau Excel: Mewnosod, newid, dileu delweddau neu luniau lluosog yn Excel

Yn y tiwtorial hwn, byddwn yn siarad am sut i fewnosod delweddau lluosog mewn celloedd a'u hailfeintio i gyd-fynd â maint y gell, sut i fewnosod delwedd mewn sylw, pennawd neu droedyn, sut i fewnosod delweddau o URLau ac ati. Mae hefyd yn esbonio sut i arbed, ailenwi, dileu nifer o ddelweddau yn ôl yr angen yn Excel.

Tabl cynnwys:

1. Mewnosod delweddau neu luniau yn y daflen waith o'r cyfrifiadur, y we neu OneDrive

2. Clowch ddelweddau neu luniau i mewn i gell Excel

3. Mewnosodwch ddelweddau neu luniau lluosog yn Excel

4. Mewnosodwch ddelweddau neu luniau lluosog sy'n cyfateb i'w henwau mewn celloedd

5. Mewnosod neu arddangos delweddau neu luniau o URLau

6. Mewnosod neu arddangos delweddau neu luniau o lwybrau ffeiliau

7. Mewnosod delwedd neu lun mewn sylw

8. Mewnosod delwedd neu lun yn y pennawd neu'r troedyn

9. Mewnosodwch yr un ddelwedd neu lun mewn sawl taflen waith

10. Mewnosod delwedd neu lun y tu ôl i gynnwys y gell

11. Mewnosod ystod o gelloedd fel fformat delwedd neu lun yn Excel

12. Mewnosod delwedd neu lun yn seiliedig ar werth celloedd yn ddeinamig

13. Allforio neu gadw pob delwedd neu lun o ffeil Excel

14. Ail-enwi enwau delweddau mewn ffolder yn seiliedig ar restr o gelloedd yn Excel

15. Ehangu neu grebachu delwedd wrth glicio arni

16. Arnofio llun bob amser wrth sgrolio'r daflen waith

17. Dileu delweddau neu luniau o ddalen weithredol / ystod o gelloedd


Mewnosod delweddau neu luniau yn y daflen waith o'r cyfrifiadur, y we neu OneDrive

Mae pob fersiwn Excel yn cefnogi i fewnosod delweddau neu luniau o gyfrifiadur, ond, os ydych chi am fewnosod y delweddau o'r we neu OneDrive, dylech gael Excel 2013 a fersiynau diweddarach.

Mewnosod delweddau neu luniau o'r cyfrifiadur

Mae'n hawdd i'r mwyafrif ohonom fewnosod delweddau sydd wedi'u storio ar gyfrifiadur yn y daflen waith. Gwnewch fel hyn:

1. Yn y daflen waith, cliciwch lle rydych chi am fewnosod delweddau.

2. Yna, cliciwch Mewnosod > lluniau > Y Dyfais hwn, gweler y screenshot:

3. Yn y popped allan Mewnosod Llun ffenestr, agorwch y ffolder sy'n cynnwys y lluniau, ac yna daliwch Ctrl allwedd i ddewis y delweddau rydych chi am eu mewnosod, gweler y screenshot:

4. Yna, cliciwch Mewnosod botwm, mae'r lluniau a ddewiswyd wedi'u mewnosod yn y ddalen. Nawr, gallwch chi addasu neu newid maint y delweddau i'r celloedd sydd eu hangen arnoch chi, gweler y screenshot:


Mewnosod delweddau neu luniau o'r we neu OneDrive

Os oes gennych Excel 2013 neu fersiynau diweddarach, gallwch fewnosod y delweddau o'r we neu One Drive, gwnewch fel hyn:

1. Yn y daflen waith, cliciwch lle rydych chi am fewnosod delweddau.

2. Yna, cliciwch Mewnosod > lluniau > Lluniau Ar-lein, gweler y screenshot:

3. Bydd ffenestr ganlynol yn cael ei harddangos. Yn y Lluniau Ar-lein adran, teipiwch yr hyn rydych chi'n edrych amdano yn y blwch testun, ac yna pwyswch Rhowch allwedd. Mae'r holl luniau cyfatebol yn cael eu chwilio ar unwaith, gweler y screenshot:

4. Yna, dewiswch y lluniau rydych chi eu heisiau, ac yna cliciwch Mewnosod botwm. Ar ôl mewnosod y lluniau, ailfeintiwch neu addaswch y lluniau i'r safle sydd ei angen arnoch chi.

Awgrym:

1. I chwilio rhai delweddau penodol, gallwch hidlo'r delweddau a ddarganfuwyd yn ôl maint, math, cynllun neu liw yn ôl yr angen.

2. Ar wahân i fewnosod y delweddau o chwiliad Bing, gallwch hefyd fewnosod lluniau sydd wedi'u storio ar eich OneDrive. Yn y ffenestr isod, cliciwch OneDrive ar waelod chwith y ffenestr, ac yna dewiswch y delweddau rydych chi am eu mewnosod.


Clowch ddelweddau neu luniau i mewn i gell Excel

Fel rheol, ar ôl mewnosod y delweddau mewn celloedd, pan fyddwch chi'n newid maint, yn hidlo neu'n cuddio'r celloedd sy'n cynnwys y ddelwedd, ni fydd y ddelwedd yn cael ei newid maint na'i hidlo ynghyd â'r gell honno fel islaw'r demo a ddangosir.

Yn yr achos hwn, dylech gloi'r llun i'r gell, fel y gellir ei newid maint, ei hidlo neu ei guddio ynghyd â'r gell, gwnewch y camau canlynol:

1. Cliciwch i ddewis un llun a gwasgwch Ctrl + A i ddewis yr holl ddelweddau yn y daflen waith.

2. Yna, de-gliciwch un llun, a dewis Maint a Phriodweddau o'r ddewislen cyd-destun, gweler y screenshot:

3. Yn yr estynedig Llun Fformat cwarel, o dan y Eiddo adran, dewiswch Symud a maint gyda chelloedd opsiwn, gweler y screenshot:

4. Yna, cau'r Llun Fformat cwarel. Nawr, wrth newid maint, hidlo neu guddio'r celloedd, bydd y lluniau hefyd yn cael eu symud, eu hidlo neu eu cuddio.


Mewnosodwch ddelweddau neu luniau lluosog yn Excel

Weithiau, efallai y bydd angen i chi fewnosod sawl llun yn y celloedd a'u hailfeintio i ffitio maint celloedd yn awtomatig heb newid maint a llusgo'r lluniau. Yma, byddaf yn cyflwyno dwy ffordd ar gyfer datrys y swydd hon yn Excel.

Mewnosodwch ddelweddau neu luniau lluosog a'u hailfeintio i ffitio celloedd â chod VBA

Gall y cod VBA canlynol eich helpu i fewnosod delweddau lluosog mewn celloedd yn seiliedig ar faint y gell. Gwnewch fel hyn:

1. Addaswch faint y gell rydych chi am roi'r llun, ac yna dewiswch y celloedd.

2. Yna, dal i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

3. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau ffenestr.

Cod VBA: Mewnosodwch luniau lluosog yn seiliedig ar faint y gell

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Yna pwyswch y F5 allwedd i redeg y cod hwn. Yn y agored ffenestr, dewiswch y ffolder sy'n cynnwys y lluniau, yna dewiswch y delweddau rydych chi am eu mewnosod, ac yna cliciwch agored botwm, ac mae'r holl luniau a ddewiswyd wedi'u mewnosod yn eich dewis yn seiliedig ar faint y gell. Gweler y screenshot:


Mewnosodwch ddelweddau neu luniau lluosog a'u hailfeintio i ffitio celloedd â nodwedd bwerus

Os nad ydych chi'n gyfarwydd â'r cod VBA, yma, gallwch ddefnyddio nodwedd pŵer - Mewnforio Lluniau of Kutools ar gyfer Excel. Gyda'r nodwedd ddefnyddiol hon, gallwch fewnforio delweddau lluosog i'r celloedd yn gyflym ac yn hawdd.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch y camau canlynol:

1. Cliciwch Kutools Byd Gwaith > Mewnforio ac Allforio > Mewnforio Lluniau, gweler y screenshot:

2. Yn y popped allan Mewnforio Lluniau deialog, gwnewch y gweithrediadau canlynol:

  • Nodwch drefn y llun o'r gwymplen gorchymyn Mewnforio, gallwch ddewis Llenwch gell yn fertigol ar ôl cell or Llenwch gell yn llorweddol ar ôl y gell;
  • Yna, cliciwch Ychwanegu botwm i ddewis y ffeiliau delwedd neu'r ffolder i ychwanegu'r lluniau i mewn i'r Rhestr luniau;
  • Cliciwch ar y Maint mewnforio botwm, yn y Mewnforio Maint Llun blwch deialog, dewiswch y Paru maint celloedd opsiwn.

3. Ar ôl gorffen y gosodiadau, cliciwch mewnforio botwm, ac yn awr, un arall Mewnforio Lluniau wedi'i popio allan, nodwch y celloedd cyrchfan y byddwch chi'n mewnforio llun iddynt, gweler y screenshot:

4. Yna, cliciwch OK botwm, mae'r holl ddelweddau a ddewiswyd wedi'u mewnosod i gyd-fynd â maint celloedd penodol fel y dangosir isod y screenshot:


Mewnosodwch ddelweddau neu luniau lluosog sy'n cyfateb eu henwau mewn celloedd

Os oes gennych restr o enwau cynnyrch mewn un golofn, ac yn awr, mae angen i chi fewnosod eu lluniau cyfatebol mewn colofn arall fel y dangosir y llun isod. Bydd mewnosod y delweddau, ac yna eu llusgo i bob safle fesul un yn gwastraffu llawer o amser, yr adran hon, byddaf yn siarad am rai dulliau cyflym.

Mewnosodwch ddelweddau neu luniau lluosog sy'n cyfateb eu henwau â chod VBA

Gall y cod VBA canlynol eich helpu i fewnosod sawl delwedd sy'n cyfateb i'w henwau yn gyflym, gwnewch fel hyn:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch gwireddut> Modiwlau, a gludwch y macro canlynol yn y Modiwlau ffenestr.

Cod VBA: Mewnosodwch sawl llun sy'n cyfateb i'w henwau

Sub InserPictureByName()
'Updateby Extendoffice
Dim xFDObject As FileDialog
Dim xStrPath, xStrPicPath As String
Dim xRgName, xRgInser, xRg, xRgI As Range
Dim xFNum As Integer
Set xFDObject = Application.FileDialog(msoFileDialogFolderPicker)
With xFDObject
    .Title = "Please select the folder:"
    .InitialFileName = Application.ActiveWorkbook.Path
    .Show
    .AllowMultiSelect = False
End With
On Error Resume Next
xStrPath = ""
xStrPath = xFDObject.SelectedItems.Item(1)
If xStrPath = "" Then
Exit Sub
End If
Set xRgName = Application.InputBox("Please select the cells contain the image name:", "Kutools for Excel", , , , , , 8)
If xRgName Is Nothing Then
    MsgBox "No cells are select, exit operation! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
Set xRgInser = Application.InputBox("Please select the cells to output the images", "Kutools for Excel", , , , , , 8)
If xRgInser Is Nothing Then
    MsgBox " No cells are select, exit operation.! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
For xFNum = 1 To xRgName.Count
    Set xRg = xRgName.Item(xFNum)
    Set xRgI = xRgInser.Item(xFNum)
    xStrPicPath = xStrPath & "\" & xRg.Text & ".png"
    If Not Dir(xStrPicPath, vbDirectory) = vbNullString Then
        With xRgI.Parent.Pictures.Insert(xStrPicPath)
            .Left = xRgI.Left
            .Top = xRgI.Top
            .ShapeRange.LockAspectRatio = msoFalse
            .ShapeRange.Height = 60
            .ShapeRange.Width = 60
        End With
    End If
Next
End Sub

Nodyn: Yn y cod uchod, gallwch newid uchder a lled y ddelwedd yn y sgriptiau “.ShapeRange.Height = 60",".ShapeRange.Width = 60”I'ch angen.

3. Yna, pwyswch F5 allwedd i redeg y cod hwn, ac yn y ffenestr a agorwyd, dewiswch y ffolder sy'n cynnwys y delweddau rydych chi am eu mewnosod, gweler y screenshot:

4. Ac yna, cliciwch OK botwm, mae blwch prydlon wedi'i popio allan, dewiswch y celloedd sy'n cynnwys enwau'r ddelwedd, gweler y screenshot:

5. Ewch ymlaen i glicio OK botwm, a dilynir blwch prydlon arall, dewiswch y celloedd rydych chi am allbwn y delweddau, gweler y screenshot:

6. O'r diwedd, cliciwch OK, ac mae'r lluniau wedi'u mewnosod yn y celloedd yn seiliedig ar eu henwau ar unwaith, gweler y screenshot:


Mewnosodwch ddelweddau neu luniau lluosog sy'n paru eu henwau â nodwedd ddefnyddiol

Os oes gennych Kutools ar gyfer Excel, Gyda'i Cydweddu Lluniau Mewnforio nodwedd, gallwch fewnosod y delweddau yn seiliedig ar enwau'r ddelwedd yn gyflym ac yn hawdd.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel hyn:

1. Cliciwch Kutools Byd Gwaith > Mewnforio ac Allforio > Cydweddu Lluniau Mewnforio, gweler y screenshot:

2. Yn y popped allan Cydweddu Llun Mewnforio blwch deialog, gwnewch y gweithrediadau canlynol:

  • Nodwch drefn y llun o'r gwymplen gorchymyn Mewnforio, gallwch ddewis Llenwch gell yn fertigol ar ôl cell or Llenwch gell yn llorweddol ar ôl y gell;
  • Yna, o'r Amrediad gêm blwch testun, dewiswch enwau'r lluniau rydych chi am fewnosod delweddau yn seiliedig arnynt;
  • Ac yna, cliciwch Ychwanegu botwm i ddewis y ffeiliau delwedd neu'r ffolder i ychwanegu'r lluniau i mewn i'r Rhestr luniau;
  • Nesaf, dylech nodi maint y llun. Cliciwch Maint mewnforio botwm, yn y Mewnforio Maint Llun blwch deialog, dewiswch un maint llun yn ôl yr angen.

3. Ar ôl gorffen y gosodiadau, cliciwch mewnforio botwm, dewiswch un gell neu restr o gelloedd i ddod o hyd i'r delweddau o'r popped allan Cydweddu Lluniau Mewnforio deialog, gweler y screenshot:

4. Yna, cliciwch OK, a'r holl luniau y mae'r enwau sy'n cyd-fynd â gwerthoedd y celloedd wedi'u mewnosod, gweler y screenshot:


Mewnosod neu arddangos delweddau neu luniau o URLau

Ydych chi erioed wedi ceisio arddangos neu fewnosod y delweddau o restr o URLau? Efallai nad oes dull da arall ar gyfer mewnosod y delweddau yn uniongyrchol yn Excel, ond, gallwch gymhwyso cod neu offeryn trydydd parti ar gyfer delio ag ef.

Mewnosod neu arddangos delweddau neu luniau o URLau gyda chod VBA

Defnyddiwch y cod VBA canlynol i fewnosod y delweddau yn seiliedig ar restr o URLau.

1. Yn gyntaf, addaswch faint y gell gyfagos yr ydych am ddod o hyd i'r delweddau.

2. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

3. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau ffenestr.

Cod VBA: Mewnosodwch luniau o restr o URLau

Sub URLPictureInsert()
'Updateby Extendoffice
Dim Pshp As Shape
Dim xRg As Range
Dim xCol As Long
On Error Resume Next
Application.ScreenUpdating = False
Set Rng = ActiveSheet.Range("A2:A5")
For Each cell In Rng
filenam = cell
ActiveSheet.Pictures.Insert(filenam).Select
Set Pshp = Selection.ShapeRange.Item(1)
If Pshp Is Nothing Then GoTo lab
xCol = cell.Column + 1
Set xRg = Cells(cell.Row, xCol)
With Pshp
.LockAspectRatio = msoFalse
If .Width > xRg.Width Then .Width = xRg.Width * 2 / 3
If .Height > xRg.Height Then .Height = xRg.Height * 2 / 3
.Top = xRg.Top + (xRg.Height - .Height) / 2
.Left = xRg.Left + (xRg.Width - .Width) / 2
End With
lab:
Set Pshp = Nothing
Range("A2").Select
Next
Application.ScreenUpdating = True
End Sub

Nodiadau: Yn y cod uchod, A2: A5 yw'r ystod o gelloedd sy'n cynnwys y cyfeiriadau URL rydych chi am echdynnu'r delweddau, dylech chi newid cyfeiriadau celloedd i'ch angen.

4. Yna pwyswch F5 yn allweddol i redeg y cod hwn, bydd y lluniau paru yn cael eu tynnu o'r URLau i'r golofn gyfagos a'u rhoi yng nghanol celloedd, gweler y screenshot:


Mewnosod neu arddangos delweddau neu luniau o URLau gyda nodwedd anhygoel

Kutools ar gyfer Excel mae ganddo nodwedd anhygoel - Mewnosod Lluniau o'r Llwybr (URL). Gyda'r cyfleustodau hwn, bydd y lluniau cyfatebol yn cael eu tynnu o'r URLau yn gyflym ac yn hawdd.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch y camau canlynol:

1. Cliciwch Kutools > Mewnosod > Mewnosod Lluniau o'r Llwybr (URL), gweler y screenshot:

2. Yn y popped allan Mewnosod Lluniau o'r Llwybr (URL) blwch deialog, gosodwch y gweithrediadau canlynol:

  • Dewiswch y rhestr o gelloedd URL ac ystod o gelloedd lle rydych chi am roi'r delweddau;
  • Nodwch faint y delweddau yn ôl yr angen o'r Maint y Llun adran hon.

3. Ac yna, cliciwch Ok botwm, ac mae'r holl luniau wedi'u tynnu o'r URLau, gweler y screenshot:


Mewnosod neu arddangos delweddau neu luniau o lwybrau ffeiliau

Os oes angen i chi fewnosod y delweddau o lwybr ffeiliau, dyma hefyd yr atebion i chi.

Mewnosod neu arddangos delweddau neu luniau o lwybrau ffeiliau gyda chod VBA

Gallwch gymhwyso'r cod VBA canlynol ar gyfer mewnosod y delweddau yn seiliedig ar y llwybrau ffeiliau delwedd.

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, ac yna gludwch y cod canlynol yn y Modiwlau Ffenestr.

Cod VBA: Mewnosodwch ddelweddau o ystod o lwybrau ffeiliau

Sub InsertPicFromFilePath()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. Ar ôl mewnosod y cod uchod, pwyswch F5 allwedd i redeg y cod hwn, yna mae blwch prydlon yn cael ei popio allan, dewiswch gelloedd llwybr y ffeil, gweler y screenshot:

4. Yna cliciwch OK botwm, mae'r holl ddelweddau sy'n seiliedig ar y llwybrau ffeiliau wedi'u harddangos i'r golofn nesaf fel y dangosir y llun canlynol:


Mewnosod neu arddangos delweddau neu luniau o lwybrau ffeiliau gyda nodwedd anhygoel

Kutools ar gyfer Excel'S Mewnosod Lluniau o'r Llwybr (URL) gall nodwedd hefyd eich helpu i arddangos y delweddau cymharol o'r llwybr ffeiliau.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel hyn:

1. Cliciwch Kutools > Mewnosod > Mewnosod Lluniau o'r Llwybr (URL), yn y blwch deialog popped out, nodwch ystod llwybr y ffeil, yr ystod ar gyfer allbynnu delweddau, maint delwedd yn ôl yr angen, gweler sgrinluniau:

2. Ar ôl gosod yr opsiynau, cliciwch Ok botwm, bydd y delweddau'n cael eu mewnosod yn y celloedd a ddewiswyd ar unwaith, gweler y screenshot:


Mewnosod delwedd neu lun mewn sylw

Efallai ei bod hi'n hawdd mewnosod llun mewn cell, ond, weithiau, efallai yr hoffech chi fewnosod llun mewn blwch sylwadau, sut ydych chi'n delio â'r dasg hon?

1. Dewiswch a chliciwch ar y dde yn y gell lle rydych chi am fewnosod sylw, ac yna dewiswch Mewnosodwch Sylw, gweler y screenshot:

Awgrymiadau: Os ydych wedi mewnosod sylw, anwybyddwch y cam hwn.

2. Yna hofran y cyrchwr ar ymylon y blwch sylwadau, nes i chi weld y cyrchwr yn troi'n eicon pedair saeth. Ac yna, cliciwch ar y dde a dewis Sylw Fformat opsiwn, gweler y screenshot:

3. Yn y popped allan Sylw Fformat blwch deialog, cliciwch Lliwiau a Llinellau tab, ac yna dewiswch Llenwi Effeithiau oddi wrth y lliw rhestr ostwng, gweler y screenshot:

4. Yna, yn y canlynol Llenwi Effeithiau blwch deialog, cliciwch Llun tab, a chlicio Dewiswch Llun botwm i ddewis un llun yr ydych am ei fewnosod, gweler y screenshot:

5. Ac yna, cliciwch OK > OK, mae'r llun wedi'i fewnosod yn y blwch sylwadau, gweler y screenshot:


Mewnosod delwedd neu lun yn y pennawd neu'r troedyn

Os ydych chi am fewnosod llun ym mhennyn neu droedyn eich taflen waith Excel, gall y camau yn yr adran hon eich helpu chi, gwnewch fel hyn:

1. Ysgogwch y daflen waith lle rydych chi am fewnosod y ddelwedd yn y pennawd neu'r troedyn.

2. Yna, cliciwch Mewnosod > Pennawd a Throedyn, ac ewch i'r Offer Pennawd a Throedyn tab. Gweler y screenshot:

3. I fewnosod llun yn y pennawd neu'r troedyn, cliciwch blwch pennawd neu droedyn chwith, dde neu ganol yn ôl yr angen, ac yna, cliciwch Llun O dan y dylunio tab, gweler y screenshot:

4. Yna, an Mewnosod Lluniau bydd y ffenestr yn ymddangos, dewiswch y llun rydych chi am ei ychwanegu a chlicio Mewnosod. Nawr, a &[Llun] bydd deiliad y lle yn ymddangos yn y blwch pennawd neu droedyn. Cliciwch unrhyw le y tu allan i'r blwch pennawd neu droedyn, bydd y llun wedi'i fewnosod yn cael ei arddangos fel isod y llun a ddangosir:

Awgrymiadau: Weithiau, efallai y gwelwch fod y ddelwedd yn gorgyffwrdd ag ardal ddata'r daflen waith fel y dangosir isod y screenshot. Mae hyn yn digwydd oherwydd bod y ddelwedd yn rhy fawr ac ni fydd yn cael ei newid maint i ffitio'r blwch adran pennawd neu droedyn yn awtomatig.

I ddatrys y broblem hon, does ond angen newid maint y ddelwedd yn y pennawd neu'r troedyn, gwnewch y camau canlynol:

1. Cliciwch yn yr adran pennawd neu droedyn lle mae'r ddelwedd wedi'i lleoli, ac yna cliciwch Llun Fformat O dan y dylunio tab, gweler y screenshot:

2. Yn y Llun Fformat blwch deialog, o dan y Maint tab, addaswch faint y ddelwedd i gyd-fynd â'r blwch adran pennawd neu droedyn, gweler y screenshot:

3. Ac yna, cliciwch OK, fe gewch y canlyniad yn ôl yr angen.


Mewnosodwch yr un ddelwedd neu lun mewn sawl taflen waith

Weithiau, efallai yr hoffech fewnosod llun logo ym mhob taflen waith yn eich llyfr gwaith, fel rheol, gallwch gymhwyso'r swyddogaeth Mewnosod i fewnosod y llun o un ddalen i'r llall fesul un. Ac eithrio'r nodwedd hon sy'n cymryd llawer o amser, gall y cod VBA canlynol eich helpu i fewnosod yr un llun yng nghell benodol pob dalen ar unwaith. Gwnewch y camau isod:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.

Cod VBA: Mewnosodwch yr un llun ym mhob taflen waith:

Sub InsertImagetoallsheets()
'Updateby Extendoffice
    Dim I As Long
    Dim xPath As String
    Dim xShape As Shape
    Dim xRg As Range
    xPath = "C:\Users\AddinTestWin10\Desktop\my images\logo.png"
    If Dir(xPath) = "" Then
        MsgBox "Picture file was not found in path!", vbInformation, "KuTools for Excel"
        Exit Sub
    End If
    For I = 1 To ActiveWorkbook.Sheets.Count
        Set xRg = Sheets(I).Range("A1")
        Set xShape = Sheets(I).Shapes.AddPicture(xPath, True, True, xRg.Left, xRg.Top, xRg.Width, xRg.Height)
    Next
End Sub

Nodyn: Yn y cod uchod, C: \ Defnyddwyr \ AddinTestWin10 \ Penbwrdd \ fy nelweddau \ logo.png yw llwybr ac enw'r llun, a A1 in Ystod ("A1") yw'r gell lle rydych chi am fewnosod y llun, newidiwch nhw i'ch angen.

3. Yna pwyswch F5 allwedd i redeg y cod hwn, ac mae'r llun penodol wedi'i fewnosod yng nghell A1 pob taflen waith ar unwaith. Gweler isod demo:


Mewnosod delwedd neu lun y tu ôl i gynnwys y gell

I wneud data'r daflen waith yn fwy prydferth a deniadol, gallwch ddefnyddio delwedd fel cefndir. Ar gyfer mewnosod delwedd y tu ôl i gynnwys y gell, dyma rai dulliau a all eich ffafrio.

Mewnosod delwedd neu lun y tu ôl i gynnwys y gell gyda'r nodwedd Cefndir

1. Agorwch y daflen waith lle rydych chi am fewnosod delwedd gefndir.

2. Yna, cliciwch Layout Tudalen > Cefndir, gweler y screenshot:

3. Yn y popped allan Mewnosod Lluniau ffenestr, dewiswch un llun o'ch cyfrifiadur, gwefan neu OneDrive yn ôl yr angen, gweler y screenshot:

4. Nawr, mae'r ddelwedd wedi'i mewnosod yn y daflen waith fel cefndir fel y dangosir isod y screenshot:

Awgrymiadau: I ddileu delwedd gefndir, cliciwch Layout Tudalen > Dileu Cefndir. Gweler y screenshot:


Mewnosod delwedd neu lun tryloyw y tu ôl i gynnwys y gell

Gyda'r dull uchod, ni allwch newid tryloyw y ddelwedd gefndir a fewnosodwyd, felly, os yw lliw'r ddelwedd gefndir yn drwm, ni fydd yn gyfleus ichi ddarllen data'r daflen waith. Yr adran hon, byddaf yn siarad am sut i fewnosod llun tryloyw y tu ôl i'r celloedd.

1. Cliciwch Mewnosod > Siapiau, a dewis siâp petryal, gweler y screenshot:

2. Yna, lluniwch siâp mor fawr ag sydd ei angen arnoch chi mewn taflen waith weithredol.

3. Ar ôl llunio'r siâp, a Offer Lluniadu tab yn cael ei arddangos yn y rhuban, ac yna cliciwch fformat > Amlinelliad ar Siâp > Dim Amlinelliad, gweler y screenshot:

4. Ac yna, de-gliciwch y siâp, a dewis Siâp fformat o'r ddewislen cyd-destun, gweler y screenshot:

5. Yn yr estynedig Siâp fformat cwarel, o dan y Llenwch a Llinell tab, gwnewch y gweithrediadau canlynol:

  • O dan y Llenwch adran, dewiswch Llenwi llun neu wead opsiwn;
  • Cliciwch Mewnosod botwm o'r Ffynhonnell llun, a dewis un llun rydych chi am ei fewnosod;
  • Yna, addaswch dryloywder y llun i'ch angen o'r Tryloywyr adran.

6. Ac yna, fe welwch fod y siâp wedi'i lenwi â lluniau yn edrych fel delwedd gefndir fel y dangosir y screenshot uchod.

Nodyn: Ar ôl mewnosod y math hwn o ddelwedd gefndir, ni chaniateir i chi nodi unrhyw destun o fewn yr ystod lluniau.


Mewnosod delwedd neu lun tryloyw y tu ôl i gynnwys y gell fel dyfrnod

Mae gan y ddau ddull uchod eu cyfyngiadau eu hunain, ni all y dull cyntaf newid tryloywder y ddelwedd, nid yw'r ail ddull yn caniatáu mewnbynnu testun i'r celloedd y tu mewn i ardal y llun. I ddatrys y problemau hyn, Kutools ar gyfer Excel'S Mewnosod Dyfrnod gall nodwedd wneud ffafr i chi.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel hyn:

1. Cliciwch Kutools > Mewnosod > Mewnosod Dyfrnod, gweler y screenshot:

2. Yn y popped allan Mewnosod Dyfrnod blwch deialog, dewiswch Dyfrnod Llun, ac yna cliciwch Dewiswch Llun botwm i ddewis un ddelwedd rydych chi am ei mewnosod, ac yna nodi graddfa'r ddelwedd a gwirio opsiwn Washout, gweler y screenshot:

3. Yna, cliciwch Ok botwm, mae'r llun wedi'i fewnosod yn y daflen waith fel delwedd gefndir.


Mewnosod ystod o gelloedd fel fformat delwedd neu lun yn Excel

A ydych erioed wedi ceisio copïo ystod o gelloedd a'i fewnosod fel delwedd yn Excel? Yn yr adran hon, byddaf yn cyflwyno rhywfaint o ffordd gyflym ar gyfer delio â'r swydd hon yn Excel.

Mewnosod ystod o gelloedd fel fformat delwedd neu lun gyda Copi fel nodwedd Llun

Yn Excel, gallwch ddefnyddio'r Copïwch fel Llun swyddogaeth i gopïo a mewnosod ystod o gell fel delwedd.

1. Dewiswch yr ystod o gelloedd rydych chi am eu copïo a'u mewnosod fel delwedd.

2. Yna, cliciwch Hafan > copi > Copïwch fel Llun, gweler y screenshot:

3. Yn y popped allan Copi Llun deialog, dewiswch Llun oddi wrth y fformat adran, gweler y screenshot:

4. Yna, cliciwch OK botwm, nawr, 'ch jyst angen i chi wasgu Ctrl + V i gludo'r ddelwedd i unrhyw le o'r llyfr gwaith.


Mewnosod ystod o gelloedd fel fformat delwedd neu lun gyda'r offeryn Camera

Yn Excel, mae a camera teclyn a all eich heffeithio i dynnu llun ar gyfer eich data dethol, ac yna ei gludo fel delwedd. Pan fydd y data gwreiddiol yn newid, bydd y ddelwedd a gopïwyd yn cael ei newid yn ddeinamig.

Yn gyntaf, dylech arddangos y camera ar y rhuban, ac yna ei gymhwyso.

1. Cliciwch Addasu Bar Offer Mynediad Cyflym eicon, ac yna cliciwch Mwy o Orchmynion opsiwn, gweler y screenshot:

2. Yn yr agored Dewisiadau Excel blwch deialog, gwnewch y gweithrediadau canlynol:

  • dewiswch Pob Gorchymyn oddi wrth y Dewiswch orchmynion oddi wrth gollwng i lawr;
  • Yna, sgroliwch i ddewis camera o'r blwch rhestr;
  • Ac yna, cliciwch Ychwanegu botwm i ychwanegu'r offeryn hwn at y Addasu Bar Offer Mynediad Cyflym;
  • O'r diwedd, cliciwch OK i gau'r blwch deialog hwn.

3. A'r camera offeryn wedi'i arddangos ar y rhuban, gweler y screenshot:

4. Yna, dewiswch yr ystod o gelloedd rydych chi eisiau delwedd.

5. Ac yna, cliciwch y camera offeryn, yna ewch i'r daflen waith a chlicio yn unrhyw le, bydd yr ystod ddata yn cael ei mewnosod fel delwedd fel y dangosir isod:


Mewnosod ystod o gelloedd fel fformat delwedd neu lun gyda nodwedd ddefnyddiol

Os oes gennych Kutools ar gyfer Excel, Gyda'i Llyfrgell Adnoddau nodwedd, gallwch arbed y data a ddewiswyd i mewn i'r Llyfrgell Adnoddau, ac yna ei ddefnyddio fel delwedd neu destun ar gyfer y dyfodol fel y dymunwch.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel hyn:

1. Dewiswch yr ystod ddata rydych chi am ei mewnosod fel delwedd.

2. Yna, cliciwch Kutools > Llywio, gweler y screenshot:

3. Yn yr estynedig Llywio pane, cliciwch Llyfrgell Adnoddau eicon, ac yna cliciwch Ychwanegu cynnwys dethol i'r Llyfrgell Adnoddau eicon, gweler y screenshot:

4. Yn y Cofnod Newydd o'r Llyfrgell Adnoddau blwch deialog, nodwch enw ar gyfer yr eitem hon, ac yna dewiswch grŵp rydych chi am ychwanegu ato. Gweler y screenshot:

5. Yna, cliciwch Ychwanegu botwm i'w ychwanegu ato Llyfrgell Adnoddau cwarel. Os ydych chi am fewnosod yr ystod hon fel llun, dim ond clicio cell i ddod o hyd i'r llun, ac yna dod o hyd i'r eitem sydd wedi'i chadw o'r Llyfrgell Adnoddau cwarel, a chlicio Mewnosod fel > Llun (EMF) o'r gwymplen o'r eitem. A bydd yr ystod ddata yn cael ei rhoi yn y ddalen fel delwedd, gweler sgrinluniau:


Mewnosod delwedd neu lun yn seiliedig ar werth celloedd yn ddeinamig

Yn yr adran hon, byddaf yn dangos i chi sut i arddangos delwedd benodol yn seiliedig ar werth cell. Er enghraifft, rwyf am ddangos y llun cyfatebol pan fyddaf yn dewis eitem benodol o gwymplen, a phan fyddaf yn dewis un arall, bydd y llun yn cael ei newid yn ddeinamig fel islaw'r demo a ddangosir:

Mewnosod delwedd neu lun yn seiliedig ar werth celloedd yn ddeinamig gyda nodwedd amrediad Enwebedig

Fel rheol, yn Excel, gallwch greu ystod ddynodedig ddeinamig, ac yna defnyddio'r llun cysylltiedig ar gyfer datrys y dasg hon yn Excel.

1. Yn gyntaf, dylech greu dwy golofn sy'n cynnwys enwau'r cynnyrch a'r delweddau cymharol, gweler y screenshot:

2. Yna, crëwch restr ostwng ar gyfer y gwerthoedd celloedd. Cliciwch cell i allbwn y gwymplen, yna cliciwch Dyddiad > Dilysu Data > Dilysu Data, gweler y screenshot:

3. Yn y popped allan Dilysu Data blwch deialog, o dan y Gosodiadau tab, dewis rhestr oddi wrth y Caniatáu gollwng, ac yna dewiswch y celloedd rydych chi am greu'r gwymplen o'r ffynhonnell blwch testun, gweler y screenshot:

4. Cliciwch OK, ac mae'r gwymplen gyda'r gwerthoedd celloedd wedi'i chreu, dewiswch un eitem o'r gwymplen, gweler y screenshot:

5. Yna, cliciwch Fformiwlâu > Diffinio Enw, gweler y screenshot:

6. Yn y Enw Newydd blwch deialog, gwnewch y gweithrediadau canlynol:

  • Rhowch enw o'r enw myimage yn y Enw blwch testun;
  • Yna copïwch a gludwch y fformiwla hon: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) i mewn i'r blwch Cyfeiriadau i destun.

Nodyn: Yn y fformiwla uchod:

  • Taflen11! $ A $ 2: $ B $ 6: yw'r daflen waith a'r ystod sy'n cynnwys y gwerthoedd a'r lluniau rydych chi am eu defnyddio;
  • Taflen11! $ E $ 2: yw'r gell yn y daflen waith lle rydych chi wedi creu'r gwymplen;
  • Taflen11! $ A $ 2: $ A $ 6: ydy'r rhestr o gelloedd rydych chi'n cael eich creu y gwymplen yn seiliedig arni;
  • Y rhif newidiol 2 yw rhif y golofn sy'n cynnwys y delweddau. Os yw'ch delweddau yng ngholofn C, dylech nodi 3.

7. Ac yna, cliciwch OK botwm, yna copïwch a gludwch y llun cyfatebol yn seiliedig ar werth y gell yn E2 o'r ystod wreiddiol i'r gell F2, gweler y screenshot:

8. Nesaf, dewiswch y llun yng nghell F2, ac yna nodwch y fformiwla hon = myimage (mydelwedd yw'r enw amrediad rydych chi wedi'i greu yng ngham 6) i'r bar fformiwla, gweler y screenshot:

9. Ar ôl mynd i mewn i'r fformiwla, pwyswch Rhowch allwedd, ac yn awr, pan ddewiswch un eitem o'r gwymplen, bydd ei lun cymharol yn cael ei arddangos ar unwaith. Gweler y screenshot:


Mewnosod delwedd neu lun yn seiliedig ar werth celloedd yn ddeinamig gyda nodwedd ddefnyddiol

Efallai y bydd y dull uchod yn anodd i'r mwyafrif ohonom, yma, byddaf yn cyflwyno nodwedd ddefnyddiol - Rhestr Gollwng Lluniau of Kutools ar gyfer Excel, gyda'r offeryn defnyddiol hwn, gallwch greu gwymplenni lluosog gyda'u delweddau cymharol gyda dim ond sawl clic.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch y camau canlynol:

1. Yn gyntaf, dylech greu dwy golofn sy'n cynnwys enwau'r cynnyrch a'r delweddau cymharol yn eich taflen waith.

2. Ac yna, cliciwch Kutools > Rhestr Gollwng > Rhestr Gollwng Lluniau, gweler y screenshot:

3. Yn y Rhestr Gollwng Lluniau blwch deialog, os ydych chi wedi creu'r colofnau o werthoedd a delweddau celloedd, anwybyddwch gam1, yna, dewiswch y data a'r ystod ddelwedd wreiddiol a'r ystod allbwn, gweler y screenshot:

4. Ac yna, cliciwch Ok botwm, mae'r rhestrau gwympo gyda delweddau wedi'u creu i'r celloedd a ddewiswyd, ac wrth ddewis eitem o'r gwymplen, bydd ei lun cyfatebol yn cael ei arddangos ar unwaith, gweler isod demo:


Allforio neu gadw pob delwedd neu lun o ffeil Excel

Os oes sawl delwedd yn eich llyfr gwaith, ac yn awr, rydych chi am dynnu ac arbed yr holl ddelweddau o'r ffeil Excel i ffolder. Sut allech chi ddatrys y dasg hon yn Excel?

Allforio neu gadw'r holl ddelweddau neu luniau o Excel gyda nodwedd Save As

Fel rheol, gallwch chi ddefnyddio'r Save As nodwedd i arbed pob delwedd o'r llyfr gwaith, gwnewch fel hyn:

1. Cliciwch Ffeil > Save As, Yn y Save As ffenestr, nodwch ffolder i roi'r ffeiliau a allforiwyd, ac yna dewiswch Tudalen We (*. Htm; *. Html) oddi wrth y Arbed fel teipiwch y gwymplen, gweler y screenshot:

2. Ac yna cliciwch Save botwm, ewch i'r ffolder benodol, fe welwch ddwy ffeil, un yw'r ffeil fformat HTML, ac un arall yw ffolder sy'n cynnwys y lluniau, siartiau neu wrthrychau eraill o'r llyfr gwaith. Gweler y screenshot:

3. Yna gallwch lusgo'r delweddau yn unig i ffolder arall yn ôl yr angen.

Nodyn: Trwy ddefnyddio hwn Save As nodwedd, fe gewch bob llun ddwywaith, mae un yn llai, mae un arall yn fwy, felly gallwch chi arbed y delweddau cydraniad uwch yn ôl yr angen.


Allforio neu gadw pob delwedd neu lun o Excel trwy newid estyniad y ffeil

Er mwyn arbed pob delwedd o ffeil Excel, gallwch hefyd newid estyniad y ffeil i RAR. Gwnewch fel hyn:

1. Newid estyniad y ffeil xlsx i rar fel y dangosir isod screenshot:

2. Yna, dadsipiwch y ffeil, ac fe welwch 3 ffolder ac 1 ffeil yn y ffolder, gweler y screenshot:

3. Yna, cliciwch i agor y xl ffolder, ac yna agorwch y cyfryngau ffolder, fe welwch fod yr holl ddelweddau'n cael eu storio yma heb ddyblygu, gweler y screenshot:


Allforio neu arbed pob delwedd neu lun o Excel gyda nodwedd bwerus

Os oes gennych Kutools ar gyfer Excel, Gyda'i Graffeg Allforio nodwedd, gallwch allforio rhai gwrthrychau penodol yn gyflym, megis lluniau, siartiau, siapiau i fformat delwedd yn ôl yr angen.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch y camau canlynol:

1. Cliciwch Kutools Byd Gwaith > Mewnforio ac Allforio > Graffeg Allforio, gweler y screenshot:

2. Yn y Graffeg Allforio blwch deialog, gwnewch y gweithrediadau canlynol:

  • Dewiswch lluniau opsiwn gan y Mathau rhestr ostwng;
  • Nodwch ffolder i arbed eich lluniau allforio;
  • Yna cliciwch ar y gwymplen o'r Fformat allforio i ddewis un fformat ar gyfer eich lluniau.

3. O'r diwedd, cliciwch Ok botwm, mae'r holl ddelweddau yn y llyfr gwaith cyfredol wedi'u cadw i'r ffolder a nodwyd gennych, gweler y screenshot:


Ail-enwi enwau delweddau mewn ffolder yn seiliedig ar restr o gelloedd yn Excel

Os oes gennych lawer o luniau mewn ffolder, ac yn awr, rydych chi am ailenwi'r holl ddelweddau hyn, sut allech chi ddatrys y swydd hon gyda ffordd hawdd yn Excel?

Yn Excel, yn gyntaf, dylech restru'r holl hen enwau delwedd i mewn i golofn, yna teipio'r enwau newydd, o'r diwedd, defnyddio cod VBA i ddisodli'r hen enwau gyda'r enwau newydd ar unwaith. Gwnewch y camau isod:

1. Rhestrwch bob enw delwedd i mewn i restr o gelloedd, neu gallwch gymhwyso'r cod isod i restru'r holl enwau delwedd mewn ffolder benodol heb eu teipio â llaw fesul un.

2. Dal i lawr ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau Ffenestr.

3. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau ffenestr.

Cod VBA: rhestrwch yr holl enwau delweddau o ffolder

Sub MainList()
'Updateby Extendoffice
On Error Resume Next
Set xRg = Application.InputBox("Please select a cell to put the filenames:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xRg = xRg(1)
Set Folder = Application.FileDialog(msoFileDialogFolderPicker)
If Folder.Show <> -1 Then Exit Sub
xDir = Folder.SelectedItems(1)
Call ListFilesInFolder(xRg, xDir, True)
End Sub
Sub ListFilesInFolder(ByVal xRg As Range, ByVal xFolderName As String, ByVal xIsSubfolders As Boolean)
Dim xFileSystemObject As Object
Dim xFolder As Object
Dim xSubFolder As Object
Dim xFile As Object
Dim rowIndex As Long
Set xFileSystemObject = CreateObject("Scripting.FileSystemObject")
Set xFolder = xFileSystemObject.GetFolder(xFolderName)
rowIndex = 1
For Each xFile In xFolder.Files
xRg.Formula = xFile.Name
Set xRg = xRg.Offset(rowIndex)
rowIndex = 1
Next xFile
If xIsSubfolders Then
For Each xSubFolder In xFolder.SubFolders
ListFilesInFolder xRg, xSubFolder.Path, True
Next xSubFolder
End If
Set xFile = Nothing
Set xFolder = Nothing
Set xFileSystemObject = Nothing
End Sub

4. Yna, pwyswch F5 allwedd i redeg y cod hwn, ac mae blwch prydlon wedi'i popio allan, cliciwch cell lle i allbwn enwau'r ddelwedd, gweler y screenshot:

5. Yna, cliciwch OK, Un arall Pori bydd dialog yn popio allan, dewiswch y ffolder sy'n cynnwys y lluniau rydych chi am restru'r holl enwau delweddau, gweler y screenshot:

6. Cliciwch OK, mae'r holl enwau delwedd yn y ffolder benodol wedi'u rhestru i'r celloedd, gweler y screenshot:

7. Yna, teipiwch yr enwau newydd sydd eu hangen arnoch i golofn arall fel y dangosir isod screenshot:

8. Ac yna, gallwch gymhwyso'r cod isod i ailenwi'r delweddau, ewch ymlaen i wasgu ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau Ffenestr.

9. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau ffenestr.

Cod VBA: Ail-enwi ffeiliau lluosog mewn ffolder

Sub RenameFiles()
'Updateby Extendoffice
Dim xDir As String
Dim xFile As String
Dim xRow As Long
With Application.FileDialog(msoFileDialogFolderPicker)
    .AllowMultiSelect = False
If .Show = -1 Then
    xDir = .SelectedItems(1)
    xFile = Dir(xDir & Application.PathSeparator & "*")
    Do Until xFile = ""
        xRow = 0
        On Error Resume Next
        xRow = Application.Match(xFile, Range("A:A"), 0)
        If xRow > 0 Then
            Name xDir & Application.PathSeparator & xFile As _
            xDir & Application.PathSeparator & Cells(xRow, "B").Value
        End If
        xFile = Dir
    Loop
End If
End With
End Sub

Nodyn: Yn y cod uchod, A: A yn nodi'r hen restr enwau delweddau rydych chi am eu hailenwi, a B yn cynnwys yr enwau delwedd newydd rydych chi am eu defnyddio, gallwch eu newid i'ch angen.

10. Yna, pwyswch F5 allwedd i redeg y cod hwn, ac yn y popped allan Pori ffenestr, dewiswch y ffolder sy'n cynnwys y ddelwedd rydych chi am ei hailenwi, gweler y screenshot:

11. Ac yna, cliciwch OK botwm, mae'r enwau enwau i gyd wedi cael eu disodli gan yr enwau newydd fel y dangosir isod:


Ehangu neu grebachu delwedd wrth glicio arni

Gan dybio, rydych chi wedi mewnosod delwedd fach yn y daflen waith, nawr, rydych chi am ehangu'r ddelwedd wrth glicio arni, a'i chrebachu wrth glicio eto fel isod y demo a ddangosir. Sut allech chi ddatrys y dasg hon yn Excel?

Er mwyn ehangu neu grebachu maint y ddelwedd wrth glicio arno, gall y cod canlynol ffafrio chi. Gwnewch y camau isod:

1. De-gliciwch y ddelwedd, a dewis Neilltuo Macro, gweler y screenshot:

2. Yna, yn y popped allan Neilltuo Macro blwch deialog, cliciwch y Nghastell Newydd Emlyn botwm, gweler y screenshot:

3. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, copïwch a gludwch y cod isod rhwng y is ac Is-End codau. Gweler y screenshot:

Dim shp As Shape
    Dim big As Single, small As Single
    Dim shpDouH As Double, shpDouOriH As Double
    big = 3  
    small = 1
    On Error Resume Next
    Set shp = ActiveSheet.Shapes(Application.Caller)
    With shp
        shpDouH = .Height
        .ScaleHeight 1, msoTrue, msoScaleFromTopLeft
        shpDouOriH = .Height
     
        If Round(shpDouH / shpDouOriH, 2) = big Then
            .ScaleHeight small, msoTrue, msoScaleFromTopLeft
            .ScaleWidth small, msoTrue, msoScaleFromTopLeft
            .ZOrder msoSendToBack
        Else
            .ScaleHeight big, msoTrue, msoScaleFromTopLeft
            .ScaleWidth big, msoTrue, msoScaleFromTopLeft
            .ZOrder msoBringToFront
        End If
    End With

4. Yna pwyswch y Alt + Q. allweddi i gau'r Microsoft Visual Basic ar gyfer Ceisiadau ffenestr. Nawr, pan fyddwch chi'n clicio ar y llun, bydd yn cael ei ehangu i'r maint a nodwyd gennych, a bydd ei glicio eto yn crebachu i'r maint gwreiddiol fel y dangosir isod:


Arnofio llun bob amser wrth sgrolio'r daflen waith

Weithiau, efallai yr hoffech chi arnofio llun ar sgrin y daflen waith er pan fyddwch chi'n sgrolio i fyny neu i lawr y daflen waith, er mwyn i chi allu gweld y llun trwy'r amser. Yn yr adran hon, byddaf yn cyflwyno tric cyflym ichi ddelio â'r swydd hon yn Excel. Gwnewch y camau canlynol:

1. Yn gyntaf, mewnosodwch lun rydych chi am ei ddefnyddio.

2. Yna, cliciwch ar y dde ar y tab dalen sy'n cynnwys y llun rydych chi am ei gadw'n weladwy bob amser, ac yna dewiswch Gweld y Cod o'r ddewislen cyd-destun. Yn yr agored Microsoft Visual Basic ar gyfer cymwysiadau ffenestr, copïo a gludo'r cod isod i'r Modiwl gwag:

Cod VBA: Arnofio llun mewn taflen waith bob amser

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

Nodyn: Yn y cod hwn, mae'r Llun 1 yw'r enw delwedd rydych wedi'i fewnosod, newidiwch ef i'ch angen.

3. Yna, arbed a chau ffenestr y cod, nawr, wrth sgrolio'r daflen waith a chlicio cell, bydd y llun bob amser yn cael ei gadw ar gornel dde uchaf y daflen waith. Gweler y screenshot:


Dileu delweddau neu luniau o ddalen weithredol / ystod o gelloedd

A oes gennych unrhyw ffyrdd cyflym o ddileu pob delwedd o daflen waith, ystod o gelloedd neu lyfr gwaith cyfredol? Yn yr adran hon, byddaf yn cyflwyno rhai dulliau ar gyfer datrys y swydd hon yn Excel.

Dileu delweddau neu luniau o ddalen weithredol gyda chod VBA

I ddileu'r lluniau o'r daflen waith gyfredol, gall y cod VBA isod eich helpu chi, gwnewch fel hyn:

1. Gweithredwch y daflen waith sy'n cynnwys y delweddau rydych chi am eu dileu.

2. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

3. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau Ffenestr.

Cod VBA: Dileu'r holl luniau o'r daflen waith gyfredol

Sub DeleteAllPics()
'Updateby Extendoffice
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
Pic.Delete
Next Pic
End Sub

4. Yna, pwyswch F5 allwedd i redeg y cod hwn, ac mae'r holl luniau ar y daflen waith weithredol yn cael eu dileu ar unwaith.


Dileu delweddau neu luniau o ystod o gelloedd gyda chod VBA

Os oes angen i chi ddileu'r delweddau o ddim ond ystod o gelloedd, dyma god syml arall a all eich helpu.

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau Ffenestr.

Cod VBA: Dileu'r lluniau o ystod o gelloedd

Sub DeletePic()
'Updateby Extendoffice
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("B4:C6")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Nodyn: Yn y cod uchod, B4: C6 yw'r ystod rydych chi am ddileu'r lluniau ohoni.

3. Yna, pwyswch F5 allwedd i redeg y cod hwn, a bydd y lluniau yn yr ystod a ddewiswyd yn cael eu dileu ar unwaith, gweler sgrinluniau:


Dileu delweddau neu luniau o ddalen weithredol, dalennau dethol, pob dalen gyda nodwedd ddefnyddiol

Os oes gennych Kutools ar gyfer Excel, Gyda'i Dileu Darluniau a Gwrthrychau nodwedd, gallwch chi ddileu'r delweddau yn gyflym o daflen waith, rhai taflenni dethol neu lyfr gwaith cyfan.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch y camau canlynol:

1. Cliciwch Kutools > Dileu > Dileu Darluniau a Gwrthrychau, gweler y screenshot:

2. Yn yr agored Dileu Darluniau a Gwrthrychau blwch deialog, gwirio lluniau oddi wrth y Dileu adran, ac yna nodwch y cwmpas yr ydych am ddileu'r lluniau ohono o dan yr adran Edrych mewn adran, gweler y screenshot:

3. Yna cliciwch Ok botwm, a bydd yr holl luniau'n cael eu dileu o'r daflen waith, taflenni gwaith dethol neu'r llyfr gwaith cyfan fel y nodwyd gennych.


  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau a Cadw Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi Dyblyg a Swm / Cyfartaledd... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Fformiwlâu Hoff a Mewnosod yn Gyflym, Meysydd, Siartiau a Lluniau; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Grwpio Tabl Pivot yn ôl rhif wythnos, diwrnod o'r wythnos a mwy ... Dangos Celloedd Datgloi, wedi'u Cloi yn ôl gwahanol liwiau; Amlygu Celloedd sydd â Fformiwla / Enw...
tab kte 201905
  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Geachte,

Zeer interesse pagina.

Wel stel ik me de vraag hoe we na input van de foto's, die foto's in het midden van de cel krijgen.

Bestaat er hier ook een macro voor.?
This comment was minimized by the moderator on the site
Hello,
There are several vba codes in this article, which VBA code do you need to put the pictures in center of the cells?
Thank you!
This comment was minimized by the moderator on the site
Good afternoon,

Very nice page.

Only I tried the VBA of "Insert Multiple Images Or Images That Match Their Names With VBA Code" but unfortunately it doesn't work.

I can finish everything but unfortunately I can't get with pictures in the excel.

Any idea what the problem could be here?
This comment was minimized by the moderator on the site
Hello, janick,The code works well in my workbook, do you select the correct folder contains the images? Please check it?
Thank you!
This comment was minimized by the moderator on the site
This is a great article! I really like how you presented it so easy to understand
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations