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

 Conas liosta anuas a chruthú ach luachanna difriúla a thaispeáint in Excel?

I mbileog oibre Excel, is féidir linn liosta anuas a chruthú go tapa leis an ngné Bailíochtaithe Sonraí, ach, an ndearna tú iarracht riamh luach difriúil a thaispeáint nuair a chliceálann tú an liosta anuas? Mar shampla, tá an dá shonraí colún seo a leanas agam i gColún A agus i gColún B, anois, ní mór dom liosta anuas a chruthú leis na luachanna sa cholún Ainm, ach, nuair a roghnaíonn mé an t-ainm ón liosta anuas cruthaithe, an comhfhreagrach taispeántar luach sa cholún Uimhir mar a thaispeántar an scáileán a leanas. Tabharfaidh an t-alt seo isteach na sonraí chun an tasc seo a réiteach.

titim luachanna difriúla luachanna 1

Cruthaigh liosta anuas ach taispeáin luach difriúil i gcill liosta anuas


Cruthaigh liosta anuas ach taispeáin luach difriúil i gcill liosta anuas

Chun an tasc seo a chríochnú, déan leis an gcéim ar chéim seo a leanas:

1. Cruthaigh ainm raon do na luachanna cille is mian leat a úsáid ar an liosta anuas, sa sampla seo, cuirfidh mé an t-ainm anuas sa Ainm Bosca, agus ansin brúigh Iontráil eochair, féach an scáileán:

titim luachanna difriúla luachanna 2

2. Ansin roghnaigh cealla inar mian leat an liosta anuas a chur isteach, agus cliceáil Dáta > Bailíochtú Sonraí > Bailíochtú Sonraí, féach ar an scáileán:

titim luachanna difriúla luachanna 3

3. Sa an Bailíochtú Sonraí bosca dialóige, faoin Socruithe cluaisín, roghnaigh liosta ó na Ceadaigh titim anuas, agus ansin cliceáil titim luachanna difriúla luachanna 5 cnaipe chun an liosta Ainm a roghnú a theastaíonn uait a úsáid mar luachanna anuas sa Foinse Bosca téacs. Féach an pictiúr:

titim luachanna difriúla luachanna 4

4. Tar éis duit an liosta anuas a chur isteach, cliceáil ar dheis ar chluaisín bileog ghníomhach, agus roghnaigh Féach an cód ón roghchlár comhthéacs, agus san oscailt Microsoft Visual Basic d’iarratais an cód seo a leanas a fhuinneogú, a chóipeáil agus a ghreamú isteach sa Mhodúl bán:

Cód VBA: Taispeáin luach difriúil ón liosta anuas:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    selectedNa = Target.Value
    If Target.Column = 5 Then
        selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
        If Not IsError(selectedNum) Then
            Target.Value = selectedNum
        End If
    End If
End Sub

titim luachanna difriúla luachanna 6

nótaí: Sa chód thuas, an uimhir 5 laistigh de Más Target.Column = 5 Ansin is é script an uimhir cholúin a bhfuil do liosta anuas suite,titim síos”Leis seo selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("anuas"), 2, Bréagach) is é cód an t-ainm raon a chruthaigh tú i gcéim 1. Is féidir leat iad a athrú go dtí an rud atá uait.

5. Ansin sábháil agus dún an cód seo, anois, nuair a roghnaíonn tú mír ón liosta anuas, taispeántar luach coibhneasta difriúil sa chill chéanna, féach an scáileán:

titim luachanna difriúla luachanna 7


Taispeántas: Cruthaigh liosta anuas ach taispeáin luachanna difriúla in Excel

Kutools le haghaidh Excel: le níos mó ná 300 breiseán áisiúil Excel, saor in aisce le triail gan aon teorannú i 30 lá. Íoslódáil agus triail saor in aisce Anois!

 


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíochtaí Office / Excel 2007-2019 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d’fhiontar nó d’eagraíocht. Gnéithe iomlána triail saor in aisce 30 lá. Ráthaíocht ar ais airgid 60 lá.
cluaisín kte 201905

Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
bun officetab

 

