Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako iskati / poiskati vrednosti v drugem delovnem zvezku?

Ta članek govori o tem, kako poiskati vrednosti in vrniti podatke iz drugega delovnega zvezka ter kako najti / poiskati vrednosti iz drugega delovnega zvezka. Tu bom podrobneje predstavil tri rešitve.

Vlookup podatke in vračate vrednosti iz drugega delovnega zvezka v Excelu

Vlookup podatke in vračanje vrednosti iz druge zaprti delovni zvezek z VBA

Preprosto vlookup za vrednost iz drugega lista, ne da bi natančno zapomnil formulo

Kutools za Excelove Poiščite vrednost na seznamu formula vam lahko pomaga hitro vlookup za vrednost iz izbire v aktivnem listu ali drugih listov hitro. Popolna brezplačna preizkusna različica 60-dan!

oglas išči vrednost na seznamu 1
oglas išči vrednost na seznamu 2

puščica modra desno mehurček Vlookup podatke in vračate vrednosti iz drugega delovnega zvezka v Excelu

Na primer, v Excelu ustvarjate tabelo z nakupom sadja, zdaj pa morate pregledati sadove iz drugega delovnega zvezka in vrniti ustrezne cene, kot je prikazano spodaj na sliki s posnetki. Tukaj vas bom vodil, da ga rešite s funkcijo VLOOKKUP v Excelu.

1. Odprite oba delovna zvezka, s katerima boste v včeraj presodili vrednosti in vrnili vrednosti v.

2. Izberite prazno celico, s katero boste vrnili ceno, vnesite formulo = VLOOKUP (B2, [Price.xlsx] Sheet1! $ A $ 1: $ B $ 24,2, FALSE) v to, in nato povlecite svojo Fill Handle za uporabo te formule v obsegu, kot ga potrebujete.

Opombe:

(1) V zgornji formuli je B2 plod, ki ga boste poiskali iz druge delovne knjige, Price.xlsx označuje ime datoteke delovne knjige, iz katere boste iskali, Sheet1 pomeni ime lista, iz katerega boste iskali, in A $ 1: $ B $ 24 je območje, iz katerega boste iskali. Če jih potrebujete, jih lahko spremenite.

(2) Ko zapišete delovni zvezek, ki ste jo pogledali, formula se bo samodejno posodobila = VLOOKUP (B2, 'W: \ test \ [Cena.xlsx] Sheet1'! $ A $ 1: $ B $ 24,2, FALSE), W: \ test \ je shranjevalna pot delovnega zvezka, iz katere ste si ogledali.

Do zdaj so se vse cene vrnile pravilno, kot je prikazano levo sliko. Te cene se bodo samodejno posodobile, če boste izvirne delovne knjige iskali po spremembah.

opozorilni trak Formula je preveč zapletena, da se spomniš? Shranite formulo kot vnos za samodejni vnos za ponovno uporabo z enim klikom v prihodnosti!
Preberite več ... Brezplačen preizkus

puščica modra desno mehurček Vlookup podatke in vračanje vrednosti iz druge zaprti delovni zvezek z VBA

Morda je stelja zamenjana, da konfigurirate shranjevalno pot, ime datoteke in delovni list v funkciji VLOOKUP. Ta metoda bo uvedla VBA za enostavno reševanje.

1. Pritisnite druga + F11 da odprete okno Microsoft Visual Basic for Applications.

2. Kliknite Vstavi > Moduliin nato prilepite pod kodo VBA v okno odprtega modula.

VBA: podatke Vlookup in povratne vrednosti iz druge zaprtega delovnega zvezka

Private Function GetColumn(Num As Integer) As String
If Num <= 26 Then
GetColumn = Chr(Num + 64)
Else
GetColumn = Chr((Num - 1) \ 26 + 64) & Chr((Num - 1) Mod 26 + 65)
End If
End Function
Sub FindValue()
Dim xAddress As String
Dim xString As String
Dim xFileName As Variant
Dim xUserRange As Range
Dim xRg As Range
Dim xFCell As Range
Dim xSourceSh As Worksheet
Dim xSourceWb As Workbook
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xUserRange = Application.InputBox("Lookup values :", "Kutools for Excel", xAddress, Type:=8)
If Err <> 0 Then Exit Sub
Set xUserRange = Application.Intersect(xUserRange, Application.ActiveSheet.UsedRange)
xFileName = Application.GetOpenFilename("Excel Files (*.xlsx), *.xlsx", 1, "Select a Workbook")
If xFileName = False Then Exit Sub
Application.ScreenUpdating = False
Set xSourceWb = Workbooks.Open(xFileName)
Set xSourceSh = xSourceWb.Worksheets.Item(1)
xString = "='" & xSourceWb.Path & Application.PathSeparator & _
"[" & xSourceWb.Name & "]" & xSourceSh.Name & "'!$"
For Each xRg In xUserRange
Set xFCell = xSourceSh.Cells.Find(xRg.Value, , xlValues, xlWhole, , , False)
If Not (xFCell Is Nothing) Then
xRg.Offset(0, 2).Formula = xString & GetColumn(xFCell.Column + 1) & "$" & xFCell.Row
End If
Next
xSourceWb.Close False
Application.ScreenUpdating = True
End Sub
Opombe: Ta VBA bo vrnila vrednosti v stolpcu, ki je stolpce 2 za izbranim stolpcem. Na primer izberem stolpec B, ko uporabim to VBA, vrednosti se vrnejo v stolpcu D. Če morate spremeniti ciljni stolpec, prosimo, izvedite kodo xRg.Offset (0, 2). Formula = xString in GetColumn (xFCell.Column + 1) & "$" & xFCell.Row , in nadomestiti 2 na drugo številko, kot jo potrebujete.

3. Pritisnite F5 ali kliknite na Run gumb za zagon te VBA.

4. V pogovornem oknu za odpiranje navedite obseg podatkov, ki ga boste iskali, in kliknite na OK gumb.

5. Sedaj prosimo, izberite delovni zvezek, v katerem boste iskali vrednosti v odprtem pogovornem oknu Izberi delovni zvezek in kliknite na Odprto gumb.

Zdaj so vse izbrane vrednosti pregledane v določeni zaprti delovni zvezki, ustrezne vrednosti pa se vrnejo v določenem stolpcu. Prikaz slike:



Priporočena orodja za produktivnost za Excel

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
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.
    leigh Donoghue · 1 months ago
    Hi this works great thanks! Would it be at all possible to show me how i would change the code if i have the workbook open that i would like to lookup the data in?