Sórtáil tuairimí de réir
Comments (40)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An féidir é seo a dhéanamh ar bhileoga éagsúla? Ciallaíonn mé, ar bhileog 1 an anuas agus ar bhileog 2 an raon. Conas a chaithfidh mé é seo a chódú? Go raibh maith agat roimh ré. Tina.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Cad a tharlóidh má theastaíonn uaim níos mó ná anuas amháin a dhéanamh a thugann luachanna difriúla ar ais ar an mbileog oibre chéanna? An féidir leat sampla den chódú ar feadh dhá cheann nó níos mó a thaispeáint dom?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Laoi Ann

Mura ndéanann tú ach an cód a chóipeáil agus a ghreamú ón If to the EndIf agus an colún # agus an Tábla a athrú, ba cheart go n-oibreoidh sé:


Fo-Bileog Oibre_Athrú(Sprioc ByVal Mar Raon)
roghnaitheNa = Target.Value
Más Target.Column = 5 Ansin
selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("anuas"), 2, Bréagach)
Mura bhfuil IsError(roghnaitheNum) Ansin
Target.Value = roghnaitheNum
Deireadh Má
Deireadh Má
Más Target.Column = 9 Ansin
selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("titim anuas1"), 2, Bréagach)
Mura bhfuil IsError(roghnaitheNum) Ansin
Target.Value = roghnaitheNum
Deireadh Má
Deireadh Má
Fo Deireadh

Níl mé ag rá gurb é seo an bealach ceart ach d'oibrigh sé ar mo leagan tástála. Tá mé ag baint úsáide as Excel 2013
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Just a thriail é. Agus d'oibrigh sé!! Go raibh maith agat.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, a chabhair, ní oibríonn sé, an féidir leat an cód go léir a ghreamú anseo le haghaidh 2 cholún?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Ní dhéanfaidh aon ní níos frustrachas ná a chlóscríobh i gceist ach amháin go bhfuil sé blown away. Má chlóscríobhann tú an cód mícheart 6 dhigit chun do dhuine daonna a fhíorú, scriosann sé an teachtaireacht a postáladh. B'fhéidir gur mhaith leat é sin a shocrú. Anois is é seo mo thrácht: Rinne mé iarracht an rud céanna a léirigh tú san fhíseán agus sna treoracha scríofa a dhéanamh agus is é an rud a gheobhaidh mé ná nuair a roghnaíonn mé ainm ar an liosta ná an t-ainm agus ní an uimhir. Chomh maith leis sin, conas atá sé seo ag oibriú fiú mar ba cheart go gcuirfeadh bailíochtú sonraí teorainn leis na roghanna go dtí na cinn atá ar an liosta amháin. Cén chaoi a bhfuil sé seo ag cur cleasa ar an gcóras? San am a chuaigh thart bhí orm cód vba a shannadh do chnaipe nó ar aicearra i gcónaí, conas a chuirtear an cód seo i ngníomh? Conas a dhéanann tú tástáil lena chinntiú go bhfuil sé ag obair?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas a oibríonn an fhoirmle nuair is mian leat na sonraí a chur leis ar bhileog ar leith sa leabhar oibre? Ba mhaith liom na sonraí a cheilt.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Athrú anseo bro!
selectedNum = Application.VLookup(selectedNa, Bileoga Oibre("YourSheetName").Range("anuas"), 2, Bréagach)
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Déanann "YourSheetName" tagairt don leathán ina bhfuil an raon sonraí nó don bhileog inar mian liom an liosta dropdwon a úsáid?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas a oibríonn an fhoirmle agus tú ag iarraidh na sonraí a liostú ar bhileog/cluaisín ar leith sa leabhar saothair?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
ní oibríonn sé seo i leaganacha reatha de excel-as dáta. Ní thaispeánann bailíochtú sonraí ansin liosta in vba a thuilleadh mar go bhfuil iarracht déanta cheana féin ar oibiacht Excel iolrach agus ní thaispeánann sé suas.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Sa sampla seo, cad má theastaíonn uait go bhféachfadh sé ar luach i ngach ceann de na cealla i 5, ach cuir an luach sa chill in aice láimhe i 6
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas a bheadh ​​gá leis an gcód a Athrú dá mbeinn ag iarraidh tagairt/nasc a chruthú in E1 le foinse an liosta Anuas bunaithe ar an luach roghnaithe?
Is é an Tairbhe a bheadh ​​ann ná Dá ndéanfaí athrú ar an bhfoinse anuas (m.sh. "Henrik" => "Hendrik" bheadh ​​an t-athrú le feiceáil go huathoibríoch in E1.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An bhfuil a fhios ag duine ar bith conas é seo a fháil chun oibriú ar bhileoga Google?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Ba mhaith liom rogha iolrach a roghnú ón liosta anuas.
toradh mar seo: AA1001,BB1002
An féidir?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An bhfuair tú réiteach?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Más rud é go bhfuil an liosta seo déanta agat ar an mbealach seo, cén fáth a bhfuil an cód? Gracias.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
cómo buscar un valor hacia la izquierda
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Fo-Bileog Oibre Príobháideach_Change (Sprioc ByVal Mar Raon)
roghnaitheNa = Target.Value
Más Target.Column = 5 Ansin

Bileoga ("Nombre de la hoja en donde esta la lista"). Gníomhachtaigh
selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("anuas"), 2, Bréagach)
Bileoga ("Nombre de la hoja en donde estas trabajando"). Gníomhachtaigh
Mura bhfuil IsError(roghnaitheNum) Ansin
Target.Value = roghnaitheNum
Deireadh Má
Deireadh Má
Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá a fhios ag duine conas an luach a chuardach ó dheis go clé
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Ní mór dom an anuas céanna a úsáid i níos mó ná colún amháin, cad é an cód a bheadh ​​ann?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Hallo!
Tá sé seo thar a bheith úsáideach! Go raibh maith agat!
Táim ag rith sa chás nach ndéanann an chill nuashonrú go huathoibríoch nó nuair a bhíonn an fheidhm athnuachana in úsáid. Caithfidh mé cliceáil i gcill eile agus ansin cliceáil ar ais ar an gcill ag obair chun é a fháil chun an luach a thaispeáint.
Táim ag obair leis in Office Standard 2019 faoi láthair. An bhfuil a fhios ag éinne an bhfuil baint ag an gceist seo leis an leagan ar Excel atá in úsáid agam?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh,
Bhí an cód ag obair go breá má táimid ag sainiú an liosta agus ag cruthú an anuas ar an mbileog chéanna.
Ach conas is féidir linn liosta na luachanna agus na gcód a shainiú i mbileog amháin agus an liosta anuas a chruthaítear i mbileog eile a bhaint amach?
Níl an cód céanna seo ag obair mar atá sé á thaispeáint agus earráid sa líne seo ("selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("anuas"), 2, Bréagach)").
Chomh maith leis sin, tá ceanglas cosúil le, má tá liostaí iolracha agam atá sainmhínithe i mbileog amháin le haitheantas agus Ainmneacha agus il-shonruithe i mbileog eile ina bhfuil luach anuas amháin ag brath ar luach roghnaithe i gceann eile anuas.

Tá súil agam gur thuig tú mo cheist.

Cabhraigh liom le do thoil chun an cheist seo a réiteach.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Chuidigh sé seo go mór liom, go raibh maith agat. Ós rud é go raibh mo thábla ar leathán difriúil ná mo bhosca liosta chuir mé cúpla líne cód leis chun é sin a bhaint amach agus freisin chun an scáileán a choinneáil ó splancadh.

Application.ScreenUpdating = Bréagach
Bileoga ("SheetWithTableOnIt"). Gníomhachtaigh

Bileoga ("SheetWithDropdownListOnIt").Gníomhachtaigh
Feidhmchlár.ScreenUpdating = Fíor
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
cén áit go díreach ar chuir tú na cóid seo leis?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Faighim earráid Tiomsú: Earráid chomhréire ar an líne "Má Trarget.Column = 6 Ansin" nuair a dhéanaim iarracht an cód a úsáid? Aon smaoineamh cén fáth?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá sé ag obair ach nuair a fhágann tú comhad agus nuair a osclaítear é arís níl sé ag obair ... ní féidir é a shábháil mar .xls amháin mar .xlsm an bhfuil aon réiteach air sin? Go raibh maith agat
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Marko,Tar éis duit an cód a chóipeáil agus a ghreamú i do leabhar oibre, nuair a shábhálann tú an comhad, ba cheart duit é a shábháil mar bhformáid Excel Macro-Enabled Workbook, bain triail as, go raibh maith agat!
Níl aon tráchtanna curtha suas anseo go fóill
Luchtaigh More
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta